View previous topic :: View next topic
|
Author |
Message |
Sangita
New User
Joined: 02 Jun 2005 Posts: 17
|
|
|
|
Hi All,
Please let me know how to return a code to the job from Natural PGM like we do in COBOL without abending the job. If we use TERMINATE statement with code >0, then it will abend, which I dont want to happen & STOP will stop the process but does not return any code. I want to skip the processing of subsequent steps after the NATURAL Pgm depending on the return code from the PGM. Please let me know how we can do it? |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
You are correct that you can't set RETURN-CODE like in COBOL; however, for me, TERMINATE in batch simply ends the job with the return code I supplied.
O. |
|
Back to top |
|
|
Sangita
New User
Joined: 02 Jun 2005 Posts: 17
|
|
|
|
Hi,
Is there any other way to return code in Natural other than TERMINATE statement? If u have please send me with ex. Also, send me the code for which ur jot getting an abend. |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
There is no method in NATURAL to put values in registers.
Here is my example, which ends the job with RC=13:
O. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello Sangita,
Please post the abend information you get when you issue the terminate. It will be in one or more of the sysout datasets. |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
The default is CMPRINT, but it may also be in CMPTR01.
O. |
|
Back to top |
|
|
|