--------------------Este procedimiento ilustra diferentes modos de parametros y asignaciones de parametros-----

CREATE OR REPLACE PROCEDURE TEST(
p_In IN NUMBER,
p_Out OUT NUMBER,
p_InOut IN OUT NUMBER) IS

v_LocalVariable NUMBER := 0;
  begin
           DBMS_OUTPUT.PUT_LINE('AL PRINCIPIO DE Test:');
         IF(p_In IS NULL)THEN
           DBMS_OUTPUT.PUT_LINE('p_In is NULL');
        ELSE
                 DBMS_OUTPUT.PUT_LINE('p_in' || '   = ' || p_In);
     END IF;
    END;