Re: What program is deleting my record?

[WAJE0822 <waje0822@xxxxxxxxx>]

I'd set up journalling over the file in question, run the program, display the journal data to a PF and then look for the DL event to see the program name that's actually deleting the record.
I'm sure you've checked this but does the file exist in any other library, say QTEMP, and being overridden so that you're not actually looking at the file you think you're looking at?

On Sep 24, 2012, at 2:23 PM, Dave <dfx1@xxxxxxxxxxxxxx> wrote:

> nope, no journalling either
>
> 2012/9/24 Monnier, Gary <Gary.Monnier@xxxxxxxxx>:
> > Are you using commitment control?
> >
> > Gary
> >
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Dave
> > Sent: Monday, September 24, 2012 8:40 AM
> > To: RPG programming on the IBM i / System i
> > Subject: What program is deleting my record?
> >
> > Hi
> >
> > Testing an OPM RPG that's supposed to write to a PF, but at the end of the program call, nothing there. Debugging shows that the write operation takes place, but nothing either. With DSPJOB, I see :
> >
> > File              Level
> > MyFile           11        tofile(myfile) mbr(mymbr)
> >                       9         FRCRATIO(1)
> >
> > I'm guessing the force ratio is not in effect at the moment of the write?
> >
> > I put an FEOD after the write, now I can see the record, but some other program must be deleting it again. How can I lock the record so I can trace that program? I've tried updta and a select in strsql.
> >
> > Thanks
> > --
> > This is the RPG programming on the IBM i / System i (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 IBM i / System i (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 IBM i / System i (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.