Fehlerbehandlung

[JonnyBrazil]

ändere einfach die entsprechende Jobbeschreibung auf default-Antwort.
CHGJOBD JOBD(QBATCH) INQMSGRPY(*DFT)
dann sollte das fehlerhafte Programm den defaultwert für die Fehlermeldung erhalten und z.B. dumpen und natürlich sich selbst beenden.

[JonnyRico]

Hallo,

es hält euch doch aber nichts davon ab MONITOR auch im "Standard-RPG Format" zu verwenden. MONITOR bedingt nicht Free-Format. Ich habe es nur so aufgeschrieben.

C                  MONITOR
C*                 Anweisung
C                  ON-ERROR   [Fehlercode]
C*                 Fehlerbehandlung
C                  ENDMON 

Gruß

Sascha

[Fuerchau]

"Monitor" gibts auch im Fest-Format, allerdings nur in RPGLE.
Aber das sollte kein Hindernis sein, da per CVTRPGSRC aus RPG auch ILERPG machbar ist. Copy-Strecken müssen allerdings separat konvertiert werden.

Wie wärs alternativ mit:
CRTRPGPGM .... IGNDECERR(*YES) ?

In RPGLE ist es die Option TRUNCNBR(*YES), die allerdings nicht für Zwischenergebnisse zählt, also bei EVAL A = A * B wird ein Fehler ausgelöst, bei "MULT B A" wird kein Fehler ausgelöst.

[Asti]

recht herzlichen Dank für die Unterstützung.

Mit den Tipps und der weiteren Beurteilung durch unsere AS400 Programmierer haben wir jetzt scheinbar eine akzeptable Lösung gefunden. Details werde ich im nächsten Jahr erfahren (und hier posten), jetzt ist erstmal Urlaub angesagt....

Nochmals schönen Dank, geruhsame Feiertage und einen guten Rutsch

Andreas Sturm