RE: Can I Rename A Field For An Output File?

["Joe Giusto II \(E-mail\)" <juicenetdps@xxxxxxxxxxxxxx>]

Records are read from one file and written to another.  The reason for the
rename in this program is because the size of the field in the input file
was increased and the output file will not be.  Truncation of the data in
the output file is O.K., so we are not changing the actual field name in the
DDS, just in the program so that we can move the data to output file keeping
the same field name with different sizes.  Not my decision, but I have to
modify the program.



Joe Giusto II
Programmer/Analyst
Ritz Camera
Beltsville, MD
301-419-3209 x347
410-813-2812 x347

 -----Original Message-----
From:   owner-rpg400-l@midrange.com [mailto:owner-rpg400-l@midrange.com]  On
Behalf Of Saunders, Martin P
Sent:   Thursday, July 19, 2001 11:26 AM
To:     'RPG400-L@midrange.com'
Subject:        RE: Can I Rename A Field For An Output File?

Just out of curiosity, why would you do this?  The renamed field would only
stay renamed within the program while it was active and records from output
only files are not available in the program anyway.  At least that's how I
thought it worked.

Martin

-----Original Message-----
From: Joe Giusto II (E-mail) [mailto:juicenetdps@crosswinds.net]
Sent: 19 July 2001 3:50
To: RPG400-L@midrange.com
Subject: Can I Rename A Field For An Output File?



I am trying to rename a field on a file that is output only.  I tried:

0011.00 FWHPCPD    O    E             DISK
0013.00 IWHFCPD
0014.00 I              LOCAT                       LOCAT5

but received an error:
0005.77 *RNF4005 40      1 File-Name or Record-Name entry is not valid;
input record is
0005.78                    ignored.

is there any other way to do it besides describing the file as Input with
Add allowed?

Thank you,

Joe Giusto II
Programmer/Analyst
Ritz Camera
Beltsville, MD
301-419-3209 x347
410-813-2812 x347


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---


****************************************************************************
****************
" This message contains information that may be privileged or confidential
and
is the property of the Cap Gemini Ernst & Young Group. It is intended only
for
the person to whom it is addressed. If you are not the intended recipient,
you
are not authorized to read, print, retain, copy, disseminate, distribute, or
use
this message or any part thereof. If you receive this message in error,
please
notify the sender immediately and delete all copies of this message ".
****************************************************************************
****************
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---