Description
Can you supply me with sample JCL to pack or terse data to be sent to CA?
Solution
//JOBCARD //**************************************************** //* TRSMAIN WITH PACK OPTION * //*** SEE SYSX.SYS.DOCLIB(TRSMAIN) FOR INSTRUCTIONS * //* INPUT PARAMETERS: * //* PARM=PACK --> PACK INFILE INTO OUTFILE * //* PARM=UNPACK > UNPACK INFILE INTO OUTFILE * //**************************************************** //JOBLIB DD DISP=SHR,DSN=DIST.TRSMAIN.LOADLIB //STEP1 EXEC PGM=TRSMAIN,PARM=PACK //SYSPRINT DD SYSOUT=X //INFILE DD DISP=SHR, // DSN=INPUT.MVS.DATASET //OUTFILE DD DISP=(NEW,CATLG), // DSN=OUTPUT.MVS.DATASET // SPACE=(CYL,(350,2),RLSE) //*
Sample JCL above is tested.
TRSMAIN is shipped with SMP/e and should be Linklisted. STEPLIB / JOBLIB may not be needed.