Pommier Rex, Here are a couple of old discussion that use REXX exec to find all the Packed members
https://groups.google.com/forum/#!topic/bit.listserv.ispf-l/5Axnxbd7rok https://groups.google.com/forum/#!topic/bit.listserv.ispf-l/LM185_oMtS8 However if your shop has FILE MANAGER , here is a sample that will list all the members that are packed with a message in the SYSPRINT "data is ISPF packed, skipping. " and 2 lines above is the member name that is packed. We can extract these 3 lines using DFSORT. Let me know if you are interested. //STEP0100 EXEC PGM=FILEMGR //SYSPRINT DD SYSOUT=* //PDS DD DISP=SHR,DSN=your pds/pdse name //SYSIN DD * $$FILEM DSP INPUT=PDS, $$FILEM PACK=SKIP, $$FILEM NLRECS=1 //* Thanks, Kolusu IBM Mainframe Discussion List <[email protected]> wrote on 03/16/2018 06:47:35 AM: > From: "Pommier, Rex" <[email protected]> > To: [email protected] > Date: 03/16/2018 06:49 AM > Subject: ISPF packed member question > Sent by: IBM Mainframe Discussion List <[email protected]> > > Hi list, > > I have what is hopefully an easy question that I just am looking in > the wrong place. Given a PDS of source or JCL, is there a quick, > "easy" way of finding any/all the packed members within the PDS? > > Thanks, > > Rex ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
