Why you want to have this?
Duplicates are always problematic.
If you really need (for whatever) all source lines combined ... use SQL.
The following query may take some time, but it can exactly return what you
want (and you can set WHERE Conditions for selecting libraries and/or source
files and/or members)
... and if you really want you could the result in a table.
Select System_Table_Schema, System_Table_Name, System_Table_Member,
Line_Number, Line
from SysPartitionStat cross join
Lateral(Select Line_Number, Cast(Line as VarChar(256)) Line
from Table(QSYS2.IFS_READ(Path_Name => '/QSYS.Lib/'
concat
Trim(System_Table_Schema) concat '.lib/' concat
Trim(System_Table_Name) concat '.file/' concat
Trim(System_Table_Member) concat '.mbr'))) x
-- Where System_Table_Schema = 'BXSRC'
-- and System_Table_Name = 'QSRVPGMSRC'
Order By System_Table_Schema, System_Table_Name, System_Table_Member,
Line_Number
;
Note: without Order By it should be much faster (since the whole query has
to be performed before it can be sorted!)
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
Modernization ? Education ? Consulting on IBM i
IBM Champion since 2020
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
"Train people well enough so they can leave, treat them well enough so they
don't want to. " (Richard Branson)
"Learning is experience ? everything else is only information!" (Albert
Einstein)
-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of joe
Sent: Monday, 3 July 2023 20:10
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: Regarding source physical file
The same exactly I was looking for:-
"This single member holds every line of source code on the entire system.
Every library.
Every source file.
Every member."
"One table, one member, several million lines of source code."
Thank you.
On Mon, Jul 3, 2023, 23:27 Buck Calabro <kc2hiz@xxxxxxxxx> wrote:
On 7/3/2023 12:13 PM, joe wrote:
But how ? could you please share the program for the same ?
Perhaps I was hasty replying.
Please confirm if the following is what you are considering:
One single table, with one member.
This single member holds every line of source code on the entire system.
Every library.
Every source file.
Every member.
One table, one member, several million lines of source code.
It's required just to keep it handy in a single file and rather than
looking for source of each source member at different places (
different corresponding libraries and source physical files )
In my opinion, you are still trying to have the list write you a
sophisticated cross reference tool.
For free.
One email at a time.
This remains extremely unlikely to happen.
--
--buck
http://wiki.midrange.com
Your updates make it better!
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.
midrange.com
