With this JCL, you can simulate the result you want to. You can INCLUDE or OMIT, and REFORMAT the output records.. The records are numbered to see the one selected, and what happens... After all, you will be able to adapt it to your need. You didn't tell me if you needed to preserve the header... If so it will require some extra modifications.
//STEP0001 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //XREFS DD * BBBBBBBB F1-02 BBBBBBBB F1-01 BBBBBBBB F1-03 AAAAAAAA F1-01 CCCCCCCC F1 /* //LAYOUTS DD * BBBBBBBB F2-01 AAAAAAAA F2-01 AAAAAAAA F2-02 DDDDDDDD F2-01 /* //SORTOUT DD SYSOUT=* //JNF1CNTL DD * INCLUDE COND=(ALL) /* //JNF2CNTL DD * INCLUDE COND=(ALL) /* //SYSIN DD * JOINKEYS F1=XREFS,FIELDS=(1,8,A) JOINKEYS F2=LAYOUTS,FIELDS=(1,8,A) REFORMAT FIELDS=(F1:1,80) SORT FIELDS=(1,8,CH,A) SUM FIELDS=NONE /* Alain ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
