Date:         Tue, 29 Oct 2002 08:28:11 +0100
Reply-To:     Rita Clivio <Clivio@databank.it>
Sender:       "SPSSX(r) Discussion" <SPSSX-L@LISTSERV.UGA.EDU>
From:         Rita Clivio <Clivio@databank.it>
Subject:      Help!!! Preparing files for bootsrap - 1 solution
Content-Type: text/plain; charset="iso-8859-1"

Dear Listers
I succeed in preparing this syntax (and I join with you , maybe it could be useful to someone); it works, but xsave command doesn't allow more than 10 iterations. I'm looking for another solution.



DEFINE !prova (VAR1= !TOKENS(1)/ VAR2= !TOKENS(1) / VAR3= !TOKENS(1) ).
!DO !i=1 !TO !VAR1.
+ DO IF !VAR2=!i.
+  !DO !k=1 !TO 4.
+   DO IF area=!k.
+    !DO !j=1 !TO 4.
+      DO IF size=!j.
+        DO IF prod =!VAR3.
+           XSAVE OUTFILE=!QUOTE(!CONCAT("e:\Temp\TEMP\file","R",!i,"_",!k,"_",!j,"_",!VAR3,".sav"))
                /KEEP=aaa bbb ccc ddd eee .
+       END IF.
+     END IF.
+    !DOEND.
+   END IF.
+  !DOEND.
+ END IF.
!DOEND.
EXECUTE.
!ENDDEFINE.

!prova VAR1=5  VAR2=custom  VAR3=525 .




Cordiali Saluti - Best Regards

Rita Clivio

Databank Spa
via Piatti 11 Milano 20123
tel 02 55002.381
fax 02.8056495