1111

CREATE OR REPLACE PROCEDURE update_hav_tpnd IS
  CURSOR hav_tpnd_cur IS
    SELECT d.hav_tpnd, d.item, d.sheetid FROM it_item@jvids_dev_jvrms d;
BEGIN
  FOR rec_hav_tpnd IN hav_tpnd_cur LOOP
    UPDATE it_item
       SET hav_tpnd = rec_hav_tpnd.hav_tpnd
     WHERE item = rec_hav_tpnd.item
       AND sheetid = rec_hav_tpnd.sheetid;
    COMMIT WRITE batch NOWAIT;
  END LOOP;
END update_hav_tpnd;