回信： What am I missing, or free-form data structures and the group data area.

HI,
FREE FORM LOCAL DATA AREA IS:

Dcl-DS *N DTAARA(*AUTO);


Please Reference: sc092508a.pdf

IBM i
Version 7.1
Programming
IBM Rational Development Studio for i
ILE RPG Reference


In addition, there are four special data structures, each with a specific
purpose:
A data area data structure (identified by the *AUTO parameter of the DTAARA
keyword for a
free-form definition or a U in position 23 of a fixed-form definition)


Best Regards,


=======================


|--------+------------------------------->
| | Chris Pando |
| | <chris.pando@xxxxxxxx|
| | m> |
| | 寄件人： "RPG400-L" |
| | <rpg400-l-bounces@mid|
| | range.com> |
| | |
| | |
| | 2016/03/09 上午 11:37|
| | 請回信 給 "RPG |
| | programming on the |
| | IBM i \(AS/400 and |
| | iSeries\)" |
|--------+------------------------------->
>--------------------------------------------------------------------------------------------------------------------------------------|
| |
| 收件人： rpg400-l@xxxxxxxxxxxx |
| 副本抄送： |
| 主旨： 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
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.