Thanks. I will try it tomorrow.
Tony Thigpen
(K.K.Paradox)T.Kobayashi wrote on 4/21/21 10:16 PM:
Hello Tony,
Here is GTF trace print JCL:
a) You need to modify it for your environment (DSN, VOLUME, etc...).
b) INPUT DD of the IKJEFT01 step specifies the GTF trace file.
This sample trace file is tape file.
c) The report is output to the JES spool,if you need to report to disk.
Change the SYSTSPRT DD card to VBA datasets.
d) Specify your required trace with the GTF xxx command on SYSTSIN DD card.
This sample is CCW trace.
//GTFPRINT JOB CLASS=A
//ST1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEFINE CLUSTER(NAME(KOBA.IPCS.DIR) VOLUME(WORK01)) -
DATA(NAME(KOBA.IPCS.DIR.DATA) CYL(1 1) KEYS(128 0) -
CISZ(X'1000') ) -
INDEX(NAME(KOBA.IPCS.DIR.INDEX) TRK(1 1) )
/*
//IPCS EXEC PGM=IKJEFT01,DYNAMNBR=20
//IPCSDDIR DD DSN=KOBA.IPCS.DIR,DISP=SHR
//***IPCSPARM DD DSN=
//INPUT DD DSN=SYS1.TRACE,DISP=SHR,VOL=SER=GTRACE,UNIT=/4000,
// LABEL=(1,SL,EXPDT=98000)
//SYSPROC DD DSN=SYS1.SBLSCLI0,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
IPCSDDIR 'KOBA.IPCS.DIR'
IPCS NOPARM
SETDEF DDNAME(INPUT) NOCONFIRM
SETDEF LIST
GTF CCW
END
/*
//STLAST EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE (KOBA.IPCS.DIR)
/*
I hope this help.
Best regards,
Toyokazu Kobayashi
----- Original Message ----- From: "Tony Thigpen" <t...@vse2pdf.com>
Newsgroups: bit.listserv.ibm-main
To: <IBM-MAIN@LISTSERV.UA.EDU>
Sent: Thursday, April 22, 2021 4:15 AM
Subject: Printing GTF trace?
All,
I have generated a GTF trace for a vendor, but how do I generate a
print report of the formatted entries so I can send them to a vendor?
I can browse the formatted entries in IPCS, but I am new to IPCS and
don't know how to tell it to print the entire report.
Tony Thigpen
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
