Estructura de funciones

Estructura de funciones

create or replace function miFuncion (pnumero in number)
return number
is
  resultado number;
begin
  resultado := pnumero*2;
  return(resultado);
end;

set serveroutput on
declare
  numero number := 1;
begin
  numero := miFuncion(numero);
  dbms_output.put_line('Numero: '||numero);
end;


Funcion par o impar


create or replace function miFuncion (pnumero number)
return varchar2
is
  msg varchar2(20);
begin
  if mod(pnumero,2) = 0  then
    msg := 'Par';
  else
    msg := 'Impar';
  end if;
  return(msg);
end;
show err function miFuncion;
set serveroutput on
declare
  numero number := 1;
  mensaje varchar2(20);
begin
  mensaje := miFuncion(numero);
  dbms_output.put_line('Numero: '||mensaje);
end;