Re: data area

[Joep Beckeringh <joep@xxxxxxxxxxxxxxxxxxx>]

Robert,

Like Scott explained, you read the LDA twice. When you specify the 'U' in the D 
spec, the data area is read during program initialization and updated when the 
program ends (LR on). The IN operation could be useful when you have reason to 
believe that the contents of the data area have changed (e.g. you called another 
program that updated the LDA).

Joep Beckeringh


Joubert, Robert wrote:

> This works:
>
>
> D
>
> D* Get the *LDA
>
> D DALDA          UDS                  dtaara(*LDA)
>
> D  DAFld1                 1      4
>
> D  DAFld2                10     19
>
> D  DAFld5                20     30
>
> D  DAFld3               115    115
>
>   
>
>
> C                                                       
> C* Get the Local Data Area                              
> C                   in        DALDA                     
> C                                                       
> C* Populate the workfields from the *LDA                
> C                   eval      #fld1 = DAFld1            
> C                   eval      #fld2 = DAFld2