|
Sample
MONMSG CPF0000 GOTO(ERRSTUFF)
...
Page 20
...
CPYF MYLIB/MASTERFILE QTEMP/WORKFILE...
DLTF MYLIB/MASTERFILE
CALL ProgramToRecreateMasterFile
...
Page 27
...
goto end
errstuff:
/* handle errors with pretty email */
end:
Now, instead of taking an R when ProgramToRecreateMasterFile blew up I have no MASTERFILE. And my QTEMP copy of WORKFILE is gone. But at least I have pretty email.
The other problem is that developers often get lazy by relying upon the generic top level MONMSG and errors go on for years unnoticed - seen that. But that's mostly without the goto.
Rob Berendt
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.