BEGIN
  DECLARE CUR_TIME TIMESTAMP;
  DECLARE CUR_TIME_MIN TIMESTAMP;
  DECLARE COUNTER BIGINT;

  SET COUNTER = 0;
  SET CUR_TIME = CURRENT TIMESTAMP;
  SET CUR_TIME_MIN = CUR_TIME - 1 MICROSECOND;
  FOR v3 AS
  c3 CURSOR FOR
  SELECT DISTINCT QW.CONT_EQUIV_ID oid, QW.ADMIN_CLIENT_ID cid, QW.CONT_ID cnt_id
  FROM SHEME.CONTEQUIV QW
  WHERE right(QW.ADMIN_CLIENT_ID, 8) = '_DELETED'
  DO
      UPDATE SHEME.CONTEQUIV
      SET ADMIN_CLIENT_ID = substr(ADMIN_CLIENT_ID, 1, instr(ADMIN_CLIENT_ID, '_DELETED')-1), LAST_UPDATE_DT = CURRENT TIMESTAMP
      WHERE CONT_EQUIV_ID = v3.oid;

      UPDATE SCHEME.H_CONTEQUIV
      SET H_END_DT = CUR_TIME_MIN
      WHERE CONT_EQUIV_ID = v3.oid AND H_END_DT IS NULL;
      INSERT INTO SHEME.H_CONTEQUIV (H_CONT_EQUIV_ID,
                                   H_ACTION_CODE,
                                   H_CREATED_BY,
                                   H_CREATE_DT,
                                   H_END_DT,
                                   CONT_EQUIV_ID,
                                   CONT_ID,
                                   ADMIN_SYS_TP_CD,
                                   ADMIN_CLIENT_ID,
                                   DESCRIPTION,
                                   LAST_UPDATE_DT,
                                   LAST_UPDATE_USER,
                                   LAST_UPDATE_TX_ID,
                                   PART_ID)
        SELECT CNT.CONT_EQUIV_ID, 'U', '_PATCH', CUR_TIME, NULL, CONT_EQUIV_ID,
          CONT_ID,
          ADMIN_SYS_TP_CD,
          ADMIN_CLIENT_ID,
          DESCRIPTION,
          LAST_UPDATE_DT,
          LAST_UPDATE_USER,
          LAST_UPDATE_TX_ID,
          PART_ID
        FROM SHEME.CONTEQUIV CNT
        WHERE CONT_EQUIV_ID = v3.oid;
    SET COUNTER = COUNTER + 1;


    IF (COUNTER = 20000) THEN
      SET COUNTER = 0;
      COMMIT;
    END IF;


  END FOR;
END;