1  declare
  2    L  constant varchar2(1 char) := 'I';
  3    d  constant varchar2(1 char) := 'D';
  4  PROCEDURE save(p_type varchar2) as
  5  begin
  6   if L is not null then
  7    dbms_output.put_line('save='||p_type);
  8   end if;
  9  end;
 10  begin
 11   save(d);
 12   save(L);
 13* end;

SQL> /
save=D
save=I

SQL> ed
Wrote file afiedt.buf

  1  declare
  2    d  constant varchar2(1 char) := 'D';
  3  PROCEDURE save(p_type varchar2) as
  4  begin
  5   if L is not null then
  6    dbms_output.put_line('save='||p_type);
  7   end if;
  8  end;
  9    L  constant varchar2(1 char) := 'I';
 10  begin
 11   save(d);
 12   save(L);
 13* end;
SQL> /
  L  constant varchar2(1 char) := 'I';
  *
ERROR at line 9:
ORA-06550: line 9, column 3:
PLS-00103: Encountered the symbol "L" when expecting one of the following:
begin function pragma procedure
ORA-06550: line 13, column 4:
PLS-00103: Encountered the symbol "end-of-file" when expecting one of the following:
end not pragma final instantiable order overriding static
member constructor map