File update after abnormal program termination

["Fisher, Don" <Dfisher@xxxxxxxxxxxxxxxxx>]

I think I know the answer to this but I'm hoping I'm wrong.

There are programs here that update a field in a file to indicate the record
(and other associated records that do not have this field updated) is in use
by workstation.  Trouble is, if the job is ended because of external factors
like the terminal being shut down or communications between the terminal and
the controller being terminated, we have to manually reset this field.

I've experimented with the *PSSR subroutine but it apparently does not get
executed when a job ends abnormally.  I also checked the RPG/400 reference
and users guide to no avail.

Does anyone know how I can ensure the field in the file gets cleared when
the job is terminated or will I have to redesign the process?  We are at
V4R1 and RPGIV is not an option here as the program must be compiled to
ignore decimal data errors (no, I had nothing to do with it but must now
maintain it).

Any help will be greatly appreciated.

Donald R. Fisher, III
Project Manager
The Roomstore Furniture Company
(804) 784-7600 ext. 2124
DFisher@roomstoreeast.com