Re: COBOL Copy DDS Problem

You can use COPY DDS-ALL-FORMATS OF .... - personally I prefer COPY
DDSR-ALL-FORMATS OF ..... , because it translates any invalid Cobol
characters for you.

HTH

JP

-----Original Message-----
From: cobol400-l-bounces@xxxxxxxxxxxx
[mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Don Stafford
Sent: Tuesday, January 10, 2006 7: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