CREATE OR REPLACE PROCEDURE NMOPERADOR (P_CDOPERADOR IN OUT VARCHAR2,
                                        P_NMOPERADOR OUT VARCHAR2) AS
BEGIN 
   P_NMOPERADOR := NULL; 

   BEGIN 
      SELECT CDOPERADOR, NMOPERADOR 
      INTO P_CDOPERADOR, P_NMOPERADOR 
      FROM OPERADOR 
      WHERE CDOPERADOR = TO_CHAR(P_CDOPERADOR); 
   EXCEPTION 
      WHEN NO_DATA_FOUND THEN 
         P_CDOPERADOR := 'VIA BD';
         P_NMOPERADOR := 'VIA BD';
   END; 
END;