Re: What program is deleting my record?

Hi, Dave:

There are a number of things that could be causing the symptoms you describe.

Perhaps there is a file with the same name in another library, and the program you are testing is not updating the file you think it is?

What does your library list look like when you are testing?

In that same session, issue:
DSPFD filename
andi
DSPPFM filename

and see if you are looking at the right file.

Also, you should be able to conduct a simple test:

1. create a small simple file, or create a duplicate of the file in question, e.g. using CRTDUPOBJ with DATA(*NO) in your own library

2. from one session, issue UPDDTA filename and using DFU, you can insert a record

2. from another session, issue UPDDTA for the same file name, and you should be able to "page down" or "roll up" and immediately see the new record you just added in the other session.

Does that help?

All the best,

Mark S. Waterbury

> On 9/24/2012 2:23 PM, Dave 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.