Oracle FAQ Your Portal to the Oracle Knowledge Grid
HOME | ASK QUESTION | ADD INFO | SEARCH | E-MAIL US
 

Home -> Community -> Usenet -> c.d.o.misc -> executing oracle-procedure from MS Visual Interdef

executing oracle-procedure from MS Visual Interdef

From: Monique E.E. van der Veer <mvdveer_at_kabelfoon.nl>
Date: 1998/02/17
Message-ID: <34E9E2AE.6B7EDC86@kabelfoon.nl>#1/1

Hi everyone,

I'm working with Visual Interdef on an Oracle 7 DB. With this I'm trying to execute a stored procedure to which I'm sending parameters the procedure returns four values.
Each time the script is executed however, I get an error message: "acces violation or syntax error" When I execute the procedure in Interdef's dataview tab it executes without problems. I even get to see the output in the results pane. That's why I assume the ODBC-driver is allright for this.

Can anyone help me or point me in an direction as to where I can find more information.

Below this line is a sample of the script I am using


Set ComConn = Server.CreateObject("ADODB.Connection")

'Set RS = Server.CreateObject("ADODB.RecordSet")
ComConn.Open "ICSI", "icsowner" , "icsowner"
'RS.Open sql, Conn, adOpenKeyset,adLockReadOnly

Set cmd = Server.CreateObject("ADODB.Command") cmd.CommandTimeOut = 30
cmd.ActiveConnection = ComConn

'This code runs a stored procedure that requires parameters
cmd.CommandText = "EXEC ICSOWNER.ICS_CONTROLE1" cmd.CommandType = 4
'Set parameter = command.CreateParameter(Name, Type, Direction, Size,
Value)

set parm = cmd.CreateParameter(P_NAAM, 129, 1, 15, X)
cmd.Parameters.Append parm
set parm = cmd.CreateParameter(P_PASSWORD, 129, 1, 15, Y)
cmd.Parameters.Append parm
set parm = cmd.CreateParameter(P_BESTUUR_ID, 131, 2, 40)
cmd.Parameters.Append parm
set parm = cmd.CreateParameter(P_INSTELLING_ID, 131, 2, 40)
cmd.Parameters.Append parm
set parm = cmd.CreateParameter(P_GEBRUIKER_ID, 131, 2, 40)
cmd.Parameters.Append parm
set parm = cmd.CreateParameter(P_TYPE, 129, 2, 40)
cmd.Parameters.Append parm

cmd.Execute

Thanks,

Monique van der Veer
mvdveer_at_kabelfoon.nl Received on Tue Feb 17 1998 - 00:00:00 CST

Original text of this message

HOME | ASK QUESTION | ADD INFO | SEARCH | E-MAIL US