ORACLE刷新数据

DECLARE
  V_RETCODE   VARCHAR2(200);
  V_RETINFO     VARCHAR2(200);


BEGIN
  FOR V_DAY IN '20110201' .. '20110228' LOOP
    <<LAB1>>
    P_DM_KD_PANDECT(V_DAY, V_RETCODE, V_RETINFO);
    IF V_RETCODE <> 'SUCCESS' THEN
      DBMS_LOCK.SLEEP(300);
      GOTO LAB1;
    END IF;
  END LOOP;
END;