> -----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/