COBOL Load Module Analyzer

 

If you have any questions about the content of this page, please contact Requests for clarification.

 

This utility will display many details about  COBOL load modules. Date and time of the last  compile, the level of the COBOL compiler used, the  compile option can all be listed.

This utility can run against an entire load library, or it can be asked to  select similarly name load modules. It will analyze CICS as well as batch COBOL  modules.

This program is for COBOL modules only. It will give a condition code 8 if asked  to fully analyze a non COBOL module.

An example of the short-report follows:

PROGRAM:ABDPRT    Date:1988,JUN.24- 9:56:10   OS/VS COBOL Release R1
PROGRAM:NWDATER   Date:2000/01/20-10:52:20    COBOL/370 Version 01 Release 02  Mod-Level 02
PROGRAM:NWDUMMY                    Unknown language type
PROGRAM:NWELAPDS  Date:2000/01/13-11:49:43    COBOL/370 Version 01 Release 02  Mod-Level 02
PROGRAM:NWFAWEBN  Date:2001/04/05-11:19:18    COBOL/370 Version 01 Release 02  Mod-Level 02
PROGRAM:NWHELPS   Date:2001/02/01-12:58:41    COBOL/370 Version 01 Release 02  Mod-Level 02
PROGRAM:NWHEXCHA  Date:1994/09/25/-00:11:22   COBOL/2 Version 1. Release 4.  Mod-Level 0

The format of the compile date will vary somewhat depending on the age of the module.

The full report is too long to list here. It includes the compile options used, a summary of the types of COBOL instructions used, and CICS pre-compiler options in effect. It is a full two pages in length.

Some examples of this program’s invocation follow:

Full report of all load modules
            // EXEC NWCOBALZ,LOADLIB=XXX.LOADLIB,PARM='ALL'
Short report of all load modules
      // EXEC NWCOBALZ,LOADLIB=XXX.LOADLIB,PARM='ALL,S' 

Full report on a single load module
      // EXEC NWCOBALZ,LOADLIB=XXX.LOADLIB,PARM='NWNWPM'
 
Short report of a single load module
      // EXEC NWCOBALZ,LOADLIB=XXX.LOADLIB,PARM='NWNWFM,S'

Full report on any module whose name starts with NWNWTM
      // EXEC NWCOBALZ,LOADLIB=XXX.LOADLIB,PARM='NWNWTM*'
Full report on any load module whose name has “NW” in it somewhere
      // EXEC NWCOBALZ,LOADLIB=XXX.LOADLIB,PARM='*NW*'

Short report on any load module whose name has “NW” in the 3rd and 4th position
      // EXEC NWCOBALZ,LOADLIB=XXR.LOADLIB,PARM='??NW*,S'

 

To summarize the wild card usage: The “?” represents ANY one character and the  “*” represents any one or more characters.