377: LAST_UPDATE_DATE = l_last_update_date,
378: LAST_UPDATE_LOGIN = l_last_update_login
379: WHERE ISU_ID = p_dup_vendor_id;
380:
381: --Update OKC_RULES_B for reference of Vendor in object1_id1, which will
382: --be identified based on value for JTOT_OBJECT1_CODE
383: UPDATE OKC_RULES_B RUL
384: SET OBJECT1_ID1 = TO_CHAR(p_vendor_id),
385: LAST_UPDATED_BY = l_last_updated_by,
379: WHERE ISU_ID = p_dup_vendor_id;
380:
381: --Update OKC_RULES_B for reference of Vendor in object1_id1, which will
382: --be identified based on value for JTOT_OBJECT1_CODE
383: UPDATE OKC_RULES_B RUL
384: SET OBJECT1_ID1 = TO_CHAR(p_vendor_id),
385: LAST_UPDATED_BY = l_last_updated_by,
386: LAST_UPDATE_DATE = l_last_update_date,
387: LAST_UPDATE_LOGIN = l_last_update_login
390: AND EXISTS (SELECT ID
391: FROM OKL_K_HEADERS KHR
392: WHERE KHR.ID = RUL.DNZ_CHR_ID);
393:
394: --Update OKC_RULES_B for reference of Vendor Site in object2_id1, which will
395: --be identified based on value for JTOT_OBJECT2_CODE
396: UPDATE OKC_RULES_B RUL
397: SET OBJECT2_ID1 = TO_CHAR(p_vendor_site_id),
398: LAST_UPDATED_BY = l_last_updated_by,
392: WHERE KHR.ID = RUL.DNZ_CHR_ID);
393:
394: --Update OKC_RULES_B for reference of Vendor Site in object2_id1, which will
395: --be identified based on value for JTOT_OBJECT2_CODE
396: UPDATE OKC_RULES_B RUL
397: SET OBJECT2_ID1 = TO_CHAR(p_vendor_site_id),
398: LAST_UPDATED_BY = l_last_updated_by,
399: LAST_UPDATE_DATE = l_last_update_date,
400: LAST_UPDATE_LOGIN = l_last_update_login
403: AND EXISTS (SELECT ID
404: FROM OKL_K_HEADERS KHR
405: WHERE KHR.ID = RUL.DNZ_CHR_ID);
406:
407: --Update OKC_RULES_B for reference of Vendor Site in object3_id1, which will
408: --be identified based on value for JTOT_OBJECT3_CODE
409: UPDATE OKC_RULES_B RUL
410: SET OBJECT3_ID1 = TO_CHAR(p_vendor_site_id),
411: LAST_UPDATED_BY = l_last_updated_by,
405: WHERE KHR.ID = RUL.DNZ_CHR_ID);
406:
407: --Update OKC_RULES_B for reference of Vendor Site in object3_id1, which will
408: --be identified based on value for JTOT_OBJECT3_CODE
409: UPDATE OKC_RULES_B RUL
410: SET OBJECT3_ID1 = TO_CHAR(p_vendor_site_id),
411: LAST_UPDATED_BY = l_last_updated_by,
412: LAST_UPDATE_DATE = l_last_update_date,
413: LAST_UPDATE_LOGIN = l_last_update_login