create database 't0.fdb'; commit;
recreate table some_data(id int, x int); commit;
insert into some_data values(1, 100); commit;
set term ^; 
create or alter procedure my_very_clever_sp(a_id int) returns(x int) as 
begin 
    for select x from some_data where id = :a_id into :x do suspend; 
end
^ set term ;^ 
commit;
set term ^; 
create or alter procedure my_very_stupid_sp(a_id int) returns(x int) as 
begin 
    for select x from some_data where id = :a_id into :x do suspend; 
end
^ set term ;^ 
commit;

select * from some_data d left join my_very_ clever _sp(d.id) on 1=1;

     ID            X            X
======= ============ ============
      1          100          100

 Query-2: 
select * from some_data d left join my_very_ stupid _sp(d.id) on 1=1;

     ID            X            X
======= ============ ============
      1          100          100

enabled true
 include_filter = %my_very_clever_sp% 
log_procedure_finish true
log_procedure_start true
max_log_size 9999999999
max_sql_length 16384
print_perf true
print_plan true
time_threshold 0

SQL> select * from some_data d left join my_very_clever_sp(d.id) on 1=1;

          ID            X            X
============ ============ ============
           1          100          100

SQL> select * from some_data d left join my_very_stupid_sp(d.id) on 1=1;

          ID            X            X
============ ============ ============
           1          100          100

set term ^; 
create or alter procedure app_root as 
  declare n int; 
begin 
  select count(*) from my_very_clever_sp(1) into n; 
end
^set term ;^ 
commit;

include_filter = %my_very_clever_sp%
time_threshold = 0
log_statement_finish true

execute procedure app_root;

include_filter = %my_very_clever_sp%
time_threshold = 0
log_procedure_finish true
log_statement_finish true