프로시져 선언 / for

declare
begin
    for r in (select inst_calib_no from inst_calib) loop
        zp_inst_calib_plan_make (r.inst_calib_no, null);
    end loop;
end;