DC090002 or program checks in dc-cobol programs

Products

• IDMS
• IDMS - Database

Issue/Introduction

If an online DC COBOL program is not defined to the System Generation, it may result in program checks and other unpredictable errors, or a DC090002 abend.

Environment

Release: All supported releases.

Resolution

Online DC COBOL programs MUST be defined to the System Generation.

Normally, an attempt to run a DC COBOL program which has not been defined to SYSGEN will result in a specific and accurate error message such as DC171030 or a 3020 error-status.

However, there are some scenarios where a NULL PDE can be built for a DC COBOL program which is not previously defined to the SYSGEN. This NULL PDE will be built with TYPE UNDEFINED and LANGUAGE ASSEMBLER. Such a definition can cause the unpredictable results when the program is executed.

The scenarios which can cause this situation are as follows:

1. The LOOK or SHOWMAP task code is run with the program in question as input.
2. IDMS/DC support for LE runtime may cause the program to be defined with the NULL PDE when loaded.

The ultimate solution is to define the program to SYSGEN with LANGUAGE IS COBOL. Programs can also be dynamically defined to the system with the following command:

DCMT VARY DYNAMIC PROGRAM program-name COBOL.

However such a definition lasts only as long as the CV is active. For definitions to be persistent across a CV shutdown, they must be defined to the SYSGEN.