Re: compile error RNF3523

[Booth Martin <booth@xxxxxxxxxxxx>]

Why would you need three EXTNAMEs?

Something like this should work:

 D INREC1     E DS             EXTNAME(TOTOUTR)
 D INREC2     E DS             Like(INREC1)
 D OUTREC     E DS             like(INREC1) PREFIX(M)

On 1/18/2012 2:38 PM, Shari Koehler wrote:
> Need help getting past this compile error. I have 2 logical files that I need to access for data. They both have the same record format and are built over multiple physical files. My output file also has the same layout and format. I have listed each file in the F specs and have also created a data structure for each so I can move the data easily. I continue to get this error on the 2 L999999_L  files when compiling.   *RNF3523 40      2 The external description of the externally-described data structure was not found. I had no problem compiling when the data structures were not in the code. Can anybody see what I am missing??
>
> FL999999EXtO    E             DISK
> FL999999_L1IF   E           K DISK    RENAME(TOTOUTR:DB523AR)
> f                                                             INCLUDE(TOTOUTR)
> FL999999_L2IF   E           K DISK    RENAME(TOTOUTR:DB523BR)
> f                                                             INCLUDE(TOTOUTR)
> D INREC1        E DS                  EXTNAME(L999999_L1:DB523AR)
> D INREC2        E DS                  EXTNAME(L999999_L2:DB523BR)
> D OUTREC      E DS                  EXTNAME(L999999EXt)
> D                                                  PREFIX(M)
>
> Thanks,
> Shari