Re: VB & Oracle question

[Teresita Castro]

I declare the t_row  here:   CREATE OR  REPLACE PACKAGE LAWSON1.PACK_ICTRANS AS CURSOR c1 IS SELECT ITEM,DOC_TYPE,DOCUMENT  FROM ICTRANS; TYPE t_row IS REF CURSOR  RETURN c1%ROWTYPE;    --Declaration PROCEDURE CL_CURSOR(p_item in varchar2, P_IC  OUT t_row); END PACK_ICTRANS; Where  and how can I declare de P_IC variable?   I don't know a lot of Oracle I was following a book trying to have sucessfull  with this code.       >>> [EMAIL PROTECTED] 06/18/03 06:54PM >>> Ms. Castro: In the procedure declaration PROCEDURE CL_CURSOR(p_item in varchar2, P_IC  OUT t_row) the P_IC is referenced  as an OUT variable of type t_row. But to use it, it must be declared somewhere else, usually in the calling program.  So, a variable definition should exist in the package specification  or body declaring the P_IC variable. RWB ============================================================================================================ Reginald W. Bailey IBM Global Services - ETS SW GDSD - Database Management Your Friendly Neighborhood DBA 713-216-7703 (Office) 281-798-5474 (Mobile) 713-415-5410 (Pager) ============================================================================================================                                                                                                                                                      [EMAIL PROTECTED]                                                                                                               martmx.com               To:     [EMAIL PROTECTED]                                                                            Sent by:                 cc:                                                                                                     [EMAIL PROTECTED]       Subject:     VB & Oracle question                                                                       com                                                                                                                                                                                                                                                                                                                                                                                                06/18/2003 07:05                                                                                                                 PM                                                                                                                               Please respond to                                                                                                                ORACLE-L                                                                                                                                                                                                                                                                                                                                                                       Hi!!! I create a package in Oracle. When I run the line: Set adoRS = mCmd.Execute VB sent me the next error: Run-time error '-214721700 (80040E14)': Ora-06550: line 1,  column 33: PLS-002001: Identifier 'P_IC' must be declare. Ora-06550: line1,  column 7: PLS/SQL: Statemnt ignored. What I am doing  wrong???????? This is the code CREATE OR  REPLACE PACKAGE LAWSON1.PACK_ICTRANS AS CURSOR c1 IS SELECT ITEM,DOC_TYPE,DOCUMENT  FROM ICTRANS; TYPE t_row IS REF CURSOR  RETURN c1%ROWTYPE; PROCEDURE CL_CURSOR(p_item in varchar2, P_IC  OUT t_row); END PACK_ICTRANS; CREATE OR  REPLACE PACKAGE BODY  LAWSON1.PACK_ICTRANS AS PROCEDURE CL_CURSOR(p_item in varchar2, P_IC  OUT t_row)   IS   BEGIN      OPEN P_IC FOR      SELECT ITEM,DOC_TYPE,DOCUMENT FROM ICTRANS WHERE ITEM=p_item;   END CL_CURSOR; END PACK_ICTRANS; This is the code in VB: Private Sub cmdTestOracle_Click() Dim mCmd As ADODB.Command Dim mCmdPrm1 As New ADODB.Parameter Set  adoRS = New ADODB.Recordset If Open_cnOracle Then adoRS.CursorType =  adOpenDynamic     sSQL = "{call PACK_ICTRANS.CL_CURSOR(?,  {resultset  1000, P_IC})}"       ' adoRS.Open  sSQL, gcnOracle, , , adCmdTable       Set mCmd = New  ADODB.Command       With  mCmd         .CommandText =  sSQL         .CommandType =  adCmdText         .ActiveConnection =  gcnOracle         Set mCmdPrm1 =  .CreateParameter("p_item", adVarChar, adParamInput, 32,  "0010096")           .Parameters.Append mCmdPrm1       End  With     Set adoRS = New ADODB.Recordset      mCmdPrm1 = "0010096"     Set adoRS = mCmd.Execute <-----Error here     MsgBox  adoRS.Fields(0) End If End Sub Function  Open_cnOracle() As Boolean Dim oMsgSplitter As New  LawsonErrMsgSplitter.Splitter Dim vaPieces As Variant On Error GoTo  ErrorConectarOracle: Set gcnOracle = New ADODB.Connection With gcnOracle .ConnectionString = "Provider=OraOLEDB.Oracle.1;Password=burke00;Persist Security Info=True;User ID=lawson1;Data Source=LAWS" .CommandTimeout = 0 .Open Open_cnOracle = True End With Exit Function ErrorConectarOracle: vaPieces = oMsgSplitter.SplitMsg(Err.Description) MsgBox vaPieces(mpText) Open_cnOracle = False End Function -- Please see the official ORACLE-L FAQ: http://www.orafaq.net -- Author:   INET: [EMAIL PROTECTED] Fat City Network Services    -- 858-538-5051 http://www.fatcity.com San Diego, California        -- Mailing list and web hosting services --------------------------------------------------------------------- To REMOVE yourself from this mailing list, send an E-Mail message to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in the message BODY, include a line containing: UNSUB ORACLE-L (or the name of mailing list you want to be removed from).  You may also send the HELP command for other information (like subscribing).