I would also recommend you join, if you have not done so, the TSO-REXX and DB2 Lists.
They are awesome when it comes to helping with these topics. Since you are using DSNREXX I would go to DB2 List first. to join either list, use the following DB2 List IDUG.ORG For TSO-REXX http://www2.marist.edu/htbin/wlvindex?TSO-REXX Go to the bottom of the TSO-REXX page to join Lizette -----Original Message----- >From: Don Poitras <[email protected]> >Sent: Aug 3, 2015 10:37 AM >To: [email protected] >Subject: (fwd) Problem with 'DB2-REXX via JCL'. > >More people can see your question if you post to the listserv rather than >the newsgroup. > >I'd first look at your JCL STEPLIB. Is the library with RXSUBCOM present? > >-- forwarded message -- >Newsgroups: bit.listserv.ibm-main >Date: Mon, 3 Aug 2015 06:32:49 -0700 (PDT) >Subject: Problem with 'DB2-REXX via JCL'. >From: [email protected] > >I have a REXX-DB2 program that uses the DSNREXX program to connect with the >DB2 subsystem and fetches some records from a table. > >THe problem now is that when i run this rexx directly as a standalone, it >works like a charm and returns the results. >Whereas, when i run this through a JCL call (Using IKJEFT01), it fails with a >RC=20 on the DSNREXX add step as follows: > >ADDRESS TSO "SUBCOM DSNREXX" >IF RC THEN >S_RC = RXSUBCOM('ADD','DSNREXX','DSNREXX') << THIS STEP FAILS WITH RC = 20 >ADDRESS DSNREXX "CONNECT " DBXX <RC = (-3) > >I am unable to keep my finger on the problem. Can anyone help with this? > >-- >Don Poitras - SAS Development - SAS Institute Inc. - SAS Campus Drive >[email protected] (919) 531-5637 Cary, NC 27513 > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
