Re: re triggers

[Nelson Smith <ncsmith@xxxxxxxx>]

If you use the "Before" trigger rather than the "After" side, you will
be looking at the actual record data that is about to be updated.  Just
change the fields to whatever you want them to be (in the "after" part
of the record parameter that comes into the trigger). Then let the
record update normally.  

Note: this requires you to use the Allow Repeated Change option on the
ADDPFTRG cmd.

boothm@ibm.net wrote:
>
> I'd like to do a simple trigger program.  What I'd really like to do is to
> fill in a "timestamp" and a "updated by" field on a record anytime it is
> created or changed, regardless of where it is done.  The physical file is
> in arrrival sequence and unindexed.   It seemed simple enough  - a
> ADDPFTRG after *UPDATE with a simple program that moved the SDS's User
> field, and a TIME command into the correct fields, and update.
> 
> That was where I realized I was in trouble...  how do I find the relative
> record number that was just processed so I can easily find the correct
> record?  Or is that the wrong approach altogether?
> 
> --
> -----------------------------------------------------------
> boothm@ibm.net
> Booth Martin
> -----------------------------------------------------------
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---

-- 
Nelson Smith
"Standards are Wonderful....cause there's so many to choose from!"
ncsmith@gate.net
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---