Re: arrays

["Cullina, Adam" <cullinaa@UMSYSTEM.EDU>]

Small Array Example:  I've used arrays quite a bit with SQR, and they work
pretty well.  There are some nice sorting and searching examples on
www.sqrtools.com

Adam:


BEGIN-SETUP

        CREATE-ARRAY NAME=MY_ARRAY SIZE = 50
        FIELD=NAME:CHAR
        FIELD=ID:CHAR
        FIELD=MY_DATE:DATE

END-SETUP

BEGIN-PROGRAM
DO CREATE_DEP

while #i < #array_count
 get $name $id $my_date from my_array(#i)
 show $name ' ' $id ' ' $my_date
 add 1 to #i
end-while



END-PROGRAM

BEGIN-PROCEDURE CREATE_DEP

BEGIN-SELECT DISTINCT
DEP_BIRTH_DATE
DEP_FED_ID_NO
DEP_NAME
DEP_RELATIONSHIP
SEX &GENDER_CHECK

        DO DEP_INSERT


FROM HRS.BEN_DEPENDENTS
WHERE FEDERAL_ID_NUMBER = $FEDERAL_ID_NUMBER
END-SELECT

END-PROCEDURE


BEGIN-PROCEDURE DEP_INSERT

PUT &DEP_NAME &DEP_FED_ID_NO &DEP_BIRTH_DATE into my_array(#array_count)
add 1 to #array_count

END-PROCEDURE DEP_INSERT

-----Original Message-----
From: Johnson, Dan [mailto:Dan_Johnson@WRIGHTEXPRESS.COM]
Sent: Thursday, November 30, 2000 4:06 PM
To: SQR-USERS@list.iex.net
Subject: Re: arrays


Actually, all SQR arrays are by default n X m dimensional. Where n is the
number of defined fields and m is the size specified in the declare.

Dan

                -----Original Message-----
                From:   Kraber, Jewel
[mailto:JewelKraber@FINANCIAL.WELLSFARGO.COM]
                Sent:   Thursday, November 30, 2000 4:55 PM
                To:     SQR-USERS@list.iex.net
                Subject:        arrays

                Has any one every done a two dimensional array in SQR?
Maybe it is not even
                possible.

                Thank-You

                Jewel Kraber