RE: Triggers prevent requested operation

That code snippet I posted does exactly that, we were on V5R1 at the
time it was developed.

Francis Lapeyre
IS Dept. Programmer/Analyst
Stewart Enterprises, Inc.
E-mail: flapeyre@xxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of DeLong, Eric
Sent: Tuesday, April 24, 2007 9:18 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Triggers prevent requested operation

Note that on V5R3 and greater, you can CHGPFTRG to *DISABLE the trigger,
perform your CLRPFM, then CHGPFTRG to *ENABLE the trigger again....

hth,
Eric

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Captain Jerry
Sent: Monday, April 23, 2007 11:31 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Triggers prevent requested operation


Hmmmm... Thanks Simon.... I'm going to have to think about this.
Jerry


On 4/23/07, Simon Coulter <shc@xxxxxxxxxxxxxxxxx> wrote:

On 24/04/2007, at 12:54 PM, Captain Jerry wrote:

I have a Trigger on a file which fires on a Delete Record. All's

well,

unless I do a Clear Physical File Member (CLRPFM) ~ The Trigger
doesn't like
that.

It's not the TRIGGER that doesn't like it--it's the SYSTEM. The
presumption is that IF you added a *DELETE trigger then you probably
want it to fire for every record deletion. Because CLRPFM does not
DELETE records but rather truncates the data space there is no

physical

delete operation thus the trigger won't fire. If the trigger isn't
fired how can the trigger program perform whatever action you desire
when a delete occurs. Nett result is that some operations are not
allowed on a file that has a trigger.

#3 is my problem. How can I get around this? There must be a

trick,

but I
can't find one.

You can't CLEAR a file with a *DELETE trigger so do what the message
help text tells you and remove the trigger, clear the file, and add

the

trigger back again. NOTE: I am not recommending this practice--simply
telling you how you can accomplish it.


Regards,
Simon Coulter.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 3 9899 0985 Mobile: +61 0411 091 400 /"\
Fax: +61 3 9899 0985 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------


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