Oracle used to give different results from transact and from a program. I will look tomorrow at code I am using and see if I am calling stored proc. I am inserting only.
Regards Chuck Sent from my iPhone > On Jun 13, 2019, at 4:34 PM, Olson, Brad via 4D_Tech <[email protected]> > wrote: > > Hello, > I am needing some assistance in executing an Oracle stored procedure from a > 4D v17R4 application. It has only one input parameter as varchar, and the > output results come in the form of a cursor, consisting of a table with three > columns and n rows. > > This is the stored procedure that the oracle developer created and sent me - > ADC.PKG_EXTACCESSSQL.SELECTJOBINFORMATIONBYSERIAL(serialNumber IN varchar2, > dataOutput OUT cursorType). > > I can run this, using Oracle SQL Developer, and get the expected results, but > running it in 4D generates various errors depending on how I format the > method. > > I have tried the following approaches, based on the examples in the Language > reference, but both generate ODBC errors. > Method 1 > C_TEXT($sql) > C_TEXT(serialNumber;dataOutput) > serialNumber:="711030309743" > $sql:="call ADC.PKG_EXTACCESSSQL.SELECTJOBINFORMATIONBYSERIAL(?, ?)" > SQL LOGIN("ODBC:fbcDelicias_test";"REPORT_USR";"RptB0Us#r") > If (OK=1) > > SQL SET PARAMETER(serialNumber;SQL param in) > SQL SET PARAMETER(dataOutput;SQL param out) > SQL EXECUTE($sql;dataOutput) > SQL LOAD RECORD(SQL all records) > //Place the data validation code here > SQL CANCEL LOAD > End if > SQL LOGOUT > > Method 2 > C_TEXT($sql) > C_TEXT(serialNumber;dataOutput) > serialNumber:="711030309743" > $sql:="call > ADC.PKG_EXTACCESSSQL.SELECTJOBINFORMATIONBYSERIAL(<<serialNumber>>,<<dataOutput>>)" > > SQL LOGIN("ODBC:myUserName";"REPORT_USR";"RptB0Us#r") > If (OK=1) > SQL EXECUTE($sql;dataOutput) > SQL LOAD RECORD(SQL all records) > //Place the data validation code here > SQL CANCEL LOAD > End if > SQL LOGOUT > > Thank you for any suggestions you might have! > > Brad Olson > CommScope, Inc. > > ********************************************************************** > 4D Internet Users Group (4D iNUG) > Archive: http://lists.4d.com/archives.html > Options: https://lists.4d.com/mailman/options/4d_tech > Unsub: mailto:[email protected] > ********************************************************************** ********************************************************************** 4D Internet Users Group (4D iNUG) Archive: http://lists.4d.com/archives.html Options: https://lists.4d.com/mailman/options/4d_tech Unsub: mailto:[email protected] **********************************************************************
