lunes, 10 de abril de 2017

Procedimiento que muestra números desde valor mínimo hasta máximo con saltos pasado por parámetros | Oracle

CREATE OR REPLACE PROCEDURE mostrarNumerosLbUbStep (
  pLb    IN     number, 
  pUb    IN     number, 
  pStep  IN     number   DEFAULT   1
) IS
  vCont  number;
BEGIN
  -- contamos de pLb a pUb
  vCont := pLb-pStep;
  loop
    vCont := vCont + pStep;
    exit when vCont > pUb;
    dbms_output.put_line('Iteración número ' || 
    to_char((vCont-pLb+pStep)/pStep));
  end loop;
END;
/
show errors
set serveroutput on;
EXEC mostrarNumerosLbUbStep(1990,1995,0.5);
EXEC mostrarNumerosLbUbStep(1990,1995,0.1);
EXEC mostrarNumerosLbUbStep(1990,1995,2);

0 comentarios:

Publicar un comentario