394: end;
395: end if;
396: END OKC_CPL_MERGE_PARTY;
397: --
398: -- Merge Procedure for OKC_RULES_B (OBJECT1_CODE)
399: --
400: PROCEDURE OKC_RUL_MERGE_PARTY_ID1 (
401: p_entity_name IN VARCHAR2,
402: p_from_id IN NUMBER,
474: if p_from_fk_id <> p_to_fk_id then
475: begin
476: -- Rules ID1
477: arp_message.set_name('AR','AR_UPDATING_TABLE');
478: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
479: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
480: --
481: UPDATE okc_rules_b rle
482: SET rle.object1_id1 = p_to_fk_id
475: begin
476: -- Rules ID1
477: arp_message.set_name('AR','AR_UPDATING_TABLE');
478: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
479: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
480: --
481: UPDATE okc_rules_b rle
482: SET rle.object1_id1 = p_to_fk_id
483: ,rle.object_version_number = rle.object_version_number + 1
477: arp_message.set_name('AR','AR_UPDATING_TABLE');
478: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
479: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
480: --
481: UPDATE okc_rules_b rle
482: SET rle.object1_id1 = p_to_fk_id
483: ,rle.object_version_number = rle.object_version_number + 1
484: ,rle.last_update_date = SYSDATE
485: ,rle.last_updated_by = nvl(fnd_global.user_id, -1)
513: end if;
514: END OKC_RUL_MERGE_PARTY_ID1;
515: --
516: --
517: -- Merge Procedure for OKC_RULES_B (OBJECT2_CODE)
518: --
519: PROCEDURE OKC_RUL_MERGE_PARTY_ID2 (
520: p_entity_name IN VARCHAR2,
521: p_from_id IN NUMBER,
593: if p_from_fk_id <> p_to_fk_id then
594: begin
595: -- Rules ID1
596: arp_message.set_name('AR','AR_UPDATING_TABLE');
597: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
598: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
599: --
600: UPDATE okc_rules_b rle
601: SET rle.object2_id1 = p_to_fk_id
594: begin
595: -- Rules ID1
596: arp_message.set_name('AR','AR_UPDATING_TABLE');
597: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
598: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
599: --
600: UPDATE okc_rules_b rle
601: SET rle.object2_id1 = p_to_fk_id
602: ,rle.object_version_number = rle.object_version_number + 1
596: arp_message.set_name('AR','AR_UPDATING_TABLE');
597: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
598: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
599: --
600: UPDATE okc_rules_b rle
601: SET rle.object2_id1 = p_to_fk_id
602: ,rle.object_version_number = rle.object_version_number + 1
603: ,rle.last_update_date = SYSDATE
604: ,rle.last_updated_by = nvl(fnd_global.user_id, -1)
631: end;
632: end if;
633: END OKC_RUL_MERGE_PARTY_ID2;
634: --
635: -- Merge Procedure for OKC_RULES_B (OBJECT3_CODE)
636: --
637: PROCEDURE OKC_RUL_MERGE_PARTY_ID3 (
638: p_entity_name IN VARCHAR2,
639: p_from_id IN NUMBER,
710: if p_from_fk_id <> p_to_fk_id then
711: begin
712: -- Rules ID3
713: arp_message.set_name('AR','AR_UPDATING_TABLE');
714: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT3_ID1',FALSE);
715: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
716: --
717: UPDATE okc_rules_b rle
718: SET rle.object3_id1 = p_to_fk_id
711: begin
712: -- Rules ID3
713: arp_message.set_name('AR','AR_UPDATING_TABLE');
714: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT3_ID1',FALSE);
715: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
716: --
717: UPDATE okc_rules_b rle
718: SET rle.object3_id1 = p_to_fk_id
719: ,rle.object_version_number = rle.object_version_number + 1
713: arp_message.set_name('AR','AR_UPDATING_TABLE');
714: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT3_ID1',FALSE);
715: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
716: --
717: UPDATE okc_rules_b rle
718: SET rle.object3_id1 = p_to_fk_id
719: ,rle.object_version_number = rle.object_version_number + 1
720: ,rle.last_update_date = SYSDATE
721: ,rle.last_updated_by = nvl(fnd_global.user_id, -1)