RE: RE: RE: is there a better way... (Sent by midrange-l-bounces@xxxxxxxxxxxx on behalf of rob@xxxxxxxxx ) (Sent by midrange-l-bounces@xxxxxxxxxxxx on behalf of "Carel Teijgeler" <coteijgeler@xxxxxxxxx> )

Carel,

I don't think I'm confused. Here is a failed compile of a Data structure
array that is not qualified.

      1 Darr              S              1    dim(10)

      2 Dfld              S             10    based(p_arr)

      3 D x               s             10i 0

      4 DdsARr            DS                  dim(10)

 ======>                                      aaa

 *RNF3545 20 a      000202  Keyword DIM is not allowed for data structure
that is not
                            qualified.

      5 D dsfld                          5


t   F5=Refresh   F9=Retrieve   F10=Cursor   F11=Toggle   F12=Cancel


Thanks,

Mark

Mark Walter
Senior Programmer/Analyst
CCX, Inc.
mwalter@xxxxxxxxxx
http://www.ccxinc.com


-----Original Message-----
From: "Carel Teijgeler" <coteijgeler@xxxxxxxxx>
Sent: Wednesday, March 10, 2004 3:24 PM
To: midrange-l@xxxxxxxxxxxx
Cc:
Subject: RE: RE: is there a better way... (Sent by
midrange-l-bounces@xxxxxxxxxxxx on behalf of rob@xxxxxxxxx ) (Sent by
midrange-l-bounces@xxxxxxxxxxxx on behalf of "Carel Teijgeler"
<coteijgeler@xxxxxxxxx> )


To do this the datastructure do not have to be qualified; that is a myth. I
think you are confused with the OVERLAY keyword, available since V3R2M0.

Rob's example is the way I would do this and I am doing it this way, at
V5R1.

Regards,
Carel Teijgeler

*********** REPLY SEPARATOR  ***********

On 9-3-04 at 16:53 MWalter@xxxxxxxxxxxxxxx wrote:

>To use an array datastructure the data structure has to be qualified. And
>come to think of it, I don't think qualified ds came about till V5R2. I'd
>guess that if seu is balking, it isn't supported in V5R1.
>
>-----Original Message-----
>From: rob@xxxxxxxxx
>Subject: RE: is there a better way...
>
>Sample:
>> d                 ds
>> d chargegroup                         dim(20)
>> d  chargedesc                   30    overlay(chargegroup)
>> d  chargetotal                  17  2 overlay(chargegroup:*next)



_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.