Re: Using a data structure on an externally defined file

[Hans Boldt <boldt@xxxxxxxxxx>]

rob@xxxxxxxxx wrote:
> V5R2 is supposed to allow the use of a data structure on an externally 
> defined file.
>
> Must be me?
>
> I verified that we are using TGTRLS(*CURRENT) and we are running V5R2.
>
>      FFLWORK    IF   E           K DISK
>       * Describe FLWORK Record to get Amount Columns in an array
>
>       // if you change the dimension of the array you must:
>       // a) Change the ending position of colalpha
>       // b) Change the dim() statements
>      D FLWORKREC     E DS                  EXTNAME(FLWORK:*input)
>      D  colalpha              39   3150a
>      D  col                          15p 4 overlay(colalpha) dim(389)
>       * FLWORK Key List
>
>      C     FLWORKey      KLIST
>      C                   KFLD                    CO
>      C                   KFLD                    LOC
>      C                   KFLD                    ACT
>       /free
>        Chain(e) FLWORKey FLWORK FLWORKREC;
>       /end-free
> results in:
>  Msg id  Sv Number Message text  
> *RNF5155 20      1 The Result-Field operand is not allowed for specified   


Code the record name as the second argument of CHAIN instead of the 
file name. Also, if I'm not mistaken, I believe the data structure 
specified as the third argument has to be defined with LIKEREC.

Cheers! Hans