Re: A bad Monday question

Interesting idea's about the object auditing and triggers. 
I wonder if DSPPGMREF would show you 
 - imbedded SQL, etc? 
 - If so, what about imbedded sql from a PREPAREd statement? 
 - Or traditional RPGLE from a file with an OVRDBF on it? 
 - Or a file with
FDUMMY     ...               extname(MyVar) USROPN
/free
 MyVar='MYLIB/MYFILE';
 Open(e) dummy;


Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





Evan Harris <spanner@xxxxxxxxxx> 
Sent by: midrange-l-bounces@xxxxxxxxxxxx
05/02/2005 02:37 PM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>


To
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
cc

Subject
Re: A bad Monday question






Hi Bob

I guess you could do worse than turning object auditing on. I can't quite 
think of exactly what set of system values you want but this is the area 
you are probably best to look at. You should be able to see what programs 
use a file although it may take a while to trap them all (like, a month to 

get through an end of month).

You would simply have to change the system values (QAUDCTL and QAUDLVL I 
think) to something appropriate and then specify that the object is to be 
audit by hmm.. CHGPF ? You'll end up with a journal you have to trawsl 
through.

Depending what your interested in another option is simply to journal the 
file. This will get you any programs that cause updates, deletions or 
inserts to the table.

Finally, I suppose you could add a trigger that took the calling program 
name and wrote it somewhere. This is more of an idle thinking out loud 
suggestion.

Regards
Evan Harris

At 06:17 a.m. 3/05/2005, you wrote:
>Good Afternoon,
>         I know this is a dumb question but it's been one of those 
Mondays
>
>Is there a way to find all the programs that access a file.
>
>So I told you it was one of those Mondays
>
>Bob Anderson
>IT Guy
>Kent Sporting Goods Inc.
>New London OH
>Ph: 419-929-7021 x315
>Fax: 419-929-1380

-- 
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing 
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.