Assuming the program is in the ESD, and that you have some asm knowledge,
have a look at the IEWBUFF macro. A good starting point is
at SYS1.SAMPLIB(IEWAPFDA). The idea is to loop on each member in the
library, and scan it using the macro services. print a line for each module
having this csect included and later relink the appropriate modules.

Do not forget to delete the module from storage after each load...

ITschak

*| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux
and IBM I **|  *

*|* *Email**: [email protected] **|* *Mob**: +972 522 986404 **|*
*Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*





On Mon, Jun 20, 2022 at 9:30 PM Donald Blake <[email protected]> wrote:

> I have a large PDSE loadlib with just under 10,000 members. Most of the
> load members are COBOL programs. Some of them were incorrectly linked with
> a batch module, called ABCDE and issue  the COBOL verb CALL 'ABCDE'.
>
> I do have the source for all of the COBOL programs, but it is scattered
> around a bunch of libraries. So dealing with it isn't really practical.
>
> Does anybody know of a utility that will let me scan all of the members for
> those which were linked with CSECT ABCDE? ABCDE doesn't have a MODHEAD
> which I can look for. It's a small assembler language program. I was
> wondering if there's a utility, possibly in the CBT tape, which can do
> this? Also, looked at PDS also from the CBT tape, but if  one of the
> subcommands allows for that, I didn't see it.
>
> I know I can run AMBLIST against each individual load module, but due to
> 10,000 members in that dataset, it might take me quite a while.
>
> Any thoughts?
>
> --
> Donald H. Blake
> Phone (518) 768-7067
> Ecclesiastes 12:1
> <https://www.biblegateway.com/passage/?search=Ecclesiastes+12&version=AKJV
> >
>
> ----------------------------------------------------------------------
> 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

Reply via email to