Skip to main content

Hi,

Normally we use STOP RUN to end the COBOL program. When i compile and run the JCL i get the following error:

Error executing service 'PGM#PAB001' Execution error : file 'C:\\IGATE\\LOADLIB\\PAB001.int' error code: 198, pc=20A0, call=1, seg=0 198

But when i replace "STOP RUN" with "EXIT PROGRAM" in COBOL, the JOB runs properly.

Please help me in understanding the problem when using STOP RUN.

Regards,

Senthil


#netexpress

Hi,

Normally we use STOP RUN to end the COBOL program. When i compile and run the JCL i get the following error:

Error executing service 'PGM#PAB001' Execution error : file 'C:\\IGATE\\LOADLIB\\PAB001.int' error code: 198, pc=20A0, call=1, seg=0 198

But when i replace "STOP RUN" with "EXIT PROGRAM" in COBOL, the JOB runs properly.

Please help me in understanding the problem when using STOP RUN.

Regards,

Senthil


#netexpress

Normally there should be no issues with using STOP RUN to terminate a program running under JES. Many of our examples use it.

RTS error 198 is "program not found", which suggests that your application is trying to call a routine (from the PAB001 program) it hasn't previously called when the STOP RUN is performed. Does your application install any COBOL exit procedures (eg with the CBL_EXIT_PROC library routine)?

Our recommendation:

  1. Configure CTF (Consolidated Trace Facility) tracing for the region. This is described in the product documentation (look for "CTF" in the index). Use the BINFILE emitter to produce traces for Micro Focus support use.
  2. In the CTF configuration, enable the COBOL RTS trace options #PGM, #SYSPGM, #API, and #SIGNAL.
  3. Start the region and reproduce the problem.
  4. Contact Micro Focus Customer Care to open a support incident.
  5. Attach the CTF trace files and the region's console log and job log to the support incident.

Terms & ConditionsAccessibility statement