Hi   I am trying to get a macro to loop thorugh a set of variables doing the same calculations. Here is what I have   And I am not sure if the Getvars and the macro varslist does work neither do the loop...:((((   %Macro GetVars(PSI) ; %Local VarList ; /* open dataset */ %Let FID = %SysFunc(Open(&PSI)) ; /* If accessable, process contents of dataset */ %If &FID %Then %Do ; %Do I=1 %To %SysFunc(ATTRN(&FID,NVARS)) ; %Let VarList= &VarList %SysFunc(VarName(&FID,&I)); %End ; /* close dataset when complete */ %Let FID = %SysFunc(Close(&FID)) ; %End ; &VarList %Mend ; %DO_OVER(values= proc freq data=PSI; table ? /out=PSI_?_all noprint nocol nocum nopercent norow;run; proc freq data=PSI; table ?/out=PSI_?_bad noprint nocol nocum nopercent norow;where Bad_final=1;run; proc freq data=PSI_OOT; table ? /out=PSI_OOT_? all noprint nocol nocum nopercent norow;run; proc freq data=PSI_OOT; table ?/out=PSI_OOT_?_bad noprint nocol nocum nopercent norow;where Bad_final=1;run; Proc sql; Create table PSI_? as select t1.?, t1.Count as Dev, t1.Percent as Spread_DEV, t2.Count as OOT, t2.Percent as Spread_OOT, t3.Count as Bad_DEV, t3.Percent as Spread_Bad_DEV, t4.Count as Bad_OOT, t4.Percent as Spread_Bad_OOT from PSI_?_all as t1 left join PSI_OOT_?all as t2 on t1.? = t2.? left join PSI_?_bad as t3 on t1.? = t3.? left join PSI_OOT_?_bad as t4 on t1.? =t4.? ; QUIT; DATA PSI_?_1; SET PSI_?; PSI = ABS((Spread_DEV-Spread_OOT)*log(Spread_DEV/Spread_OOT))/100; PSI_bad = ABS((Spread_bad_DEV-Spread_bad_OOT)*log(Spread_bad_DEV/Spread_bad_OOT))/100; PSI_bad_error = PSI*PSI_bad*1000 ; Run; Proc Summary data=PSI_?_1 nway missing; VAR PSI PSI_bad PSI_bad_error; OUTPUT OUT=PSI_?_2 (drop=_FREQ_ _TYPE_) Sum=; Run; %DO_OVER(Values=varlist, PHRASE=?); ... View more

Hi   How can I recreate my tree in SAS miner, when I only have the code in sas eg. ... View more

data monthly_data  ;* add rows for months with no spend ;     set summary1 ;     by id ;     priordate = lag( date ) ;     if first.id then priordate= date ;     output ;     spend = . ;     target = date ;     date = priordate ; if last.id then target=&firstday. ;   output ;     do while( intck( 'month', date, target) > 1) ;          date= intnx( 'month', date, 1) ;          output ;     end ;     keep id spend date ; run ; Allright if I insert the code marked in brown I try to make the last.id be equal to a macro which I have firstday = put(intnx('month',today(),0),DATE9.); However this results in a syntax error.... ... View more

I have this code: which generates missing months between dates. eg: However I want to force the the second current month, which today will be July. 1 id Char 200 2 date Num 8 YYMMN6. 3 _TYPE_ Num 8 4 _FREQ_ Num 8 5 spend Num 8 INPUT ID $200. date yymmn6. _TYPE_ 8. _FREQ_ 8. spend 8.; Datalines; 2572294 201202 3 1 1 2572294 201210 3 1 1 2572294 201211 3 1 1 2572294 201307 3 1 1 2572294 201312 3 1 1 2572294 201404 3 1 1 2572294 201405 3 1 1; run; summary nway data= utsett99( keep= id spend date ) ; class   id date ; var     spend ; output  sum= out= summary1 ; ; monthly_data  ;* add rows for months with no spend ; set summary1 ; by id ; if first.id then priordate= date ; output ; . ; do while( intck( 'month', date, target) > 1) ; 'month', date, 1) ; output ; end ; keep id spend date ; ; ... View more