Re: COBOL Copy DDS Problem

Don,

As I understand it, when you create the Physical File
using CRTPF and it contains a "reference" file (TFUDD)
the field characteristics are taken from the reference
file when the phycial object is created. 

Once the PF has been created, the compiler then gets
it's internal field information from the actual object,
hence the need to create the PF before compiling a 
program.

Or maybe I didn't understand your question!

Terry

> -----Original Message-----
> From: cobol400-l-bounces@xxxxxxxxxxxx 
> [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Don Stafford
> Sent: Tuesday, January 10, 2006 2:35 PM
> To: COBOL Programming on the iSeries/AS400
> Subject: [COBOL400-L] COBOL Copy DDS Problem
> 
> 
> I have a DDS (RPG) I am trying to use in my Cobol code.
> Here is part if the TFACR DDS..........
> 
>  A**
>  A                                      REF(TFUDD)
>  A**
>  A          R TFACR00                   TEXT('Account Criteria File')
>  A**
>  A            ATORG     R               REFFLD(ORIG)
>  A            ATSHAC    R               REFFLD(ACCT)
>  A                                      COLHDG('Ship Account')
> 
> The REF(TFUDD) contains the actual field descriptions, sizes, etc.
> What syntax do I use to get the Cobol compiler to read the 
> TFACR DDS, but 
> reference the TFUDD to get the inidividual field size information?
> 
> I am using
>         COPY DDS-TFACR OF UAVBASEF.
> 
> This results in
>         No format TFACR found in file UAVBASEF
> 
> 
> -- 
> This is the COBOL Programming on the iSeries/AS400 
> (COBOL400-L) mailing list
> To post a message email: COBOL400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
> or email: COBOL400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/cobol400-l.
> 
>