× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Thanks all, I stumbled upon the delete, eventually.
Pity as not being usedd to journalling, I was going to give it a go.
Must remember for next time. I did think of writing a program to chain
and lock the record, but that seemed a bit drastic.

2012/9/24 Tom Huff <tehuff@xxxxxxxxxxxxx>:
Is your deleted record count going up ? Use DSPFD and go to the bottom.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Mark S Waterbury
Sent: Monday, September 24, 2012 1:40 PM
To: RPG programming on the IBM i / System i
Subject: 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.



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



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.