Recommended Reading

Sample REXX code for CMS

Here are a selection of useful routines which could easily be tailored to suit any installation.

This was developed on a site where an automated amend routine was in place which made col 80 non blank for modified code and allowed identification of modifications simple.

GENCOV EXEC EXEC Adds coverage code to COBOL programs.
The other GENCxxx files are held in CMS with ft DATA.
After the program is run the syslst ouput must be stored in CMS as <program> TEST1 (TEST2 TEST3 etc for multiple runs).

GENCWS Added by GENCOV EXEC to WORKING STORAGE of program.

GENCPD Added by GENCOV EXEC to PROCEDURE DIVISION of program.

GENCPDC Added by GENCOV EXEC to PROCEDURE DIVISION of CICS programs.

GENCPDB Added by GENCOV EXEC to PROCEDURE DIVISION of Batch programs.

COVERAGE EXEC EXEC run against the TESTn files and combines the termination statistics.

The output is a summary of code coverage and a list of the procedure division showing execution counts against each verb.

COVEXT EXEC When testing subroutines or CICS programs the syslst will probably contain a large number of termination reports.
COVEXT EXEC extracts them and combines the data into a single file named <program> TEST1 A

Back to sample list



© Copyright IT Doctors.co.uk. 2002