Using the CWDDUNLP Source Extraction utility

The CWDDUNLP utility is designed to extract source from a DDIO source listing file. Use of this utility is limited by the caution and notes supplied here. To invoke this utility, see the JCL here or reference install lib member CXDDUNLP.

//JOBNAME JOB ('XXXXXXXXXXXX'),REGION=0K, <--- CHECK
// CLASS=A,MSGLEVEL=(1,1),MSGCLASS=A
//*
//******************************************************************
//* SAMPLE JCL TO EXECUTE CWDDUNLP
//* example JCL can also be found in install lib member (CXDDUNLP)
//******************************************************************
//*
//STEP1 EXEC PGM=CWDDUNLP,PARM=NAME OR NNNN <--- CHECK
//STEPLIB DD DISP=SHR,DSN=COMPWARE.LCXNNN.SLCXLOAD <--- CHECK
//SYSPRINT DD SYSOUT=*
//SLSF0001 DD DISP=SHR,DSN=YOUR.SOURCE.LISTING.FILE <--- CHECK
//CWPSRC DD DISP=SHR,DSN=YOUR.EXTRACTED.SOURCE <--- CHECK
//CWPCPY DD DSN=YOUR.EXTRACTED.COPYLIB, <--- CHECK
// DISP=(NEW,CATLG,DELETE),
// DSORG=PO,LRECL=80,BLKSIZE=800,RECFM=FB,
// SPACE=(CYL,(10,01,3),RLSE)

Warning

The use of this utility is not intended as a replacement for keeping your original source.

Notes:

1. CWDDUNLP supports COBOL and PL/I only.

2. The CWPCPY DD is optional and works in conjunction with COBOL copybooks only.

3. CWDDUNLP runs under MVS, OS/390 platforms.

4. The output from CWDDUNLP may not be comparable to the original source.

5. Nested COBOL copy books may not appear correctly.

A parameter is passed to CWDDUNLP on the EXEC card, to specify ‘program name' or the source listing file ‘number'. If the parm passed to CWDDUNLP is numeric, the DDIO file open will be by source file number, all other opens will be by 'program name'.

Examples:

//STEP1 EXEC PGM=CWDDUNLP,PARM=PROGRAM1
//STEP1 EXEC PGM=CWDDUNLP,PARM=NNNN

The use of a STEPLIB is optional, but you must use the latest version of (ECC/CSS) available. This utility may not function if extracting a source member stored with a later version of (ECC/CSS) than the utility itself.

The SYSPRINT DD will display a small report detailing the utilities actions.

The SLSF0001 DD statement should point to your shop’s source listing file. Multiple DDIO source listing files can be specified by including additional DD statements, SLSF0002 through SLSF0006. All SLSFnnnn files are input source listing files.

The CWPSRC DD is a required statement. It should specify an LRECL=80 output sequential file. It will contain the extracted source member after successful job completion.

The CWPCPY DD is not required (if provided, COBOL copy books will be placed as members within this PDS). If this DD is removed, all copy books are placed in stream with the CWPSRC source. If the COBOL source contains a ‘COPY replacing' verb, the copy book will be placed within the CWPSRC as in stream source.

The following table lists common return codes from the CWDDUNLP DDIO Source Extraction Utility. Many are not user recoverable. Contact BMC Support if necessary.

CWDDUNLP Return Codes

Return Code	Message
0080	GETMAIN FAILURE, could not obtain needed storage space.
0081	VECTOR REQUEST BLOCK BUILD PROBLEM, check version of (ECC,CSS), or call BMC AMI COMMON SHARED SERVICES SUPPORT.
0082	REGION VECTOR ERRORS, check version of (ECC,CSS), or call BMC AMI COMMON SERVICES SUPPORT.
0083	ASSOCIATE VECTOR ERRORS, check version of (ECC,CSS), or call BMC AMI COMMON SERVICES SUPPORT.
0084	SPAWN VECTOR ERRORS, check version of (ECC,CSS), or call BMC AMI COMMON SERVICES SUPPORT.
0085	ASSOCIATE VECTOR WITH RQB ERRORS, check version of (ECC,CSS), or call BMC AMI COMMON SERVICES SUPPORT.
0086	SYSPRINT DD PROBLEM, check LRECL=133 and compatible BLKSIZE.
0087	CWPSRC DD PROBLEM, check LRECL=80 and compatible BLKSIZE.
0088	LOAD FAILED FOR CWPIDRVB, check version of (ECC,CSS), or call BMC AMI COMMON SERVICES SUPPORT.
0089	DDIO VERSION IS NOT EQUAL TO CWDDUNLP, check version of (ECC,CSS), or call BMC AMI COMMON SERVICES SUPPORT.

Using the CWDDUNLP Source Extraction utility

Examples:

On this page