Re: [EXTERNAL] Question on file reading

Jon:

I worked at IBM Rochester, MN from 1986 to 1989 on System 36 support while
the AS400 was being developed.

The Mayo Clinic is in Rochester. Like 27,000 employees. Lots of nurses at
the time who were female, age 23 to 37, and single.

The ration was like 6 to 1 available women to guys.

Most of the software developers at IBM still could not get dates. They
were instead doing these "not well understood" things.

I supported REMOTE ATTACHED and DHCF at the time. Allowing System 36
screens on mainframes. 5250 data streams vs 3270 data streams.

The three main programs for DHCF had a lot of tracing in them that could be
turned on. I asked the original developer why there was nothing to show
what tracing statement came from where. He commented that just seeing the
flow of the tracing statements showed where they came from.

I asked if we could not put a number in the tracing statements to show
where they came from.

HECK NO the guy said. That will not work - he said.

=====================

When I figured out how to do this the dude almost had a breakdown in front
of me. Asking who told me I could make these modifications. I said I did
the work on my
own time and the code changes were in my private partitioned data sets.

My problem - maybe gift - is that I am really not that smart. I always have
to do things the simple way.

But when production is down and the cost is $14 a minute due to the
warehouse not working - this happened once to me - my code works.

Thomas

On Tue, Jun 9, 2020 at 10:57 AM Jon Paris <jon.paris@xxxxxxxxxxxxxx> wrote:

Not an idiot by any means.

It is not that widely known or understood. Heck if it was I couldn't have
been able to write articles on the topic <grein>

On Jun 9, 2020, at 11:07 AM, Thomas Burrows <

thomas.burrows.1957@xxxxxxxxx> wrote:

Guess I am an idiot for not knowing this concept.

On Tue, Jun 9, 2020 at 10:06 AM Jon Paris <jon.paris@xxxxxxxxxxxxxx>

wrote:

Alan - COBOL permits the same name to be used in multiple places and

they

can even have different definitions. You just have to qualify the name
when you use it. i.e. AccountNo of MyRecord.

On Jun 9, 2020, at 10:58 AM, Alan Shore via RPG400-L <

rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:

Hi Thomas
I came from coding in COBOL, where more than one field with the same

name was a compile error

You are correct
ANY field with the same name - a stand-alone filed - a field in another

file, when a file is read - the data in those fields are all populated

if

they are the same name and size

I have grown into a love hate relationship with this
MOST of the time - it can kill you
However - there ARE some times it can be great

Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf

Of Thomas Burrows

Sent: Tuesday, June 9, 2020 10:53 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <

rpg400-l@xxxxxxxxxxxxxxxxxx>

Subject: [EXTERNAL] Question on file reading

In RPGIV - maybe this is true in free format - if a Data Structure is

defined with the exact names and sizes of the fields in a file when the
file is read is the data structure automatically loaded?

Personally I have never seen this before.

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

Help support midrange.com by shopping at amazon.com with our affiliate

link: https://amazon.midrange.com

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

Help support midrange.com by shopping at amazon.com with our affiliate

link: https://amazon.midrange.com

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

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

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

Help support midrange.com by shopping at amazon.com with our affiliate

link: https://amazon.midrange.com

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

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com