SQL> declare
  2    subtype TDigit is BINARY_INTEGER range 0..9;
  3    procedure Out(x TDigit)
  4    is
  5    begin
  6      dbms_output.put_line(x);
  7    end Out;
  8  begin
  9    Out(0);
 10    Out(1);
 11    Out(-1);
 12    Out(132);
 13  end;
 14  /
0
1
declare
*
ERROR at line 1:
ORA-06502: PL/SQL: numeric or value error
ORA-06512: at line 11