PROC DATACLAS                                    
IF &DATACLAS='' AND (&HLQ='SHR' OR &HLQ='PR1' OR &HLQ='PR2') THEN
 SET &DATACLAS = 'DCPRUEBA'           
END