RPGLE Programm bewust "abstürtzen lassen"

[Fuerchau]

Aus (ILE)RPG hilft ggf. nur das API QMHSNDPM.
Dabei ist die korrekte Aufrufebene zu berücksichtigen.

Aber es gibt da noch eine seltenere Funktion:

Halt Indicators (H1-H9)

You can use the halt indicators (H1 through H9) to indicate errors that occur
during the running of a program. The halt indicators can be set on as record
identifying indicators, field indicators, or resulting indicators.
The halt indicators are tested at the *GETIN step of the RPG IV cycle (see
Chapter 3,

“Program Cycle” on page 21). If a halt indicator is on, a message is
issued to the user. The following responses are valid:

v

Set off the halt indicator and continue the program.

v

Issue a dump and end the program.

v

End the program with no dump.
If a halt indicator is on when a RETURN operation inside a main procedure is
processed, or when the LR indicator is on, the called program ends abnormally.
The calling program is informed that the called program ended with a halt
indicator on.

Note:

If the keyword NOMAIN is specified on a control specification, then any
halt indicators are ignored except as conditioning indicators.

Damit nicht auf Antwort gewartet werden muss, sollte der Job per CHGJOB INQMSGRPY(*DFT/*SYSRPYLE) geändert sein.

[harkne]

Also wenn ich ein Programm abstürzen lassen will mach ich einfach eine Division durch 0

[sebschm]

Also wenn ich ein Programm abstürzen lassen will mach ich einfach eine Division durch 0

Es soll auch Leute geben, die gegen den Baum fahren, wenn sie bremsen wollen. Die Variante mit *INHx hat den Vorteil, daß man so gleich sehen kann, welcher Haltanzeiger gesetzt wurde und dann gleich weiß, wieso das Programm stehenblieb (vorausgesetzt, man nimmt H1 für den einen Fehler, H2 für den anderen, etc.).
Die Methode mit den Nachrichten ist zweifellos die eleganteste. Leider läßt sich QMHSNDPM ein bißchen hakelig bedienen, da kann aber auch selber eine kleine Prozedur schreiben. Vorteil davon wäre, daß man sein RPG-Programm aus einem CL aufrufen kann und dann wie gewohnt mit MONMSG rangehen...

[harkne]

Ich möche mich hier nicht in eine Diskussion reinsteigern, aber wenn ich die Sicherheit des Autos testen will muß es an den Baum