tests/ctags/3184782.sql

   1 create or replace package body p_test is\r
   2 \r
   3 procedure do_this_stuff is begin\r
   4 if true then\r
   5     for idx in z+1 .. myarr.last loop\r
   6         if myarr.exists(idx) then\r
   7             null;\r
   8         end if;\r
   9     end loop;\r
  10 \r
  11 elsif true then\r
  12     for idx in myarr.first .. myarr.last loop\r
  13         if myarr.exists(idx) then\r
  14             null;\r
  15         end if;\r
  16     end loop;\r
  17 end if;\r
  18 end do_this_stuff;\r
  19 \r
  20 procedure process_this (\r
  21     p_flag in boolean\r
  22 ) is\r
  23 begin\r
  24     null;\r
  25 end process_this;\r
  26 \r
  27 procedure myfn1 (\r
  28     p_str1 in varchar2,\r
  29     p_str2 in varchar2\r
  30 ) is begin\r
  31 process_this(false);\r
  32 end myfn1;\r
  33 \r
  34 procedure myfn2 (\r
  35     p_str1 in varchar2,\r
  36     p_str2 in varchar2\r
  37 ) is begin\r
  38 process_this(true);\r
  39 end myfn2;\r
  40 \r
  41 end p_test;\r