An- und Abmelden protokollieren

[Hubert]

Das mit dem Journal finde ich ganz interessant, aber ich habe damit noch nie gearbeitet, wie bekomme ich denn die Daten in eine Datei, die ich mit RPG bearbeiten kann? Und welche Infos gibt mir diese Datei dann?

Zuerst legst du einen Journalreceiver an:

CRTJRNRCV JRNRCV(QSYS/QACGJRNRCV)

Dann folgt das Journal:

CRTJRN JRN(QSYS/QACGJRN)
JRNRCV(QSYS/QACGJRNRCV)
MNGRCV(*SYSTEM)

Jetzt musst du noch den Systemwert ändern:

CHGSYSVAL SYSVAL(QACGLVL)
VALUE(*JOB)

Zum Auswerten des Journals erstellst du dir am Besten zuerst eine Kopie der Datei QAJBACG (dann hast du auch die richtigen Felddefinitionen darin) und schreibst die Journaleinträge in diese Datei:

DSPJRN JRN(QSYS/QACGJRN)
RCVRNG(*CURCHAIN)
FROMTIME(ABTUM ABIT)
TOTIME(BISDATUM BISZEIT)
OUTPUT(*OUTFILE)
OUTFILE(MYLIB/MYFILE)
ENTDTALEN(*CALC)

Diese Datei kannst Du jetzt mit SQL oder RPG auswerten.

Weitere Informationen findest du hier:

http://publib.boulder.ibm.com/iserie...s/c4153063.pdf

[B.Hauser]

Hallo,

eine weitere Möglichkeit die Ende-Zeit festzuhalten wäre, im Start-Programm eine Scope Message abzusetzen (API QMHSNDSM )

Bei diesem API kann ein Programm angeben werden, das ausgeführt wird wenn ein Call-Stack-Eintrag, ein Programm oder ein Job endet. Das Programm wird übrigens auch bei abnormalem Ende ausgeführt.

Nun brauchst Du nur noch ein kleines Programm, das die Ende-Zeit in Deine Datei schreibt.

Birgitta