View Full Version : Info über benutzte Tabellen innerhalb eines PGM
Kann ich zur Laufzeit innerhalb eines Programms den Bibliotheksnamen einer benutzten Datei ermitteln????
Gruss KB
Peter Kosel
01-08-01, 10:20
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
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
Sorry, ich hatte vergessen zu erwähnen, dass ich mit embedded SQL arbeite.....
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.