Hi, You can use the code below to get rid of all the variables with missing value. data one; input var1-var5; cards; 1 . 3 . 4 2 . . 3 5 ; options missing= ' '; proc transpose data=one out=two; var _all_; run; options missing='.'; data _null_; length keep $500; if 0 then set one nobs=nvar; do until (done); set two end=done; if n(of col:) eq nvar then keep=catx(' ',keep,_name_); end; call symputx('keep',keep); run; data want; set one (keep=&keep); run; proc print data=want;run; Obs var1 var5 1 1 4 2 2 5 Linlin
... View more