CREATE OR REPLACE FUNCTION ADAM.fn_fco_salario_integral(pch_compania   char,
                                                        pch_trabajador char,
                                                        pch_agrupacion char)
/* definicion para PORVENIR */
 RETURN char is
  vch_integral varchar2(10);
BEGIN

  begin
    SELECT dato
      INTO vch_integral
      FROM rel_trab_agr
     WHERE compania = pch_compania
       AND trabajador = pch_trabajador
       AND agrupacion = pch_agrupacion;
  exception
    when no_data_found then
      return(' ');
  end;
  if rtrim(ltrim(vch_integral)) = 'SI' then
    RETURN('X');
  else
    return(' ');
  end if;
END fn_fco_salario_integral;
/
