Re: Eval Exception Error Trapping - New Name

[John P Carr <jpcarr@xxxxxxxxxxxx>]

Hey Hans

Since the below code really doesn't look anything like RPG anymore,  How
about renaming the language?
Since this is about the 13th  enhancement cycle for the language,   We could
call it 
Program Generator-13     or

PG-13   for short??

John Carr 

Han's code
>-----------------------------------------------------------------
>     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          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *