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