---UTILITARIO DEL MODULO DE ACTUALIZACIONES

Create or replace package PryActUtil is
   FUNCTION ColabUser RETURN varchar2;
   FUNCTION EstadoColab (pcolab IN varchar2) RETURN varchar2;
End PryActUtil;
/

Create or replace package body PryActUtil is
   FUNCTION ColabUser RETURN varchar2 IS
      vcolab prycolaborador.usuario%type;
   BEGIN
      select colaborador
      into   vcolab
      from   prycolaborador
      where  usuario = USER;

      RETURN vcolab;
   EXCEPTION
      when no_data_found then
         RETURN NULL;
      when too_many_rows then
         raise_application_error(-20001, 'ERROR: Mas de un colaborador con su codigo de usuario');
   END ColabUser;

   FUNCTION EstadoColab (pcolab IN varchar2) RETURN varchar2 IS
      vestado prycolaborador.estado%type;
   BEGIN
      select estado
      into   vestado
      from   prycolaborador
      where  colaborador = pcolab;

      RETURN vestado;
   EXCEPTION
      when no_data_found then
         raise_application_error(-20001, 'ERROR: Colaborador '||pcolab||' no existe!');
   END EstadoColab;
END PryActUtil; 
/
