Re: If an RPG program is forcibly terminated . . .

On 9/9/25 11:25 AM, Daniel Gross wrote:

A) if the program check for %SHTDN() regularly it can sense the *CNTRLD job ending.

B) if you write a procedure the ON-EXIT procedure gets executed even when the job ends *IMMED

C) this can also be done via APIs for "traditional" programs (CERRTX) and even for service programs (CEE4RAGE2 - when the activation group ends).

Dear Mr. Gross:

Thanks.

Option A has the problem that I can't be sure it's not going to be *IMMED.

Option B has the problem that this is a Cycle program, and the additional problem that I can't find any "ON-EXIT" in any of my RPG docs (including the V7R1 reference).

So I went with Option C, and I found Joe Pluta's article on how to use it, on mcpressonline.com. A test program (that rides The Cycle through a file, shelling out a one-second DLYJOB for each record via QCMDEXC) has given me proof-of-concept.

--
JHHL