Cobol Nested Program Example

12/01
42

Cobol Nested Program Example

Posted in:

U046 not enough or no sort work space allocated. Introduction SimoREC1 a COBOL Record Layout and Content Conversion Utility Program is currently available as a Controlled Release Option CRO and is an addon to. COBOL k o b l, an acronym for common businessoriented language is a compiled Englishlike computer programming language designed for business use. Cobol Nested Program Example' title='Cobol Nested Program Example' />Ja. Tomes Help IBM VS Cobol II Run Time Messages. The following messages pertain to COBOL. Each message is followed by an. The messages also contain a symbolic feedback code, which represents the. You can think of the symbolic. Mainframe Migration. COBOL to Java Whitepaper Contents CONTENTS. COPY COPY Statement is compiler directive statement. This places the prewritten text in a COBOL program during compilation time. COPY statement in COBOL is Replaced. As such, the symbolic. The messages in this section contain alphabetic suffixes that have the. I Informational message. W Warning message. E Error message. S Severe error message. C Critical error message. IGZ0. 00. 2SIGZ0. WIGZ0. 00. 5SIGZ0. SIGZ0. 00. 7SIGZ0. CIGZ0. 01. 1CIGZ0. SIGZ0. 01. 3SIGZ0. WIGZ0. 01. 5SIGZ0. WIGZ0. 01. 7SIGZ0. SIGZ0. 01. 9WIGZ0. SIGZ0. 02. 1CIGZ0. WIGZ0. 02. 3SIGZ0. SIGZ0. 02. 6WIGZ0. WIGZ0. 02. 8SIGZ0. SIGZ0. 03. 0SIGZ0. SIGZ0. 03. 2SIGZ0. SIGZ0. 03. 4WIGZ0. SIGZ0. 03. 6WIGZ0. SIGZ0. 03. 8SIGZ0. SIGZ0. 04. 0SIGZ0. WIGZ0. 04. 2CIGZ0. SIGZ0. 04. 5SIGZ0. WIGZ0. 04. 7SIGZ0. WIGZ0. 04. 9WIGZ0. SIGZ0. 05. 1SIGZ0. CIGZ0. 05. 3SIGZ0. WIGZ0. 05. 5WIGZ0. WIGZ0. 05. 7SIGZ0. SIGZ0. 05. 9WIGZ0. WIGZ0. 06. 1SIGZ0. SIGZ0. 06. 4SIGZ0. SIGZ0. 06. 6SIGZ0. SIGZ0. 06. 8SIGZ0. SIGZ0. 07. 0SIGZ0. SIGZ0. 07. 2SIGZ0. SIGZ0. 07. 4SIGZ0. SIGZ0. 07. 6WIGZ0. WIGZ0. 07. 8SIGZ0. SIGZ0. 08. 0SIGZ0. CIGZ0. 09. 7SIGZ0. CIGZ0. 09. 9CIGZ0. SIGZ0. 10. 8SIGZ0. SIGZ0. 15. 2SIGZ0. SIGZ0. 15. 5SIGZ0. SIGZ0. 15. 7SIGZ0. SIGZ0. 15. 9SIGZ0. SIGZ0. 16. 1SIGZ0. SIGZ0. 16. 3SIGZ0. CIGZ0. 16. 5SIGZ0. SIGZ0. 16. 7SIGZ0. SIGZ0. 16. 9WIGZ0. SIGZ0. 17. 2WIGZ0. WIGZ0. 20. 1WIGZ0. WIGZ0. 20. 3WIGZ0. WIGZ0. 20. 5WIGZ0. WIGZ0. 20. 7WIGZ0. SIGZ0. 21. 1S. IGZ0. S debugging information. Explanation A SYNAD error has occurred on a QSAM file. The text was. supplied by the system SYNADAF routine. Since the debugging information. CMS and MVS environments. The message issued under MVS consists. IGZ0. 00. 2S job name, step name, unit address, device. The message issued under CMS is as follows. IGZ0. 00. 2S 1. 20. S operation type ERROR nnn ON ddname. Definitions requiring further explanation for the above message formats. S is the CMS message number for SYNAD errors. INPUT or OUTPUT. device type UR for unit record device. TA for magnetic tape device. DA for direct access device. DDNAME of the related file. Programmer Response For more information regarding the CMS message. S and related error codes, see VMSP System Messages and Codes. SC1. 9 6. 20. 4. For information on the MVS text of this SYNAD message, see. Data Administration Macro Instruction Reference, GC2. Data. Administration Guide, GC2. System Action The application was terminated. IGZ0. 00. 3W A logic error occurred for file file name in program program name. Explanation This error is usually caused by an IO operation request. WRITE into a file opened. INPUT, or a START to a VSAM ESDS. A file status clause was specified or an error declarative statement was. Programmer Response Check the operation request and modify the program. System Action No system action was taken. IGZ0. 00. 5S OSVS COBOL programs in the application were found in multiple. Game Diggy Hacked. Explanation OSVS COBOL programs are restricted to one enclave within an. Programmer Response Modify the application so that the OSVS COBOL. System Action The application was terminated. IGZ0. 00. 6S The reference to table table name by verb number verb number on. Explanation When the SSRANGE option is in effect, this message is issued. The range check was performed on the composite of the subscripts and. For. variable length tables, the address is outside the region of the table. OCCURS DEPENDING ON objects are at their maximum values. ODO objects current value is not considered. The check was not. Programmer Response Ensure that the value of literal subscripts andor. System Action The application was terminated. IGZ0. 00. 7S The reference to variable length group group name by verb number. Explanation When the SSRANGE option is in effect, this message is issued. OCCURS DEPENDING ON. OCCURS DEPENDING ON clauses. The range check was performed on the composite length of the group, and. OCCURS DEPENDING ON objects. Programmer Response Ensure that OCCURS DEPENDING ON objects as evaluated. System Action The application was terminated. IGZ0. 00. 9C A delete of module module name was unsuccessful. Explanation An attempt to delete a module failed. Programmer Response See your IBM service representative. System Action The application was terminated. IGZ0. 01. 1C module name was not a proper module for this system environment. Explanation A library subroutine that is system sensitive is. For example, an OS. CICS. The likely causes. Improper concatenation sequence of partitioned data sets that contain. COBPAC. An attempt to use a function unsupported on the current system for. ACCEPT on CICS. Programmer Response Check for the conditions stated above, and modify. System Action The application was terminated. IGZ0. 01. 2S There was an invalid attempt to end a sort or merge. Explanation A sort or merge initiated by a COBOL program was in progress. A STOP RUN was issued. A GOBACK or an EXIT PROGRAM was issued within the input procedure or. COBOL program that initiated the sort or. Note that the GOBACK and EXIT PROGRAM statements are allowed. A user handler associated with the program that initiated the sort or. Programmer Response Change the application so that it does not use one. System Action The application was terminated. IGZ0. 01. 3S An error return code return code came from a CICS command. CICS command issued by library subroutine library subroutine. Explanation An error was encountered when a run time routine issued a. CICS command. The error return code is from the field EIBRESP in the CICS. EIB. For more information about the values for the field EIBRESP, see the. CICSESA Application Programmers Reference. Programmer Response Modify your application as required. System Action The application was terminated. IGZ0. 01. 4W module name is no longer supported. Its content was ignored. Explanation This message is issued when the run time detects that. IGZETUN or IGZEOPT is linked with the application. IGZETUN and IGZEOPT. LE3. 70. CEEUOPT may be used in place of. IGZETUN and IGZEOPT. Programmer Response Remove the explicit INCLUDE of IGZEOPT or IGZETUN. System Action No system action was taken. IGZ0. 01. 5S A recursive call was attempted to a program that was already. The program name is program name. Explanation An illegal recursive entry to an active program is detected. For example, Program A has CALLed Program B, and Program B is CALLing. Program A. Programmer Response Remove the recursive call to program name or specify. IS RECURSIVE phrase on the PROGRAM ID statement for the recursively. CALLed program. Additionally, if the recursive program is called. REUS. System Action The application was terminated. IGZ0. 01. 6W Program program name could not be deactivated by non return exit. Subsequent reentry is not supported. Explanation A COBOL program cannot normally be recursively entered. When non return style procedure collapse processing is being performed for. COBOL program, an attempt is made to reset the program to a state where. This is not supported for certain. After this message is. IGZ0. 01. 5S. and termination of the enclave. Programmer Response Do not reenter the program or modify the program to. System Action No system action was taken. IGZ0. 01. 7S The open of DISPLAY or ACCEPT file with environment name. Explanation An error occurred while opening the DISPLAYACCEPT. Programmer Response Check to make sure a ddname has been defined for the. System Action The application was terminated.