Question

  Asked: Apr 25 2008   7:42 PM GMT
  Asked by: Cjfarms


finding source files


AS/400, iSeries development, WRKOBJPDM

I have been given the job of findind all source physical files on out AS400
In the pass there wre no standards for naming them.
Have to locate all of these source physical file on our AS400 and them creat a spreensheet of all menbers trying to locate and drop the duplicate source code.

Any help on how to fine ll of these source file would br helpful

Thanks

Craig

Subscribe to Alerts! Get questions and answers delivered to your Inbox.


E-mail me updates on this question



   SUBSCRIBE

hidden modal window

Answer Wiki (Improve, edit or add to this answer)


 RATE THIS ANSWER
0
Click to Vote:
  •   0
  •  0



Hey Craig
The file "QADBXREF" contain all files present in your AS400. In that file, there is a field named "DBXTYP" who will contain the type of file D for data file or S for source file.

So...

Be shure that you have proper security priviledge to access the data of this file.

In SQL (STRSQL) ...

SELECT * FROM QSYS/QADBXREF where DBXTYP = 'S'

... and dump it into a work file.

Have Fun!

_________________________
DanTheMan
  • AddThis Social Bookmark Button

Browse more Questions and Answers on AS/400.

Looking for relevant AS/400 Whitepapers? Visit the Search400.com Research Library.


Discuss This Answer


You must be logged-in to discuss a question. Log-in/Register

Gilly400  |   Apr 28 2008  8:47AM GMT

Hi,

That’s only going to list the source files in one library.

You could try this :-

DSPFD FILE(*ALLUSR/*ALL) TYPE(*MBRLIST) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(yourlib/yourfile)

And then download your file into an excel sheet, select on source type = CLP or CLLE, etc.

Regards,

Martin Gilbert.

 

WoodEngineer  |   Apr 29 2008  3:55PM GMT

I just checked our system, running V5R3. QADBXREF contains many libraries. It should provide source file info from many libraries as well.