z/VSE Job Control Language › Assembling the CICS/Transparency Interface (ETOTCINT)

Assembling the CICS/Transparency Interface (ETOTCINT)

The following is the JCL you use to assemble the CICS/transparency interface (ETOTCINT).

Note: For more information about the ETOTCINT syntax, see the Runtime Operations Phase.

ETOTCINT (z/VSE)

*
// LIBDEF *,SEARCH=(idms.sublib)
// DLBL    IJSYSPH,'user.txtfile',0
// EXTENT  SYSPCH,nnnnnn,,,ssss,llll
   ASSGN   SYSPCH,DISK,PERM,VOL=nnnnnn,SHR
// OPTION  DECK,NOLINK,NOEDECK,LIST,NORLD,NOXREF
// EXEC    ASSEMBLY
         PUNCH 'ACCESS SUBLIB=idms.sublib'
         PUNCH 'CATALOG etotcint.OBJ REPLACE=YES'
ETOTCINT macro statements
         END
/*
   CLOSE   SYSPCH,00D
// DLBL    IJSYSIN,'user.txtfile',0
// EXTENT  SYSIPT,nnnnnn
   ASSGN   SYSIPT,DISK,PERM,VOL=nnnnnn,SHR
// EXEC    LIBR,PARM='MSHP'
/*
   CLOSE   SYSIPT,SYSRDR
/*