15일차 Chapter 4 - Packages II # 4-3

# 4-3

  create or replace procedure up_overloading (p_in number)

  is

    procedure print(a number)

    is 

    begin

      p('제시한 값 : '||a||'는 사용할 수 있습니다.');

    end;

    procedure print(a varchar2)

    is 

    begin

      p('제시한 값 : '||a||'는 사용할 수 없습니다.');

    end;

  begin

    if p_in < 1000 then

      print (to_char(p_in));

    else

      print (p_in);

    end if;

  end;

  /

  exec up_overloading(500)

  exec up_overloading(1500)