Mr. Kolusu,

This....is....awesome!!!!!!   It does exactly what I need.  

Thank you, sir!!!

Rex

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Sri h Kolusu
Sent: Friday, March 16, 2018 11:51 AM
To: [email protected]
Subject: Re: ISPF packed member question

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to