Dean, You can use DFSORT to remove the duplicates and generate a single list of unique tape numbers.
Example: //STEP0100 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DISP=SHR,DSN=Your pds(member01) // DD DISP=SHR,DSN=Your pds(member02) // DD DISP=SHR,DSN=Your pds(member03) ... // DD DISP=SHR,DSN=Your pds(member10) //SORTOUT DD SYSOUT=* //SYSIN DD * SORT FIELDS=(P,M,F,A) SUM FIELDS=NONE /* //* P = Position of the tape number field //* M = Length of the tape number field //* F = Format of the tape number fields (CH, ZD, BI, PD...) //* A = Ascending sequence Thanks, Kolusu DFSORT Development IBM Corporation IBM Mainframe Discussion List <[email protected]> wrote on 06/06/2018 07:58:28 AM: > From: "Nai, Dean" <[email protected]> > To: [email protected] > Date: 06/06/2018 08:10 AM > Subject: compares > Sent by: IBM Mainframe Discussion List <[email protected]> > > > >Howdy, > > I have numerous lists of tape numbers that I need to compare so > I can remove any duplicate and only keep them in one list. Any ISPF > or other utilities for me to run the compares? I have 10 members > with over 100 tape numbers in each. Thanks in advance for any > suggestions.....Dean > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
