Example 25: Find all duplicate member names in LLA-managed group 00 and in all active LINKLIST libraries
//JOB0025 JOB ...
//MEMDUPS EXEC PGM=IQIBUTIL,PARM=RC4NOHIT
//STEPLIB DD DISP=SHR,DSN=IQI.SIQILOAD
//IQIBUDFL DD DISP=SHR,DSN=IQI.SIQIPLIB
//SYSPRINT DD SYSOUT=*
//DUPLIST DD DSN=DSC.MEMDUPS.LLA00,DISP=(NEW,CATLG),
// UNIT=3390,SPACE=(TRK,(1,1))
//SYSIN DD *
MEMDUPS O=DUPLIST,INDSN=*LLA
/*
In this example, we search for all member names that exist in more than one library of LLA-managed group ID 00 and system LINKLIST.
The output report data set "DSC.MEMDUPS.LLA00" attributes are:
RECFM=FBA,LRECL=133,BLKSIZE=6650
.
Note: If no duplicate member names are found, the MEMDUPS operation will set a return-code 4 due to
the "RC4NOHIT" option specified in the EXEC PARM.