× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



How about RcvJrnE command or QjoRetrieveJournalEntries API and put
the information into another file.

Saludos,

Leonel Mejía Chinchilla
Ingeniero en Software
Gerencia Regional de Tecnología y Operaciones
BAC | Credomatic Network
Tel: (506) 2527-9000 ext.1576 Fax: (506) 2295-9407
email: lmejia@xxxxxxxxxxxxxx

AVISO DE CONFIDENCIALIDAD: La información contenida en este mensaje es
confidencial y solamente dirigido a la(s) persona(s) mencionadas arriba.
Si el lector de este mensaje no es el interesado, favor de regresarlo al
remitente quedando estrictamente prohibido la difusión, distribución o
reproducción de este comunicado.

CONFIDENTIALITY NOTICE: The information contained in this electronic
message is privileged and confidential and is intended for the use of the
individual(s) named above and others who have been specifically authorized
to receive it. If you are not the intended recipient, you are hereby
notified that any dissemination, distribution or copying of this message
is strictly prohibited. If you have received this message by mistake,
please destroy it immediately, and notify the sender.



From:
Blake.Moorcroft@xxxxxxxxxx
To:
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Date:
11/13/2008 08:46 AM
Subject:
RE: Identifying who deleted records - trigger programs



The use of the journals for data retrieval is being investigated by
another
developer. However, there are considerations about how long the data in
the journals is available due to the volume of data being processed. The
auditors are looking for control over one file and governmental regs
require stored data to be *immediately* available for a period of no less
than 7 years (and displeasing a government auditor who can yank your
operating license immediately is not conducive to business operations).
The journals that would encompass this file also contain record changes on
close to 90 other files. While it would be a preferred option, it may not
be a viable option.

So, to cover the bases, I'm assigned to check the option of triggers,
which
leads back to the original question of user and program identification
from
inside a trigger event.

Have a good day.


Blake Moorcroft
Developer - Corporate
Russell A. Farrow Limited
1980 Ambassador Drive, PO Box 333, Windsor, Ontario N9C 3R4
Bus: 519-966-3003 ext. 566, Fax: 519-966-9870
blake.moorcroft@xxxxxxxxxx




Jerry Adams
<Jerry@bwwholesal
e.com> To

Sent by: RPG programming on the AS400 /
rpg400-l-bounces@ iSeries <rpg400-l@xxxxxxxxxxxx>
midrange.com cc


Subject

11/13/2008 08:49 RE: Identifying who deleted records

AM - trigger programs


Please respond to
RPG programming
on the AS400 /
iSeries
<rpg400-l@midrang
e.com>






Why not just do journaling?

Jerry C. Adams
IBM System i Programmer/Analyst
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Blake.Moorcroft@xxxxxxxxxx
Sent: Thursday, November 13, 2008 7:44 AM
To: RPG programming on the AS400 / iSeries
Subject: Identifying who deleted records - trigger programs

Hello all...

I'm wondering if anyone has ever run into this situation before. Any help
would be appreciated.

A request has been made to track record activity on a file. Specifically,
auditors are looking to see who is deleting or updating records and what
changes are being made.

The option to use a file trigger has come up and would provide the option
to evaluate changes for updated records. The issue that is being
encountered is identifying what program or procedure caused the trigger to
kick off, and more importantly, what user profile was associated to the
program or procedure.

Have a good day.


Blake Moorcroft
Developer - Corporate
Russell A. Farrow Limited
1980 Ambassador Drive, PO Box 333, Windsor, Ontario N9C 3R4
Bus: 519-966-3003 ext. 566, Fax: 519-966-9870
blake.moorcroft@xxxxxxxxxx

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

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




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.