***********************************************************************; *macro to calculate score variable ***********************************************************************; %MACRO SCORECAL( PVAR=, RLIST=, CLIST=, N=); ***************************************************; *parameters: PVAR - predicted expenditure variable RLIST - regression vars list CLIST - coefficients list N - number of variables/coefficients; ***************************************************; *create predicted expenditures for model&nmodel; &PVAR=0; DO _I=1 TO &N; &PVAR = &PVAR + &RLIST(_I) * &CLIST(_I); END; %MEND SCORECAL;