Rob,

I was not referring to your example. I was referring to Carel's statement
that data structure arrays did NOT need to be QUALIFIED when in fact they
do.

Thanks,

Mark

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


-----Original Message-----
From: rob@xxxxxxxxx
Sent: Wednesday, March 10, 2004 5:21 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Cc:
Subject: 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> )


Take another look at my example.  I did NOT dim the DS.  In fact the DS
had no name.  I overlaid a subfield.
>> d                 ds
>> d chargegroup                         dim(20)
>> d  chargedesc                   30    overlay(chargegroup)
>> d  chargetotal                  17  2 overlay(chargegroup:*next)


Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





MWalter@xxxxxxxxxxxxxxx
Sent by: midrange-l-bounces@xxxxxxxxxxxx
03/10/2004 03:31 PM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>


To
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
cc

Subject
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.




_______________________________________________
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.


_______________________________________________
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.





As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2022 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.