oracle循环调用存储过程案例

create or replace procedure testdate_2 is
i number;
out1 varchar2(100);
out2 varchar2(100);
CUSTOMERID NUMBER;
cursor projidlist is select p.projid from proj_baseinfo p where p.projstage!=‘-999‘;
begin
 
  for i in projidlist LOOP
      begin
          select p.customerid into CUSTOMERID from proj_baseinfo p where p.projid=i.projid;
          dbms_output.put_line(CUSTOMERID);
          PRO_PROJ_REPORT_CRM_FINAN(i.projid,CUSTOMERID,out1,out2);      end;
  end LOOP;
commit;
end testdate_2;

CREATE OR REPLACE PROCEDURE PRO_PROJ_REPORT_CRM_FINAN(V_P_PROJID   IN NUMBER,
                                                      V_P_CUSID    IN NUMBER,
                                                      V_E_MESSAGE  OUT VARCHAR2,
                                                      V_RESULTFLAG OUT VARCHAR2) IS ...