options linesize = 240;
options pagesize =  90;
;
;
*---------------------------------------------------;
data a;
infile 'e:\bloods\blood.asc';
input pt blood b1-b22;
label b1="gl" b2="bun" b3="cr" b4="ua" b5="ca" b6="po";
/*put pt blood gl bun cr ua ca po na k cl co mg pr_t alb

      bili_t bili_d cho alk_p sgot sgpt ldh gammaGT amylase;
*/
proc sort; by pt DESCENDING blood;
*roc print;
;