COBOL nested programs are structured like this:
Id division.
Program-id. Outer-program.
Procedure division.
Call "Inner-1".
Stop run.
Id division.
Program-id. Inner-1
...
Call Inner-1a.
Stop run.
Id division.
Program-id. Inner-1a.
...
End Inner-1a.
End Inner-1.
End Outer-program.
See section "2.1.1 Nested programs" in the COBOL Language Reference manual.
Basically I think it is telling you to make the error handler a nested separate
routine with its own ID DIVISION and PROGRAM-ID instead of making it an ENTRY.
Don't forget to check out the COMMON and INITIAL attributes on the PROGRAM-ID
paragraph as well.
HTH
Peter
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Hardee, Chuck
Sent: Friday, August 05, 2016 10:18 AM
To: [email protected]
Subject: Another COBOL question
Thanks to everyone that responded to my previous question about generating link
statements from the compiler.
The answer was to use the NAME(ALIAS) PROCESS statement.
I now am looking for some further insight.
<Snipped>
There is, however, a warning that an error handler should be issued in a COBOL
nested environment.
Unfortunately, it doesn't describe a COBOL nested environment.
Thanks in advance,
Chuck
--
This message and any attachments are intended only for the use of the addressee
and may contain information that is privileged and confidential. If the reader
of the message is not the intended recipient or an authorized representative of
the intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication
in error, please notify us immediately by e-mail and delete the message and any
attachments from your system.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
