Re: Fields from unused record formats

Hmm.. have you tried the INCLUDE keyword?

FPrinter   O    E             Printer Include(FMTA) 

is accepted by PDA although not sure what it would do in a compile.

When I have questions like these I will prompt the F spec line with F4, go over
to the Keywords field and hit F1 and see what's available.

Regards,

Jim Langston

Me transmitte sursum, Caledoni!

Andy Leisk wrote:
> 
> I'm a bit stumped by this and hope someone in this group can point me at a way
> to understand this.
> 
> Situation:
> 
> Given an externally described print file with multiple record formats.
> 
> for example:
> FMTA
>     FieldA1             Char    10
>     FieldA2             Char    20
> FMTB
>    FieldA3             Char   15
> FMTC
>   FieldA1              Char   5
>   FieldA2              Char   6
>   FieldA3              Char   7
> 
> When I have an RPG/400 (RPG/III) program that uses this file and only uses
> FMTA I get a clean compile and can use the program because although all
> formats exist in the print file, only the fields from FMTA are brought into
> the program.
> 
> But Now I have tried to convert ot RPG/IV and even though only FMTA is written
> to in the program, all formats of the external print file have the fields
> brought into the program.  I am getting a compile error:
> 
> RNF6033   Length of externally-described field is not the same as a
>  prior definition; specification is ignored.
> 
> So after all this here is my question:
> 
> Is there some way to tell the RPG/IV compiler to ignore those record formats
> of the print file which are not used?
> 
> Andy Leisk
> Stratagem Inc., I.T. Consultant at Banta Corp.
> (Rent-a-programmer and AS/400 computer janitor)
> 920-751-4434
+---
| 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
+---