Hi everybody, more than one guy asked for the solution so here the basic. Next msgs for JCL and REXX (can't go over 1000 lines). Take in count this is only a POC and I was not able to find out any 20 subtype nor subtype 21 with second and third section available (only first one). So the SORT step to print the dsect is only valid for SMF119, subtype 21 and first DSECT. The basic idea is using REXX to parse raw SMF119 and produce multiple VB records for each with: START LEN Description 00001 20 Same as original SMF records without VBS RDW with VB LL so at col 19 there's the subtype 00021 64 SMF119IDENT - Actual length is 64 (x'40' - LL got from triplet so will change according) 00085 08 Originating triplet fields (OFFS/LEN/NR) 00093 02 Relative number in triplet. Used to select DSECT to map the subsequent specific data 00095 04 Original absolute record number (to look at the originating one in case of debug) 00099 ?? Specific data section
So, in theory, a SMF119 subtype 21 with the three DSECT available will be written as three different records with: #1 00001-00092 same for the three of them 00093-00094 x'0001' 00095-00098 same for the three of them 00099-for x'0090' SMF119TN_NT_DSECT #2 00001-00092 same for the three of them 00093-00094 x'0002' 00095-00098 same for the three of them 00099-for x'0030' SMF119TN_NTR_DSECT #3 00001-00092 same for the three of them 00093-00094 x'0003' 00095-00098 same for the three of them 00099-for x'0024' SMF119TN_NTB_DSECT After that, SORT step can choose the record mapping depending on subtype (19,2 or 23,2 taking in count RDW, SYMNAMES=HDSUBTYPE) and triplet relative number (93,2 or 97,2 taking in count RDW, SYMNAMES=TRIP_OCCURR). In my sample dataset there was not a record with IPV6 only IPV4 so I hope the mapping for IPV6 is good enough. It's a try, so please take it as is. After trying and verified it (especially the basic statement), if anybody would like me to write the sort step for other dsects, please provide a sample record set with valid data. Hope this helps. Max <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> Mail priva di virus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2> ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN