Line no. of procedure

Question

I have a doubt that whenever, there is a exception in a procedure, it shows the line no. But, how to look at the exact line no., is it by counting the line no. or in SQL Plus editor. Problem with SQL editor is that if the procedure is very long, then it does not show all the code in SQL editor.
If, the exact line no. is known, then it helps a lot in de-bugging.
I hope, my question is clear. Please help in solving the doubt.
regards.

Answer 1

rem file = f_demo.sql
create or replace
function f_demo return varchar2 is
  l_dummy varchar2(300);
begin
  select 'x'
    into l_dummy
    from dual
  l_dummy := to_char(1/0) ;
  return l_dummy;
-- exception
--    when others then
--       l_dummy := sqlerrm;
--       raise_application_error (-20001,l_dummy);
end ;
file = test_err.sql
col line format 99990
col text format a80 word_wrap
set pagesize 9999
set linesize 1000
set verify off
select
        decode (line,&2,'---->','     ') x
       ,line
       ,text
  from
        user_source
where
        name  = upper('&1')
   and  line >= &2 - 10
   and  line <= &2 + 10
order by
        line
SQL> start f_demo
Function created.
SQL>
SQL> select f_demo from dual;
select f_demo from dual
ERROR at line 1:
ORA-01476: divisor is equal to zero
ORA-06512: at "E4ALL_DRP_P.F_DEMO", line 13
ORA-06512: at line 1
SQL>
SQL> start test_err f_demo 13
X       LINE TEXT
           3
           4
           5
           6 begin
           7
           8 select 'x'
           9 into l_dummy
          10 from dual
          11 ;
          12
---->     13 l_dummy := to_char(1/0) ;
          14
          15 return l_dummy;
          16
          17 -- exception
          18 --    when others then
          19 --       l_dummy := sqlerrm;
          20 --       raise_application_error (-20001,l_dummy);
          21
          22
          23 end ;
21 rows selected.
SQL>