Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all articles
Browse latest Browse all 8500

CLIST & REXX :: RE: find particular member name in PDS using REXX

$
0
0
Author: sergeyken
Posted: Fri Jan 06, 2017 9:02 pm (GMT 5.5)

Just FYI

In some cases there is a trap with using LISTDS command to analyze PDS member list. This doesn't happen too often, but if by a chance the library contains aliases besides of regular member names the output is a bit messy.

Example:
Code:
listds 'sys1.linklib' members 

SYS1.LINKLIB                   
--RECFM-LRECL-BLKSIZE-DSORG   
  U     **    32760   PO       
--VOLUMES--                   
  X2C1T1                       
--MEMBERS--                   
  ADFIDF00                     
  ADFMCOPY  ALIAS(SMC,SMCOPY) 
  ADFMDFLT                     
  ADFMDF0A                     
  ADFMDF01  ALIAS(ADFGLUET)   
  ADFMDF03                     
  ADFMDOLD                     
  ADFMFIND  ALIAS(SMF,SMFIND) 
  ADFMPUT  ALIAS(SMP,SMPUT)   
  ADRCIPH                     
. . . . . . . . . . . . . . . . . . .
  AHLWTASK                                                       
  AIRAMBGN                                                       
  AIRAMPVT  ALIAS(AIRA1INI,AIRH1CHK,AIRH1DCT,AIRP1TSK,AIRS1STK,   
           AIRS2STK)                                             
  AIRAMRES                                                       
. . . . . . . . . . . . . . . . . . .
  ANTCVXPR  ALIAS(ANTCVX00,ANTCVX01,ANTCVX02,ANTCVX03,ANTCVX04,           
           ANTCVX05,ANTCVX06,ANTCVX07,ANTCVX08,ANTCVX09,ANTCVX10,ANTCVX11,
           ANTCVX13,ANTCVX15,ANTCVX16,ANTCVX17,ANTCVX18,ANTCVX19,ANTCVX20,
           ANTCVX21,ANTCVX22,ANTCVX23,ANTCVX24,ANTCVX25,ANTCVX26,ANTCVX27,
           ANTCVX28,ANTCVX30,ANTCVX31,ANTCVX32,ANTCVX33,ANTCVX34,ANTCVX35,
           ANTCVX36,ANTCVX37,ANTCVX38,ANTCVX39,ANTCVX40,ANTCVX41,ANTCVX42,
           ANTCVX43,ANTCVX44,ANTCVX45,ANTCVX48,ANTCVX49,ANTCVX50,ANTCVX51,
           ANTCVX52,ANTS4902,ANTS4903,ANTS4904,ANTS4905,ANTS4906,ANTS4907,
           ANTS4908,ANTS4909,ANTS4910,ANTS4948,ANTS4950,ANTS4951,ANTS4952,
           ANTUSAF)                                                       
  ANTKDBUG                                                                 
  ANTKHSX                                                                 
  ANTKING                                                                 
  ANTKPDO                                                                 
  ANTMAIN                                                                 
  ANTMONR1                                                                 
  ANTSDMLK  ALIAS(ANTSDMLP,ANTUSUBT,ANTXPRSM)                             
  ANTSDMLL  ALIAS(ANTUFABN,ANTUFFND,ANTUFOEX,ANTUFSTW)                     
  ANTSTRT  ALIAS(ANTXAINI)                                                 
  ANTURQST  ALIAS(ANTCNVRT)                                               
  ANTUSCAN  ALIAS(ANTUCMPR,ANTUDRVR)                                       
  ANTUXDVC                                                                 
  ANTUXFQA                                                                 
. . . . . . . . . . . . . . . . . .
 etc. etc. etc .
 


If somebody is interested I have in my archives the old REXX function code to handle any combination of member names/aliases.
_________________
Tyrannosaurus-REXX


Viewing all articles
Browse latest Browse all 8500

Trending Articles