View Full Version : Dateinamen einer Bibliothek per ODBC und VBA auslesen
Hallo! Ich möchte gerne alle Dateinamen und (wenn möglich) die Dateigröße und das Erstellungsdatum einer AS/400 Bibliothek auslesen und in eine Tabelle schreiben. Am Besten wäre das ganze über VBA. Wäre toll, wenn mir hier jemand helfen könnte... Viele Grüße
Solche Informationen sind in den Catalog Views (SYS* in Bibliothek QSYS2) hinterlegt, auf die mit SQL zugegriffen werden kann.
Die Datei-Informationen findest Du in der View SYSPARTITIONSTAT in der Bibliothek QSYS2.
Warum willst Du das denn in eine Datei schreiben? Du kannst doch direkt zugreifen.
Birgitta
Hallo Brigitta! Erst einmal vielen lieben Dank für die zeitnahe Rückinfo. Leider kann ich mit den u.g. Befehlen nicht wirklich etwas anfangen. Gibt es evtl. einen VBA Code, mit dem ich via ODBC diese Daten abrufen könnte? Vielen Dank und Gruß, Wilfried
Du kannst doch bei einem ODBC-Zugriff oder in VBA SQL-Select-Befehle ausführen oder etwa nicht?
SELECT * FROM QSYS2.SYSPARTITIONSTAT
Where ...
ist doch möglich?!
Birgitta
Es gibt hier mehrere Beispiele im Forum zum Aufruf von QCMDEXC.
Für Objekt-Informationen eigent sich eben der Befehl DSPOBJD mit Ausgabe in eine Datei. Dort stehen dann die Informationen über Erstellungs-/Änderungsdatum u.v.m.
Mit jedem Release gibt es neue SQL-Systemtabellen die halt ggf. in älteren Releasen noch nicht da sind.
In der SYSPARTITIONSTAT findest du nur PF's und Tables, keine LF's und Datumsinformationen.
In der SYSPARTITIONSTAT findest du nur PF's und Tables, keine LF's und Datumsinformationen.
Viellleicht solltest Du ab und zu in die Views older Tabellen reinschauen, bevor Du solche Aussagen triffst!
Datums-Informationen sind in den Statistik-Dateien sehr wohl integriert!
Birgitta
Es ist immer reichlich mühsam, alle Informationen die so mittels View's in der QSYS2 je nach Release auftauchen zu ermitteln.
So lange man Software entwickelt, die ggf. bis V5R1 oder sogar V4R5 herunterreichen muss, kann man sich nicht auf Informationen ab V6 oder gar erst ab V7 verlassen da sie beim Kunden nicht existieren.
Vielleicht sollten wir uns es hier im Forum zur Angewohnheit machen, bei der erstellung neuer Themen das verwendete OS-Release anzugeben.
Dann erübrigen sich halt manchmal so Antworten.
Vielleicht kannst du ja zu obiger Anfrage mal angeben, in welcher der vielen Views das geforderte "Erstellungsdatum" der Tabelle und des Schemas steht.
Die IBM gibt leider keine Crossref raus, welche Information denn nun in welcher View zu finden ist.