/******************** Variables Used ********************/
/**Variable Names in Program    Variable Names in Gator**/
pubid                           pubid
evertest2007                    YSCH-7700
sattest2007                     YSCH-7800~000001
acttest2007                     YSCH-7800~000002
satm2007                        YSCH-8400
satv2007                        YSCH-8500
acts2007                        YSCH-9200
cvcsatm2006                     created variable from previous round
cvcsatmrd2006                   created variable from previous round
cvcsatv2006                     created variable from previous round
cvcsatvrd2006                   created variable from previous round
cvcact2006                      created variable from previous round
cvcactrd2006                    created variable from previous round


/******************** SAS code for variable creation ********************/
/* we'll compare r11 score of sat and act with the highest score of previous 
round, if R gets higher score in this round, then we'll adopt r11 score. */

hisatm2007 = cvcsatm2006 ;
hisatmrd2007 = cvcsatmrd2006 ;
hisatv2007 = cvcsatv2006 ;
hisatvrd2007 = cvcsatvrd2006 ;
hiact2007 = cvcact2006 ;
hiactrd2007 = cvcactrd2006 ;

/* if previous high score was valid, but rd10 is higher,
than new high score is rd10 score. */
if cvcsatm2006 le satm2007 AND satm2007 in (1,2,3,4,5,6) 
AND cvcsatm2006 ne -3 then
do;
 hisatm2007  =satm2007;
 hisatmrd2007=11;
end;
if cvcsatv2006 le satv2007 AND satv2007 in (1,2,3,4,5,6) 
AND cvcsatv2006 ne -3 then
do;
 hisatv2007  =satv2007;
 hisatvrd2007=11;
end;
if cvcact2006 le acts2007 AND acts2007 in (1,2,3,4,5,6) 
AND cvcact2006 ne -3 then
do;
 hiact2007  =acts2007;
 hiactrd2007=11;
end;
/* if an invalid score is reported, then it becomes the 
highest reported score value and the round is set to 11. */
if satm2007 in (-1,-2,-3) then
do;
 hisatm2007  =-3;
 hisatmrd2007=11;
end;
if satv2007 in (-1,-2,-3) then
do;
 hisatv2007  =-3;
 hisatvrd2007=11;
end;
if acts2007 in (-1,-2,-3) then
do;
 hiact2007  =-3;
 hiactrd2007=11;
end;
endsas;