thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
Hi All ,
| Code: |
//SORT EXEC PGM=SORT,REGION=5000K
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=SMF DATASET WITH TYPE 15 RECORDS
//SORTOUT DD DISP=(NEW,PASS),DSN=&&TEMP,
// SPACE=(CYL,(50,20),RLSE),DCB=*.SORTIN
//SYSIN DD *
SORT FIELDS=COPY
INCLUDE COND=(6,1,BI,EQ,15,&,69,5,CH,EQ,
C'WELLS')
/*
//JS020 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SMF15 DD DSN=&&TEMP,DISP=(OLD,DELETE,DELETE)
//SMF15RPT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
DISPLAY FROM(SMF15) LIST(SMF15RPT) -
TITLE('SMF TYPE-15 RECORDS') DATE(4MD/) -
HEADER('DATE') ON(11,4,DT1,E'9999/99/99') -
HEADER('CREATION TIME') ON(49,4,TM1,E'99:99:99') -
HEADER('SYS') ON(15,4,CH) -
HEADER('JOBNAME') ON(19,8,CH) -
HEADER('DATASETNAME') ON(69,44,CH)
/* |
ibmmainframes.com/viewtopic.php?t=61181&postdays=0&postorder=asc&start=0
This is regardign one requirement which I have posted months back in forum and got good responses ..its about to fetch creation time of a datset from SMF record typ 15.. I got the above code by vasanthZ
Please refer the link I pasted if you need more details ..
Here my question is about the second step in above code
That code is intend to use DFSORT but I have limitations to use SYNCSORT only . Can some one please let me know how I would convert that above DFSORT to equavalent SYNCSORT code to achive the same results....
Thanks Much in Advance !!! |
|
