Do you fill the variable correctly?
kf
-----Ursprüngliche Nachricht-----
Von: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] Im Auftrag von
Alan Shore via RPG400-L
Gesendet: Donnerstag, 14. Oktober 2021 18:08
An: RPG programming on IBM i
Cc: Alan Shore
Betreff: RE: [EXTERNAL] Question on failing SETGT followed by SETGT
You don't necessarily need to add images
Just cut and paste the data that is in the file for that key
Alan Shore
Solutions Architect
IT Supply Chain Execution
[cid:image001.png@01D7C0F4.2396D640]
60 Orville Drive
Bohemia, NY 11716
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
E-mail : ASHORE@xxxxxxxxxxxxxxxxxxxx
'If you're going through hell, keep going.'
Winston Churchill
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of
dfreinkel@xxxxxxxxxxxxxxxxx
Sent: Thursday, October 14, 2021 12:09 PM
To: 'RPG programming on IBM i' <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: [EXTERNAL] Question on failing SETGT followed by SETGT
Sure, how do I add images to the forum?
Darryl Freinkel
A4G
Telephone: 770.321.8562 Mobile: 678.355.8562
-----Original Message-----
From: RPG400-L
<rpg400-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l-bounces@lists.midrange.
com>> On Behalf Of Alan Shore
via RPG400-L
Sent: Thursday, October 14, 2021 11:36 AM
To: RPG programming on IBM i
<rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>>
Cc: Alan Shore <ashore@xxxxxxxx<mailto:ashore@xxxxxxxx>>
Subject: RE: [EXTERNAL] Question on failing SETGT followed by SETGT
Van you supply more information
For example - what is the value that it is failing on Can you supply a
snapshot of the records in the file OEFRTL01 - a couple of reords before and
a couple of records after the value you are asking about
Alan Shore
Solutions Architect
IT Supply Chain Execution
[cid:image001.png@01D7C0EF.98C17150]
60 Orville Drive
Bohemia, NY 11716
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
E-mail : ASHORE@xxxxxxxxxxxxxxxxxxxx<mailto:ASHORE@xxxxxxxxxxxxxxxxxxxx>
'If you're going through hell, keep going.'
Winston Churchill
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of
dfreinkel@xxxxxxxxxxxxxxxxx<mailto:dfreinkel@xxxxxxxxxxxxxxxxx>
Sent: Thursday, October 14, 2021 11:37 AM
To: 'RPG programming on IBM i'
<rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>>
Subject: [EXTERNAL] Question on failing SETGT followed by SETGT
I have a program (ILE) with a mix of C-specs and free form. Basically, the
free form is used to do file I/O as its easier to debug the key values on
the statement line.
Lines are:
SETGT (wFreight_CODE) OEFRTL01;
READPE (WFREIGHT_CODE) OEFRTL01;
If %EOF(OEFRTL01) ;
..
The value in wfreight_code exists in the file.
All other values in WFreight_Code are successful.
I don't see why this one fails. Any ideas.
TIA
Darryl Freinkel
A4G
Telephone: 770.321.8562 Mobile: 678.355.8562
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email:
RPG400-L@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxxxxxxxx<mailto:RPG400
-L@xxxxxxxxxxxxxxxxxx%3cmailto:RPG400-L@xxxxxxxxxxxxxxxxxx>>
To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l<
https://lists.midrange.
com/mailman/listinfo/rpg400-l><
https://lists.midrange.
com/mailman/listinfo/rpg400-l>
or email:
RPG400-L-request@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L-request@lists.midrange.c
<mailto:RPG400-L-request@xxxxxxxxxxxxxxxxxx%3cmailto:RPG400-L-request@lists.
midrange.c>
om>
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l<
https://archive.midrange.com/rpg400-l>
<
https://archive.midrange.com/rpg400-l<
https://archive.midrange.com/rpg400-l
.
Please contact
support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx<mailto:supp
ort@xxxxxxxxxxxxxxxxxxxx%3cmailto:support@xxxxxxxxxxxxxxxxxxxx>> for any
subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com<
https://amazon.midrange.com><
https://amazon.midr
ange.com<
https://amazon.midrange.com>>
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email:
RPG400-L@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxxxxxxxx> To
subscribe, unsubscribe, or
change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l<
https://lists.midrange.
com/mailman/listinfo/rpg400-l>
or email:
RPG400-L-request@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L-request@lists.midrange.c
om>
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l<
https://archive.midrange.com/rpg400-l>
.
Please contact
support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx> for any
subscription related
questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com<
https://amazon.midrange.com>
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email:
RPG400-L@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxxxxxxxx>
To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/rpg400-l<
https://lists.midrange.
com/mailman/listinfo/rpg400-l>
or email:
RPG400-L-request@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L-request@lists.midrange.c
om>
Before posting, please take a moment to review the archives
at
https://archive.midrange.com/rpg400-l<
https://archive.midrange.com/rpg400-l>
.
Please contact
support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx> for any
subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com<
https://amazon.midrange.com>
midrange.com
