Re: ADDPFTRG and record lock...

I did not see this mentioned.

https://www.ibm.com/support/pages/allowddlchangeswhileopen-qaqqini-option

<snip>
ALLOW_DDL_CHANGES_WHILE_OPEN QAQQINI option
News

Abstract
ALLOW_DDL_CHANGES_WHILE_OPEN QAQQINI option

Content
You are in: IBM i Technology Updates > Db2 for i - Technology Updates > Db2 for i Database Engineer (DBE) Enhancements >ALLOW_DDL_CHANGES_WHILE_OPEN QAQQINI option

What's new with IBM i 7.4 SF99704 Level 4 and IBM i 7.3 SF99703 Level 16:

Extend ALLOW_DDL_CHANGES_WHILE_OPEN for grant and revoke authorities
</snip>


I use this to grant specific object authorities to locked files.

--
Bryan



Robert Rogerson wrote on 6/8/2021 3:43 PM:

Hi all,

I need some help figuring this out. I am attempting to add an after insert
trigger to a file that is almost always in use. So I wrote a small CL
program to try and do this in a loop. There were actually 3 files but each
file was handled the same way.

pgm ()

dcl &t2added *lgl 1 VALUE('0')

DclPrcOpt dftactgrp(*no) actgrp(*new)

DoUntil (&t2added)

Dlyjob (60)

If (*not &t2added) Then(Do)
/* Add trigger to ITEMP */
ADDPFTRG FILE(&library/UPCITMP) TRGTIME(*AFTER) +
TRGEVENT(*INSERT) PGM(VPE172) TRG(TRG_VPE172_INS) RPLTRG(*YES)
Monmsg CPF32C6 Exec(goto ENDTRG)
Chgvar &t2added '1'

Enddo

ENDTRG:
Enddo
endpgm

I submitted this program at 14:45 yesterday afternoon. It ran for over 9
hours with no errors nor did it cause any errors. Then just after midnight
we began getting programs (not this trigger adding program) failing due to
not being OPEN (RPG opcode) a logical over the physical I was trying to add
the trigger to. As this happened after midnight a number of jobs failed
when not able to open the logical. As soon as I cancelled the add trigger
program the OPEN in the other jobs stopped failing.

In my dev environment I ran the program to add the triggers and was unable
to create a lock by the add trigger program when trying the ADDPFTRG
command.

Is there any way that the ADDPRFTRG command can lock a logical but not add
the trigger (CPF32C6)?

Thanks,

Rob