AW: Trigger Program

Hi Mike,

Additionally to Martin's examples, you might check the following redbooks:
1. Who Knew You Could Do That with RPG IV? A Sorcerer's Guide to System
Access and More, SG24-5402-00
   http://www.redbooks.ibm.com/abstracts/sg245402.html?Open
2. Modernizing IBM eServer iSeries Application Data Access - A Roadmap
Cornerstone, SG24-6393-00
   http://www.redbooks.ibm.com/abstracts/sg246393.html?Open
3. Stored Procedures, Triggers and User Defined Functions on DB2 Universal
Database for iSeries, SG24-6503-01
   http://www.redbooks.ibm.com/abstracts/sg246503.html?Open

Birgitta

-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von MA
Gesendet: Samstag, 3. Dezember 2005 15:45
An: RPG programming on the AS400 / iSeries
Betreff: Trigger Program


Hello,

I need a standard trigger program to update fileB when
fileA gets updated. Can you pls point me to a place
where I can find that.

Thanks
Mike


--- "Raul A. Jager W." <raul@xxxxxxxxxx> wrote:

> Asuming you want to add the user, time, date and
> program that did the
> last update, the trigger will be your best option.
> For user and
> date-time it is direct, create a D line with a
> variable alpha 10
> inz(*user) and write it to your file.  For date use
> either %date(),
> %time() or %timestamp().
> In order to write wich program was used you need to
> call an API.
>
> To find out the some of the programs doing currently
> the update you can
> journal the file.
>
> Raul.
>
> Mahesh Pawar wrote:
>
> >can you let me knwo how.?
> >
> >FrankKany@xxxxxxxxxxx wrote:  I think that a
> trigger program might help.
> >
> >Frank W. Kany IV
> >Senior Programmer/Analyst
> >Unipres USA, Inc.
> >(615) 325-8428 - Office
> >(615) 517-1742 - Cell
> >http://www.unipres.com
> >
> >
> >
> >Mahesh Pawar
> >
> >Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> >12/02/2005 05:55 AM
> >Please respond to
> >RPG programming on the AS400 / iSeries
> >
> >
> >To
> >RPG programming on the AS400 / iSeries
> >cc
> >
> >Subject
> >How to find who is updating particular PF ?
> >
> >
> >
> >
> >
> >
> >Hi all,
> >
> >
> >I need to add 2 new fields to a sales extract file
> and also populate
> >them.The problem is I am not able to figure out how
> the file is getting
> >updated.(which programs is updating this file)
> >
> >
> >Whats known:
> >
> >The sales Extract file is journalled and the
> journal entries are created
> >by a program which is a part of the datamirroring
> software. There is a
> >constantly running batch job (also a part of
> Datamirror) which is most
> >likely monitoring updates to the sales file.
> >The object locks for this batch job has a *USRQ
> object which leads me to
> >believe that the data from the sales file is
> written to the extract file
> >using the *USRQ object. Since the Datamirroring
> package is a 3rd party
> >tool, I do not have access to the source code.
> >
> >I have verified that the Sales extract file is not
> DIRECTLY
> >referenced/updated thru programs (scanned source
> members and also did a
> >dsppgmref) / queries / Sqlpkg / dataareas /
> triggers).
> >
> >How do user queues work?? Is there anything else
> that I need to check.
> >
> >Will appreciate if anyone could help. Thanks in
> advance.
> >
> >Thanks & Regards
> >Mahesh Pawar
> >
> >
>
> --
> 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.
>
>




__________________________________________
Yahoo! DSL ? Something to write home about.
Just $16.99/mo. or less.
dsl.yahoo.com

--
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.