× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



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.





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