Info über benutzte Tabellen innerhalb eines PGM

[KB]

Kann ich zur Laufzeit innerhalb eines Programms den Bibliotheksnamen einer benutzten Datei ermitteln????
Gruss KB

[Peter Kosel]

Hallo KB,

wenn es sich um ein RPG-PGM handelt dann geht es über die INFDS (Informationsdatenstruktur) in COBOL gibt es einen I-O-Feedbackbereich

gruß

Peter

[Robi]

Hallo,
definiere die Datei mit INFDS(datenstrucktur)
definiere die datenstrucktur
Stelle 83-92 = datei, 93-102 = bib
129 138 nochmal datei
--> INFDS RPG Handbuch

Robi

[KB]

Sorry, ich hatte vergessen zu erwähnen, dass ich mit embedded SQL arbeite.....

[Fuerchau]

Dann geht es nur mit einem aufgerufenen CL-Programm, in dem der Befehl RTVOBJD OBJ(*LIBL/&FILE) TYPE(*FILE) RTNLIB(&LIB) verwendet wird, dass dann die Lib zurückgibt.

Dies funktioniert aber nur, wenn keine Überschreibungen (OVRDBF) vorhanden sind.