Re: How do I rename a file's fields in RPG/400. -- RPG400-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

Subject: Re: How do I rename a file's fields in RPG/400.
From: Peter Dow <petercdow@xxxxxxxxx>
Date: Wed, 22 Sep 2021 09:34:25 -0700
List-archive: <https://archive.midrange.com/rpg400-l/>
List-post: <mailto:rpg400-l@lists.midrange.com>
List-subscribe: <https://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=subscribe>
List-unsubscribe: <https://lists.midrange.com/mailman/options/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=unsubscribe>

Hi Darryl,

Convert it to ILE!

Aside from that, can we see the definitions of the concatenated fields, and how you tried to rename them?

--
*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
petercdow@xxxxxxxxx <mailto:petercdow@xxxxxxxxx>
pdow@xxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxx> /

On 9/22/2021 9:12 AM, dfreinkel@xxxxxxxxxxxxxxxxx wrote:

I have to modify a RPG/400 program and need to read File_A a second time. I
have created a LF FILE_A1 to do that. The LF has all fields plus 2
concatenated fields for a from and to date.

So far so good.

I need to rename the fields so that when I chain to the file, the values
read in go to a renamed field.

I have tried a few options and the last version had the I-spec as

IOEFRTF1
5042

I FTECC DSECC
5042

I FTEYY DSEYY
5042

I FTEMM DSEMM
5042

I FTEDD DSEDD
5042

Compiling fails with QRG7030 on the 2 concatenated fields.

How should I do this?

TIA

Darryl Freinkel

A4G

Telephone: 770.321.8562 Mobile: 678.355.8562

As an Amazon Associate we earn from qualifying purchases.

Follow-Ups:

RE: How do I rename a file's fields in RPG/400. , dfreinkel

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.