Re: COBOL Copy DDS Problem

["Winchester Terry" <terry.winchester@xxxxxxxxxxxxxxx>]

Hmmm...maybe you have a library list problem or something...

Do a DSPFD of UAVBASEF and look at the Record format name
then change your copy statement to:

        COPY DDR-RecordFormatName of UAVBASEF

Terry

> -----Original Message-----
> From: cobol400-l-bounces@xxxxxxxxxxxx 
> [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Don Stafford
> Sent: Tuesday, January 10, 2006 3:00 PM
> To: COBOL Programming on the iSeries/AS400
> Subject: Re: [COBOL400-L] COBOL Copy DDS Problem
> 
> 
> You're probably right - but that returns the same results -
> No format TFACR00 found in file UAVBASEF
> 
> ----- Original Message ----- 
> From: "Joe Pluta" <joepluta@xxxxxxxxxxxxxxxxx>
> To: "'COBOL Programming on the iSeries/AS400'" 
> <cobol400-l@xxxxxxxxxxxx>
> Sent: Tuesday, January 10, 2006 2:44 PM
> Subject: Re: [COBOL400-L] COBOL Copy DDS Problem
> 
> 
> > Shot in the dark, but shouldn't it be COPY DDS-TFACR00?  
> The format name 
> > is
> > TFACR00, not TFACR.
> >
> > Joe
> >
> >> From: Don Stafford
> >>
> >> 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. 
> 
> -- 
> 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.
> 
>