Geir, While I am looking for a code example, here is what you do: I do not believe you can do a selective trigger per se, what you would probably need to do is setup a CL pre-processing program to your Cobol. The CL willl have two parms, the trigger buffer and buffer length (not necessarily in that order). If you go to the Infocenter, search for trigger buffer and it will show you the layout. This "buffer" will contain, amongst other things, both the image of the record before and afterwards. You will have to figure out the offset of the record updated (part of the buffer rec coming in is variable length, depending on the length of the actual record format) by converting a binary field or two. Then you can substring to find your field and check the value, and then call your Cobol passing anything you want. Regards, Uros -----Original Message----- From: cobol400-l-bounces@xxxxxxxxxxxx [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of geir.kildal@xxxxxxxxxxxxxx Sent: Friday, April 04, 2003 7:11 AM To: cobol400-l@xxxxxxxxxxxx Subject: Triggers Hello, all. I want to monitor a statusfield, STATUS i file A. If the STATUS is canged to a certain value, I want a pgm, PGMA to start. PGMA will use data from the changed record. Any examples on how to do this? I've been looking at ADDPFTRG, and I can see that a record update can trig a program. But how can I get data from the updated record into the trigged program? Is this an effective way of doing this? This program will be started every time a record in the file is updated, and it is just a few values that will get my pgm running. Alternatively I can run a batch-program at the end of day and find out the same? Mvh. Geir _______________________________________________ This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list To post a message email: COBOL400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/cobol400-l or email: COBOL400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l.
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.