CA IDMS LOOK PROGRAM DC028001 COBOL VERSION

Products

• IDMS
• IDMS - Database
• IDMS - ADS

Issue/Introduction

CA IDMS issuing LOOK PROGRAM=nnnnnn  for a program that i s not COBOL fails with:

DC028001 TASK:LOOK PROG:RHDCLOOK; VERSION OF COBOL COMPILER IS NOT RECOGNIZABLE
COBOL-BAD COMPILER/OPTION/VERB

Environment

z/OS and z/VSE operating systems.

Cause

IDMS thinks the program is COBOL because there must be a program definition in the SYSGEN for the program defined with LANGUAGE IS COBOL. Issue the following command to check the program definition:

DCMT D PROG nnnnnnnn

It will show if the program is defined with a language of COBOL

When you add a program to the SYSGEN if you don't specify a language it defaults to COBOL. So most likely when the program was added no language was specified so it defaulted to COBOL.
 

Resolution

Modify the program definition to specify the correct language.

To fix the currently running system use the DCMT VARY PROGRAM command.
For example to change it to assembler:

DCMT VARY PROGRAM nnnnnnn DEFINE LANGUAGE ASSEMBLER

To make the change permanent modify the program in the SYSGEN and re-generate the system. In the SYSGEN compiler:

MOD SYS xxx.
MOD PROGRAM nnnnnnn LANG ASSEMBLER.
GEN.

Additional Information

See DocOps section DCMT VARY PROGRAM and PROGRAM Statement -- Defines and Associates a Program