Joerg.Findeisen
Senior Member

Joined: 15 Aug 2015 Posts: 1370 Location: Bamberg, Germany
|
|
|
|
You need SMF records written by DFHSM as DD:SORTIN for this unformatted sample SORT. The FSR record is what your SETSYS SMF(nn)+1 has specified in ARCCMD. Typically it should be 240(+1) = X'F1'
Code: |
OPTION COPY,VLSCMP,NOSOLRF
* Include all FSR records with Subtypes 06 and RetCode of Zero
INCLUDE COND=(6,1,BI,EQ,X'F1',AND,109,4,BI,EQ,+0,AND,
43,1,BI,EQ,X'06')
OUTREC BUILD=(1,4, * RDW
15,4, * System Identifier (SMFID)
11,4,DT1, * Date of Function being performed
7,4,TM1, * Time (TOD)
43,1,CHANGE=(10,X'06',C'Del Mig.DS'), * FSR Subtype
109,4,BI,M11,LENGTH=4,C'/', * Return Code from MWE
113,4,BI,M11,LENGTH=4, * Reason Code from MWE
45,44, * Dataset Name
99,6, * Serial of Original Volume from MWE (FVOL)
157,4,DT1, * Dataset Last Referenced Date
161,4,DT1, * Dataset Last Moved Date
185,2,BI,M10,LENGTH=4, * Dataset Age
215,8, * Management Class Name or blank
35,8) * ID of the User requesting the Function
END |
Record layout is to be found in DFSMShsm Data Areas PDF. |
|