RPG Programm-Quellen suchen

[Numerik]

Hi *ALL,

ich hoffe, ihr könnt mir weiterhelfen !
Ich suche ganz bestimmte RPG-Quellen auf unserer AS/400.
Da auf unserer Maschiene mehrere hundert Bibliotheken angelegt sind, wäre es sehr mühsam, jede einzelne Libary "manuell" zu durchsuchen.
Gibt es eine Möglichkeit durch einen bestimmten Befehl alle Bibliotheken nach einzelnen Programm-Namen durchsuchen zu lassen ?
Bin für jeden Tipp dankbar !

[malzusrex]

ich hatte mir mal ein proggi geschrieben, welches alles libs durchforstet, und in dem man dann nach prog.namen suchen kann. ich schaumal ob ich es noch finde

gruß ronald

[malzusrex]

habs gefunden und die quellen mal zusammen gestellt.
woistsrc

gruß ronald

[Dieser Beitrag wurde von malzusrex am 12. März 2003 editiert.]

[Numerik]

Hallo Ronald,

vielen Dank für das umfangreiche PGM !
Ich werde dich informieren, wenns geklappt hat !

Gruß
Stephanie

[Numerik]

Hallo Ronald,

vielen Dank für das umfangreiche PGM !
Ich werde dich informieren, wenns geklappt hat !

Gruß
Stephanie

[B.Hauser]

Hallo Stephanie,

mir ist nicht ganz klar, was Du suchst.
1. Die Programme als solche
2. Quellen mit dem entsprechenden Namen
3. Quellen, aus denen die Programme umgewandelt wurden.

Lösung für
1. Cl-Befehl: WRKOBJ *ALL/MyPgm *PGM

2. Erstellen einer Datei über DSPFD und die dann über Query auswerten:
DSPFD FILE(*ALL/*ALL)
TYPE(*MBRLIST)
OUTPUT(*OUTFILE)
FILEATR(*PF)
OUTFILE(MyLib/MyFILE)
Wenn Du allerdings über alle Bibliotheken gehen willst, würde ich diesen Befehl nicht unbedingt im laufenden Geschäft absetzten

3. Für OPM-Programme kannst Du die Quellen-Informationen über DSPOBJD erhalten.
Mit DSPOBJD kann ebenfalls eine Datei erstellt werden.
Für ILE-Programme kommst Du nur über List API (QBNLPGMI, QBNLMODI, QBNLSRVP) and die Quellen-Informationen.

Ich hoffe, dass Dir das weiter hilft.

Übrigens LINPAC, Du bist ganz toll, dass Du die Lösung kennst.
Wenn Du die Lösung das nächste Mal auch mit anderen teilen würdest, statt Dich kaputt zulachen, wäre das nochmal so toll.

Birgitta