IBM Mainframe Forum

Mainframe Technical Support Forums

Skip to content


Return Code of -3



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

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

Select all
//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
Select all
/*------------------ Tyrannosaurus REXX ------------------------------*/
    Address ISPEXEC                                                     
                                                                       
    "Control errors return"                                             
                                                                       
    "DISPLAY PANEL(PAN11) "                                             
                                                                       


and the sysout is

Select all
     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: 205
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time
Top

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: 641
Joined: Wed Mar 11, 2009 12:22 am
Location: Vilnius, Lithuania
Has thanked: 3 times
Been thanked: 29 times
Top

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: 3006
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 165 times
Top

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: 205
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time
Top

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: 3006
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 165 times
Top

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..

Select all
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:

Select all
//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:

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


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

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
Select all
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: 205
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time
Top
Post a reply

Return to TSO & ISPF

 


  • Related topics
    Replies
    Views
    Last post
Forum Rules|FAQ|Subscriptions|Bookmarks