Re: What am I missing, or free-form data structures and the group data area.

Hmm, this is what I see in fixed form.

c *dtaara define *lda lda 1024
c *dtaara define *pda pda 2000
c *dtaara define *gda gda 512
^
RNF5024E Factor 2 operand is not valid.

Attempting to compile I get:
RNF5205: The Data-Area name specified in Factor 2 Entry is not valid. Factor 2 ignored.
RNF5024: Factor 2 operand is not valid.

Both on the *gda line.

So how are you doing this in fixed form? It appears to not work there either.

Mark Murphy
STAR BASE Consulting, Inc.
mmurphy@xxxxxxxxxxxxxxx


-----Chris Pando <chris.pando@xxxxxxxxx> wrote: -----
To: rpg400-l@xxxxxxxxxxxx
From: Chris Pando <chris.pando@xxxxxxxxx>
Date: 03/08/2016 10:37PM
Subject: What am I missing, or free-form data structures and the group data area.


Unless I have missed something, I have found a deficiency in the free-form
data structure definition.

If I want to use the local data area, mapped to a data structure defined by
an external (reference) file (e.g. LDA),
my declaration would look like:

Dcl-DS lda Ext DtaAra(*LDA) End-DS

No problem. But I can't do the same for the group data area (which our menu
system uses).

Dcl-DS gda Ext DtaAra(*GDA) End-DS

generates an RNF3343, which says only *LDA and *PDA are valid.

Have I found something free-from can't do (makes it sort of hard to argue
free-form should be the standard), or am I missing something?

chris@xxxxxxxxx
www.brilligware.com