|
midrange.com
Just making sure that the file isn't left open, thus data hasn't been
written out to the buffer. Any more effort and I'd have to really pour
over your code. But I've got some other issues here. Sorry.
Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin
fkany@averittexpress.com
Sent by: rpg400-l-bounces@midrange.com
02/07/2003 11:10 AM
Please respond to RPG programming on the AS400 / iSeries
To: CN=RPG programming on the AS400/O=iSeries
<rpg400-l@midrange.com>
cc:
Fax to:
Subject: Re: Recompiling an RPG pgm
The program gets called, but the file doesn't show as open. It's not
listed when I do an option 14 from DSPJOB.
rob@dekko.com@midrange.com on 02/07/2003 09:25:05 AM
Please respond to RPG programming on the AS400 / iSeries
<rpg400-l@midrange.com>
Sent by: rpg400-l-bounces@midrange.com
To: RPG programming on the AS400/iSeries <rpg400-l@midrange.com>
cc:
Subject: Re: Recompiling an RPG pgm
Are you looking at the file in QTEMP from the same job which ran the CL
program?
If so, when you do a DSPJOB option "14. Display open files" doesn't show
this file as still open?
Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin
fkany@averittexpress.com
Sent by: rpg400-l-bounces@midrange.com
02/07/2003 09:57 AM
Please respond to RPG programming on the AS400 / iSeries
To: CN=RPG programming on the AS400/O=iSeries
<rpg400-l@midrange.com>
cc:
Fax to:
Subject: Re: Recompiling an RPG pgm
I have a CL pgm that creates FILE_A in QTEMP with a CPYF command then does
an OVRDBF (FILE_A) TOFILE(QTEMP/FILE_A), then RPG III program is called.
The RPG III program gets called just fine, but no data is being written to
the file that was created in QTEMP. When FILE_A was compiled LVLCHK was
set to *YES. Why would RPG III pgm be called and then not write to
FILE_A?
Is it because the RPG III progam is using the file that was created in
QTEMP?
Scott Klement <klemscot@klements.com>@midrange.com on 02/07/2003 03:17:55
AM
Please respond to RPG programming on the AS400 / iSeries
<rpg400-l@midrange.com>
Sent by: rpg400-l-bounces@midrange.com
To: RPG programming on the AS400/iSeries <rpg400-l@midrange.com>
cc:
Subject: Re: Recompiling an RPG pgm
On Thu, 6 Feb 2003 fkany@averittexpress.com wrote:
>
> If an RPG III pgm is not recompiled after FILE_A has been recompiled,
will
> the program bomb when called? The program only does
> WRITE operations to FILE_A.
There are a number of factors that affect this:
1) Is the file externally described in the programs in question?
or are they program-described. Program described files do
not get level-check errors, as long as the keys haven't
changed.
2) Is the file created with LVLCHK(*YES) on the CRTPF/CRTLF/OVRDBF
command? (It is *YES by default) If this is set to
LVLCHK(*NO) then the system will not check to see if the
record format has been changed.
3) If externally described, and LVLCHK(*YES) did you change anything
that would change the record length? or change the
length/type/name of any field? or change the keys? If you
changed any of these things, then the "record level identifier"
will be different, and the program will see that and generate
a "level check" error.
>
> I recompiled a file but forgot to recompile 2 RPG III programs that
WRITE
> to it. The programs that weren't recompiled still run, but it appears
> no records are being WRITTEN to the file.
>
That's strange. They're not crashing, but just refusing to write the
records? Is it possible that they're seeing a different copy of the file?
Maybe in a different library?
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
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 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.
