Re: RPG Cycle doesnt work, then it does

Given that the initial symptom was indicative of an empty primary file ... My best guess is that the program that writes the file being processed has not completed at the time of the first attempt and, therefore, may not have written its output buffer to disk. But that it has completed by the time of the second call.

Can't think of anything else that would cause this behaviour - but then I haven't written a cycle program since 1989! (and that was RPG/36)


Jon Paris
Jon.Paris@xxxxxxxxxxxxxx

On Dec 10, 2024, at 1:02 PM, <tgarvey@xxxxxxxxxx> <tgarvey@xxxxxxxxxx> wrote:

No, the program is not in the stack from a previous execution. The program is compiled from source into qtemp immediately before being called. It does not exist anywhere else (in fact it has a unique program ID to ensure that). And the INZSR is executed for the first and second executions.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Jim Franz
Sent: Tuesday, December 10, 2024 11:45 AM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: RPG Cycle doesnt work, then it does

is the pgm in the job stack from a previous execution when called 1st time?
- will not execute *inzsr if pgm already open...
are you using same pgm name in the same job/same qtemp each time?

Jim Franz


On Tue, Dec 10, 2024 at 12:37 PM <tgarvey@xxxxxxxxxx> wrote:

Nothing in the joblog.
There are overrides to both the primary and secondary files which are
done before the program gets called (obviously).
If it was overrides, why would calling the program again, immediately
after the first execution, work correctly?
The overrides work then and the program gets the data from the files
in the correct sequence.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of James H.
H. Lampert via RPG400-L
Sent: Tuesday, December 10, 2024 11:29 AM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Cc: James H. H. Lampert <jamesl@xxxxxxxxxxxxxxxxx>
Subject: Re: RPG Cycle doesnt work, then it does

On 12/10/24 9:21 AM, tgarvey@xxxxxxxxxx wrote:

Any ideas why the first execution misbehaves but the second works fine?

Is there anything in the joblog?

Are there any overrides or library list changes in effect (or not in
effect), that might be giving the RPG program an empty primary file?

--
JHHL

--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.

--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.

--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.


--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.