Darryl Freinkel

A4G

Telephone: 770.321.8562 Mobile: 678.355.8562



-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Alan Shore
via RPG400-L
Sent: Thursday, October 14, 2021 1:18 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Cc: Alan Shore <ashore@xxxxxxxx>
Subject: RE: [EXTERNAL] Question on failing SETGT followed by SETGT



Hi Darryl

Looking at what you sent - its tough to determine what fields have what
value Can you put the data into a spreadsheet and copy and paste that into
the e-mail No need to put the entire record - just the values of the keys





FTCODE From To FTFPCT FTFPC2

FTTHR1 FTHR2 FTMIN$ FTPRF FTTRM FTFTRM I/C FTEMM FTEDD FTECC FTEYY

2009-03-01 2011-05-29 0.0300 0.0000 0 0 0

3 1 20 9

2011-05-30 2011-07-17 0.0350 0.0000 0 0 0

5 30 20 11

2011-07-18 2011-10-16 0.0360 0.0000 0 0 0

7 18 20 11

2011-10-17 2012-01-16 0.0350 0.0000 0 0 0

10 17 20 11

2012-01-16 2012-04-15 0.0350 0.0000 0 0 0

1 16 20 12

2012-04-16 2012-07-15 0.0350 0.0000 0 0 0

4 16 20 12

2012-07-16 2012-10-15 0.0350 0.0000 0 0 0

7 16 20 12

2012-10-16 2013-01-21 0.0350 0.0000 0 0 0

10 16 20 12

2013-01-22 2017-09-10 0.0350 0.0000 0 0 0

1 22 20 13

2017-09-11 0000-00-00 0.0000 0.0000 0 0 0 Y PD PD PD 9 11 20 17 CH
2021-05-31 2021-06-30 0.0300 0.0150 5000 0 20

5 31 20 21

CH 2021-07-01 0000-00-00 0.0300 0.0150 5000 99999 20

7 1 20 21

ID 2021-09-01 0000-00-00 0.0300 0.0150 3000 7000 20

9 1 20 21

RS 2021-05-31 0000-00-00 0.9900 0.0000 1000 99999 20

5 31 20 21

WH 2021-05-31 0000-00-00 0.0300 0.0150 3000 12000 20

5 31 20 21







Alan Shore

Solutions Architect

IT Supply Chain Execution



[cid:image001.png@01D7C0FD.EA354EE0]



60 Orville Drive

Bohemia, NY 11716

Phone [O] : (631) 200-5019

Phone [C] : (631) 880-8640

E-mail : <mailto:ASHORE@xxxxxxxxxxxxxxxxxxxx> ASHORE@xxxxxxxxxxxxxxxxxxxx



'If you're going through hell, keep going.'

Winston Churchill



From: RPG400-L [ <mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>
mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of
<mailto:dfreinkel@xxxxxxxxxxxxxxxxx> dfreinkel@xxxxxxxxxxxxxxxxx

Sent: Thursday, October 14, 2021 1:15 PM

To: 'RPG programming on IBM i' < <mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>
rpg400-l@xxxxxxxxxxxxxxxxxx>

Subject: RE: [EXTERNAL] Question on failing SETGT followed by SETGT



Basically, it does not find the record and so executes the code for record
not found.



Darryl Freinkel

A4G

Telephone: 770.321.8562 Mobile: 678.355.8562



-----Original Message-----

From: RPG400-L <
<mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx%3cmailto:rpg400-l-bounces@lists.
midrange.com>
rpg400-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l-bounces@lists.midrange.c
om>> On Behalf Of Alan Shore via RPG400-L

Sent: Thursday, October 14, 2021 12:36 PM

To: RPG programming on IBM i <
<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx%3cmailto:rpg400-l@xxxxxxxxxxxxxxxxxx>
rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>>

Cc: Alan Shore < <mailto:ashore@xxxxxxxx%3cmailto:ashore@xxxxxxxx>
ashore@xxxxxxxx<mailto:ashore@xxxxxxxx>>

Subject: RE: [EXTERNAL] Question on failing SETGT followed by SETGT



Hi Darryl

When you say

The line failing is the line with code ID.



How does it fail

I was assuming that the program couldn't find a particular key



Alan Shore

Solutions Architect

IT Supply Chain Execution



--

This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email:
<mailto:RPG400-L@xxxxxxxxxxxxxxxxxx%3cmailto:RPG400-L@xxxxxxxxxxxxxxxxxx>
RPG400-L@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxxxxxxxx>

To subscribe, unsubscribe, or change list options,

visit:
<https://lists.midrange.com/mailman/listinfo/rpg400-l%3chttps:/lists.midrang
e.com/mailman/listinfo/rpg400-l>
https://lists.midrange.com/mailman/listinfo/rpg400-l<https://lists.midrange.
com/mailman/listinfo/rpg400-l>

or email:
<mailto:RPG400-L-request@xxxxxxxxxxxxxxxxxx%3cmailto:RPG400-L-request@lists.
midrange.com>
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%3chttps:/archive.midrange.com/rpg400-
l>
https://archive.midrange.com/rpg400-l<https://archive.midrange.com/rpg400-l>
.



Please contact
<mailto:support@xxxxxxxxxxxxxxxxxxxx%3cmailto:support@xxxxxxxxxxxxxxxxxxxx>
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%3chttps:/amazon.midrange.com>
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: <mailto:RPG400-L@xxxxxxxxxxxxxxxxxx>
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: <mailto:RPG400-L-request@xxxxxxxxxxxxxxxxxx>
RPG400-L-request@xxxxxxxxxxxxxxxxxx

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 <mailto:support@xxxxxxxxxxxxxxxxxxxx>
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


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

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

This mailing list archive is Copyright 1997-2021 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.