/* Formatted on 1/12/2012 12:07:12 AM (QP5 v5.115.810.9015) */
DECLARE
CURSOR c1
IS
SELECT TMP.*, map.h_document_number, map.r12_operating_unit r12ou
FROM XX_AP_CHECKS_11I_R12 map, XX_CHECK_DATA_TEMP TMP
WHERE map.H_DOCUMENT_NUMBER = TMP.R12_CHECK_NUMBER
AND MAP.R12_OPERATING_UNIT = TMP.R12_OPERATING_UNIT;
BEGIN
FOR I IN c1
LOOP
UPDATE XX_AP_CHECKS_11I_R12
SET R12_OPERATING_UNIT = I.R12_OPERATING_UNIT,
R12_CHECK_ID = I.R12_CHECK_ID,
R12_VENDOR_NAME = I.R12_VENDOR_NAME,
R12_VENDOR_SITE_CODE = I.R12_VENDOR_SITE_CODE,
R12_CHECK_NUMBER = I.R12_CHECK_NUMBER,
R12_CHECK_DATE = I.R12H_CHECK_DATE,
R12_CHECK_AMOUNT = I.R12_CHECK_AMOUNT,
H_BANK_ACCT_NAME = I.H_BANK_ACCT_NAME,
R12_CURRENCY_CODE = I.H_CURRENCY_CODE
WHERE H_DOCUMENT_NUMBER = I.R12_CHECK_NUMBER
AND R12_OPERATING_UNIT = I.R12_OPERATING_UNIT;
END LOOP;
COMMIT;
END;
DECLARE
CURSOR c1
IS
SELECT TMP.*, map.h_document_number, map.r12_operating_unit r12ou
FROM XX_AP_CHECKS_11I_R12 map, XX_CHECK_DATA_TEMP TMP
WHERE map.H_DOCUMENT_NUMBER = TMP.R12_CHECK_NUMBER
AND MAP.R12_OPERATING_UNIT = TMP.R12_OPERATING_UNIT;
BEGIN
FOR I IN c1
LOOP
UPDATE XX_AP_CHECKS_11I_R12
SET R12_OPERATING_UNIT = I.R12_OPERATING_UNIT,
R12_CHECK_ID = I.R12_CHECK_ID,
R12_VENDOR_NAME = I.R12_VENDOR_NAME,
R12_VENDOR_SITE_CODE = I.R12_VENDOR_SITE_CODE,
R12_CHECK_NUMBER = I.R12_CHECK_NUMBER,
R12_CHECK_DATE = I.R12H_CHECK_DATE,
R12_CHECK_AMOUNT = I.R12_CHECK_AMOUNT,
H_BANK_ACCT_NAME = I.H_BANK_ACCT_NAME,
R12_CURRENCY_CODE = I.H_CURRENCY_CODE
WHERE H_DOCUMENT_NUMBER = I.R12_CHECK_NUMBER
AND R12_OPERATING_UNIT = I.R12_OPERATING_UNIT;
END LOOP;
COMMIT;
END;
No comments:
Post a Comment