(no subject)

[Villegas Emilio]

Hello!


Can someone help me to write a syntax that makes it easier to do run this syntax 402 times.

//Emilio


GET
  FILE='G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\aggr_org_datum_hist_fakturor_2_sena5.sav'.

select if(dt1 >= 0).
Comp dt = dt1.
comp lopnr = 1.
exe.

SAVE OUTFILE='G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\temp1.sav'
 /drop dt1 to dt402
 /COMPRESSED.

******************************.
GET
  FILE='G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\aggr_org_datum_hist_fakturor_2_sena5.sav'.

select if(dt2 >= 0).
Comp dt = dt2.
comp lopnr = 2.
exe.

SAVE OUTFILE='G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\temp2.sav'
 /drop dt1 to dt402
 /COMPRESSED.

******************************.
GET
  FILE='G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\aggr_org_datum_hist_fakturor_2_sena5.sav'.

select if(dt3 >= 0).
Comp dt = dt3.
comp lopnr = 3.
exe.

SAVE OUTFILE='G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\temp3.sav'
 /drop dt1 to dt402
 /COMPRESSED.

[Jerabek Jindrich]

Hello,

a macro could do it.

(NOT tested)

DEFINE !MyMAc() .
GET
FILE='G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\aggr_org_datum_hist_fakturor_2_sena5.sav'.

!do !n = 1 !to 402
TEMP.
select if !CONCAT("dt",!n) >= 0.
Comp dt = !CONCAT("dt",!n) .
comp lopnr = !n.

SAVE OUTFILE=!QUOTE(!CONCAT('G:\__Analys\SPSS\Projekt\Scoring\Validering Ansöks-PD\2007\Data\temp',!n,'.sav/drop dt1 to dt402  /COMPRESSED. '))



!doend

!ENDDEFINE.

SET mprint = on.

!MyMAc.

SET mprint = off.


best regards
Jindra

> ------------ Původní zpráva ------------
> Od: Villegas Emilio <[hidden email]>
> Předmět:
> Datum: 17.7.2007 14:44:33
> ----------------------------------------
> Hello!
>
>
> Can someone help me to write a syntax that makes it easier to do run this syntax
> 402 times.
>
> //Emilio
>
>
> GET
>   FILE='G:\__Analys\SPSS\Projekt\Scoring\Validering
> Ansöks-PD\2007\Data\aggr_org_datum_hist_fakturor_2_sena5.sav'.
>
> select if(dt1 >= 0).
> Comp dt = dt1.
> comp lopnr = 1.
> exe.
>
> SAVE OUTFILE='G:\__Analys\SPSS\Projekt\Scoring\Validering
> Ansöks-PD\2007\Data\temp1.sav'
>  /drop dt1 to dt402
>  /COMPRESSED.
>
> ******************************.
> GET
>   FILE='G:\__Analys\SPSS\Projekt\Scoring\Validering
> Ansöks-PD\2007\Data\aggr_org_datum_hist_fakturor_2_sena5.sav'.
>
> select if(dt2 >= 0).
> Comp dt = dt2.
> comp lopnr = 2.
> exe.
>
> SAVE OUTFILE='G:\__Analys\SPSS\Projekt\Scoring\Validering
> Ansöks-PD\2007\Data\temp2.sav'
>  /drop dt1 to dt402
>  /COMPRESSED.
>
> ******************************.
> GET
>   FILE='G:\__Analys\SPSS\Projekt\Scoring\Validering
> Ansöks-PD\2007\Data\aggr_org_datum_hist_fakturor_2_sena5.sav'.
>
> select if(dt3 >= 0).
> Comp dt = dt3.
> comp lopnr = 3.
> exe.
>
> SAVE OUTFILE='G:\__Analys\SPSS\Projekt\Scoring\Validering
> Ansöks-PD\2007\Data\temp3.sav'
>  /drop dt1 to dt402
>  /COMPRESSED.
>
>
>