MacKinney Systems, Inc.

Q:  

How do you print a CICS dump out of Dump Detective?


A:

// JOB DTCPRT11 EXTRACT DUMPS
// LIBDEF PHASE,SEARCH=your.DTEC.LIB
// DLBL DTECDFL,'your.DTEC.DUMP.FILE',,VSAM,CAT=yourcat
// DLBL DTECDMP,'your.DTEC.DUMP.PRINT',0,VSAM,CAT=yourcat,          X
               RECORDS=500,RECSIZE=4096
// EXEC DTECCPRT,SIZE=AUTO
SELECT ID=xxx
*
// DLBL DFHDUMP,'your.DTEC.DUMP.PRINT',0,VSAM,CAT=yourcat
// EXEC DFHDU410,PARM='SINGLE,TRANSLATE=FOLD'     TS 1.1    *** choose the correct program
// EXEC DFHDUP,SIZE=80K,PARM='TRANSLATE=LC'       CICS 2.3  *** for your CICS release
/*
/&