declare

declare
int_count number(10);
begin
int_count := 1;
  DBMS_OUTPUT.ENABLE(buffer_size => null); --表示輸出buffer不受限制
  for lr in (SELECT dit.*,h.cust_grade_by
               from cop_dit_line dit
               ,cop_cop_or_header_v h
              where dit.opportunity_pool is null
              and dit.fpar_sys_sq = h.fsys_sq
                and dit.fstep_code_line not in (9)) loop
    begin
    
      dbms_output.put_line(cop_tools_pkg.get_default_or_pool_id(lr.fresp_person_id,lr.cust_grade_by)||'|'||lr.fsys_sq||'-'||

int_count);
        --UPDATE cop_dit_line d
        -- SET d.opportunity_pool = cop_tools_pkg.get_default_or_pool_id(lr.fresp_person_id,lr.cust_grade_by) WHERE d.fsys_sq =

lr.fsys_sq;
            int_count := int_count + 1;
    end;
  end loop;
end;