RE: Trigger error

["Willie J. Moore" <WJMoore@xxxxxxxxxxxxxxx>]

Thanks for all the great infomation.  Now I have to get to work on using it.
Willie..

-----Original Message-----
From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
Sent: Tuesday, November 25, 2003 12:02 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Trigger error


In the long term you should change the way you do your WRITE's or UPDATE's 
to include error processing.  For example if you do an UPDATE and the 
trigger throws this error then the appropriate error handling needs to be 
in place.  Like instead of doing UPDATE use
UPDATE (E) myfile;
if %error;
  // position 46 through 52 of the file information data structure will 
have the message number
  // but what good will CPF9898 tell you?
  Select;
  When %status=01023; // trigger before file operation
  ...
  When %status=01024; // trigger after file operation
  ...
  EndSl;
EndIf;

Here's a start, I've got chores to do.



Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.