|
Hans have you looked at how Delphi traps errors. Try ... except ... end; or Try .... finally .... end; The latter is used when you know you need to do something regardless of an error condition or not. The "on-error 103" statement - does that mean that you will trap error # 103 and no others ? I hope you can set it up like cl so you can trap one, some, all exceptions. Also it would be nice to be able to raise the exception (so that normal error handling could take place if that is more appropriate (as if no monitoring was in place). I am really looking forward to the improvements you guys are doing to the language John Hall Home Sales Co. > > ----------------------------------------------------------------- > D num s 3p 0 inz(999) > CF monitor > CF num = num + 1 > CF dsply num > CF on-error 103 > CF dsply 'Numeric overflow' > CF endmon > CF *inlr = *on > ----------------------------------------------------------------- > > Cheers! Hans > > Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com > * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * This is the RPG/400 Discussion Mailing List! To submit a new * * message, send your mail to "RPG400-L@midrange.com". To unsubscribe * * from this list send email to MAJORDOMO@midrange.com and specify * * 'unsubscribe RPG400-L' in the body of your message. Questions should * * be directed to the list owner / operator: david@midrange.com * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
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.