Re: Anybody have code they would be willing to share for this

Hi, again, John,
I have one more tool that I wrote -- it compares objects in a library to source members, to find any compiled objects with different source member dates than the source members currently sitting in the corresponding source files.
You could run that on each LPAR to see if any of the compiled objects do not match the source members on that LPAR.  That may help you to narrow down your search for mis-matches.
Let me know if you want to give that one a try.  It's a small stand-alone tool.  One save file with a SAVLIB of the small library.
Mark
On Monday, February 2, 2026 at 01:36:37 PM EST, smith5646midrange@xxxxxxxxx <smith5646midrange@xxxxxxxxx> wrote:

For those that have offline replied about using CMPPFM, a little additional
info.

There are 13 LPARS.  Comparing every LPAR to every other LPAR means 90
compares per source member.  There are roughly 4000 source members.  That is
360,000 CMPPFMs.

While CMPPFM will tell me if they match, being able to keep track of the
results of 360,000 CMPPFMs along with all of the daily / hourly
interruptions just seems to be a daunting task.  Did I compare this source
member for all of the LPARS or did I get interrupted and miss a permutation
or two????  A mistake of missing one permutation could mean losing
production source.

I'm sure that I will end up writing a series of programs to do this.  It is
just too huge to do manually and keep accurate results.

-----Original Message-----
From: smith5646midrange@xxxxxxxxx <smith5646midrange@xxxxxxxxx>
Sent: Monday, February 2, 2026 9:40 AM
To: 'Midrange Systems Technical Discussion' <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: Anybody have code they would be willing to share for this

When I took over as admi n at my client, I was told that ALL of the "tech"
source is on one LPAR and the compiled programs are distributed to the other
12 LPARS.  I found this is not correct.

I have found identical

1) Source members only on the LPAR that it should be on and nowhere else.
2) Identical source members on all LPARS.
3) Identical source members on some of the LPARs with the others not having
that source member at all.
4) Different source on different LPARS (customized for each LPAR to do
something just slightly different).
    a) Some source members are identical on some LPARS but a different
version on other LPARS.

I almost overlaid a program the other day before I found out there was an
option 4 version of source on that machine.  So, the end goal is to get all
source on one machine.  If an LPAR requires a customization, we will add an
"IF SYSTEM = " chunk of code.

I have pulled all of the source to one LPAR...each LPAR is in its own
library.  I am now looking for a way to compare the source for each LPAR to
figure out what is where.  I can write a custom program but I thought I
would ask if anyone has a utility already written that they would like to
share with me to assist with this task?