Return Code of -3



TSO Programming, ISPF, SDF, SDSF and PDF, FTP, TCP/IP Concepts, SNA & SNA/IP etc...

Return Code of -3

Postby nikesh_rai » Wed Feb 20, 2013 11:40 pm

Hi,

I have to submit a REXX through JCL. I have tried it through a simple REXX but getting RC -3 in Sysout. Can you please help me.. this is the first time I am executing a REXX through JCL.. here is my JCL

//STEP001  EXEC PGM=IRXJCL,PARM='TSTREXX'           
//SYSEXEC  DD DISP=SHR,DSN=DPFCB.D393990.ISPCLIB   
//OUTDD    DD SYSOUT=*                             
//SYSTSPRT DD SYSOUT=*                             
//SYSPRINT DD SYSOUT=*                             
//SYSOUT   DD SYSOUT=*                             
//SYSTSIN  DD DUMMY,BLKSIZE=80                     
//SYSIN    DD DUMMY                                 
//                                                 


Here is the REXX
/*------------------ Tyrannosaurus REXX ------------------------------*/
    Address ISPEXEC                                                     
                                                                       
    "Control errors return"                                             
                                                                       
    "DISPLAY PANEL(PAN11) "                                             
                                                                       


and the sysout is

     4 *-* "Control errors return"     
       +++ RC(-3) +++                 
     6 *-* "DISPLAY PANEL(PAN11) "     
       +++ RC(-3) +++                 


Can you please help me out to resolve this one.. :)
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: Return Code of -3

 

Re: Return Code of -3

Postby prino » Wed Feb 20, 2013 11:57 pm

You're trying to use ISPF functions outside of ISPF, all ISPF libraries are missing in your JCL.
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
User avatar
prino
 
Posts: 536
Joined: Wed Mar 11, 2009 12:22 am
Location: Oostende, Belgium
Has thanked: 3 times
Been thanked: 21 times

Re: Return Code of -3

Postby enrico-sorichetti » Wed Feb 20, 2013 11:58 pm

and ... using irxjcl will prevent from using TSO commands and facilities
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2643
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 130 times

Re: Return Code of -3

Postby nikesh_rai » Thu Feb 21, 2013 12:03 am

Thanks Prino/Enrico,

Can you please give me some hints on this..
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: Return Code of -3

Postby enrico-sorichetti » Thu Feb 21, 2013 12:14 am

running ISPF in batch has been discussed so many times that it has become a pretty boring subject
carry on a bit of research Yourself on this same forum or on the companion forum
http://ibmmainframes.com
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2643
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 130 times

Re: Return Code of -3

Postby nikesh_rai » Thu Feb 21, 2013 1:04 pm

I have modified my jcl to include all ISPF libs. Yet getting 'massage not found' error..

3 *-* ADDRESS ISPEXEC "ISPLLIB"                                       
       +++ RC(-3) +++                                                       
     4 *-* Address ISPEXEC "Control errors return"                         
       +++ RC(-3) +++                                                       
     6 *-* Address ISPEXEC "DISPLAY PANEL(PAN11) "                         
       +++ RC(-3) +++                                                       
READY                                                                       
  ISPSTART                                                                 
CMG999   Message ISPT036 - ISPT036  message not found in 'ISPMLIB' library.
READY                                                                       
END


My JCL looks like:

//STEP001  EXEC PGM=IKJEFT01,PARM='TSTREXX'         
//SYSEXEC  DD DISP=SHR,DSN=DPFCB.D393990.ISPCLIB     
//ISPPROF  DD DISP=SHR,DSN=DPFCB.D393990.VIL.ISPPROF
//         DD DISP=SHR,DSN=DPFCB.D393990.F01.ISPPROF
//ISPMLIB  DD DISP=SHR,DSN=DPFCB.D393990.ISPMLIB     
//ISPPLIB  DD DISP=SHR,DSN=DPFCB.D393990.ISPPLIB     
//ISPSLIB  DD DISP=SHR,DSN=DPFCB.D393990.ISPSLIB     
//ISPTLIB  DD DISP=SHR,DSN=DPFCB.D393990.ISPTLIB     
//SYSPROC  DD DISP=SHR,DSN=DPFCB.D393990.ISPCLIB     
//OUTDD    DD SYSOUT=*                               
//SYSTSPRT DD SYSOUT=*                               
//SYSPRINT DD SYSOUT=*                               
//SYSOUT   DD SYSOUT=*                               
//SYSTSIN  DD *                                     
  ISPSTART                                           
//SYSIN    DD DUMMY                                 
//                                                   


I am also not sure if I need to define more parameters with ISPSTART. I have googled and got some clue but didn't understand it:

//SYSTSIN  DD *
    PROFILE PREFIX(userid)
    ISPSTART CMD(%TEMPNAME) NEWAPPL(ISR)


Please help me... :)
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: Return Code of -3

Postby nikesh_rai » Thu Feb 21, 2013 2:47 pm

I got it where is the issue.. gone through the manuals... problem is with
Address ISPEXEC "DISPLAY PANEL(PAN11)"


Just for the viewers..

We can not throw a panel if we are executing REXX routine from a JCL. We generally invoke such REXX rountines from JCL which do some processing and do not need any communication in the form of panels. If panels are being used, then use REXX in the foreground.


Thanks Enrico/Prino... :)
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time


Return to TSO & ISPF

 


  • Related topics
    Replies
    Views
    Last post