proc sql;                                                                   
create view EMDATA.TRNQNMZJ as select * from EMDATA.VIEW_RZA where          
trim(left(put(BAD,BEST12.))) = '0';                                         
quit;                                                                       
proc sql;                                                                   
create view EMDATA.VALQRPH7 as select * from EMDATA.VIEW_RZA where          
trim(left(put(BAD,BEST12.))) = '1';                                         
quit;