Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Negative Value for RETURN-CODE... is it possible?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
lseril

New User


Joined: 26 Oct 2005
Posts: 2

PostPosted: Wed Oct 26, 2005 2:24 am    Post subject: Negative Value for RETURN-CODE... is it possible?
Reply with quote

How will JCL/JES2 behave if I force the value of RETURN-CODE in COBOL to a negative number? For example, i mistakenly set it to the SQL error code like -805.

Will JCL/JES2 default it to a particular value since the range of JCL return codes is between 0 and 4095 only?

Could you provide references or links to support the answer for this?

I currently have a problem wherein I mistakenly set the RETURN-CODE register in a COBOL program to the SQL error code but my job still ends normally with RC=00 on the supposedly abending step.

I appreciate any help on this topic. Thanks!
Back to top
View user's profile Send private message

ikumar

New User


Joined: 02 Aug 2005
Posts: 81

PostPosted: Wed Oct 26, 2005 10:49 am    Post subject: Re: Negative Value for RETURN-CODE... is it possible?
Reply with quote

I am not sure whether it accepts negative return codes or not.
But i can give you one reason why it is giving RC=00 even though you have forced it to -805. Juct check, whether do u have any CALLs to subprograms after you set the retunr-code to -805. because it resets the retunr-code when the call to sub program is successful.

correct me if i m wrong....

Thanks,
Kumar.
Back to top
View user's profile Send private message
lseril

New User


Joined: 26 Oct 2005
Posts: 2

PostPosted: Wed Oct 26, 2005 11:49 am    Post subject: Re: Negative Value for RETURN-CODE... is it possible?
Reply with quote

Hi Kumar,

We do have a called program and it's passing a return code value to the calling program, will in turn will be MOVEd into the RETURN-CODE register right before ending the execution. However, we realized it's has been passing SQLCODE values which can be negative. This is easy to resolve however I'm puzzled by the way JCL/JES2 message interprets negative values.

We're quite sure that the RETURN-CODE value is -805 because we DISPLAYed it in the SYSOUT but I'm confused why JCL/JES2 changes it to RC=00.

Thanks for the response,
Leo
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts IDEAL - Code Retrieval yugendran CA Products 0 Fri Nov 25, 2016 3:27 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us