> -----Original Message-----
> From: Riffel-Darter, Barbara
> Sent: Thursday, August 05, 2004 9:53 AM
> To: [EMAIL PROTECTED]
> Subject: [U2] -UNIBASIC - MULTIPLE SAVEDLIST
> 
> In the code below once we execute the second save.list and 
> return to the
> first paragraph we have lost SL.HRPER.PLINK our primary driver file.

You need to add TO clauses to your GETLISTs, and FROM clauses to your
READNEXTs.  Something like:

> GET.HR.INFO:
>  EXECUTE "SELECT HRPER"
>  EXECUTE "SAVE.LIST SL.HRPER.PLINK"
> 
>  GETLIST "SL.HRPER.PLINK" TO HRPER.LIST SETTING X.CTR THEN
                            ^^^^^^^^^^^^^
>   FOR ENTRY = 1 TO X.CTR
>     READNEXT X.ID FROM HRPER.LIST THEN
                    ^^^^^^^^^^^^^^^
>              ...........
> 
> GET.LAST.PAY.DATE:
>  EXECUTE "SELECT PAYPRDS"
>  EXECUTE "SAVE.LIST SL.PAYPRDS.PLINK"
> 
>     GETLIST "SL.PAYPRDS" TO PAYPRDS.LIST SETTING X.MAX.REC THEN
                           ^^^^^^^^^^^^^^^
>         FOR X.CTR1 = 1 TO X.MAX.REC
>            READNEXT X.PAYPRD.ID FROM PAYPRDS.LIST THEN
                                  ^^^^^^^^^^^^^^^^^
>              ...........

I'm actually not sure if Unidata supports list variables instead of, or in
addition to, numbered lists.  If the above doesn't work, try using FROM/TO 1
rather than HRPER.LIST, and FROM/TO 2 rather than PAYPRDS.LIST.
-------
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to