Re: how do you rename external file field?

[Jim Langston <jimlangston@xxxxxxxxxxxxxxxx>]

First, I don't know the answer to your question.
Second, why are you renaming your fields?  If it is because they have
the same name, consider using Prefix instead.

FFTPLOG    UF   E             DISK    USROPN
F                                     RENAME(FTPLOG:FLOG) PREFIX(Lg_)
FFTPSRC    IF   E             DISK
F                                     RENAME(FTPSRC:FSRC) PREFIX(Sr_)

Now, SRCDTA from FTPLOG is called Lg_SRCDTA and SRCDTA from FTPSRC is
called SR_SRCDTA

If that is why you are renaming fields.

Regards,

Jim Langston

Me transmitte sursum, Caledoni!

Slava Zharichenko wrote:
> 
> I am converting RPGIV program to ILE and now having a problem renaming
> external file fields.
> any ideas?
> 
> FFTPLOG    UF   E             DISK    USROPN
> F                                     RENAME(FTPLOG:FLOG)
> FFTPSRC    IF   E             DISK
> F                                     RENAME(FTPSRC:FSRC)
>  *
> 
> ......
> D...
> 
> IFSRC          01
> I              SRCDTA                      SRCDT
> I              SRCDAT                      SRCDA
> 
> but when converting to module with NOmain i am getting errors on  I specs,
> moving it before Prototype definition did not help
+---
| 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
+---