109: NULL;
110:
111: ELSE
112:
113: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
114: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ASO_QUOTE_HEADERS',FALSE);
115: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
116: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
117:
110:
111: ELSE
112:
113: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
114: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ASO_QUOTE_HEADERS',FALSE);
115: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
116: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
117:
118: open merged_records;
202: END IF;
203:
204: END LOOP;
205:
206: arp_message.set_name('AR','AR_ROWS_UPDATED');
207: arp_message.set_token('NUM_ROWS',to_char(l_count));
208:
209: END IF;
210:
203:
204: END LOOP;
205:
206: arp_message.set_name('AR','AR_ROWS_UPDATED');
207: arp_message.set_token('NUM_ROWS',to_char(l_count));
208:
209: END IF;
210:
211: ASO_MERGE_PVT.UPDATE_QUOTE_LINES(
224: EXCEPTION
225:
226: WHEN OTHERS THEN
227:
228: arp_message.set_line( 'CUSTOMER_MERGE');
229: RAISE;
230:
231: END CUSTOMER_MERGE;
232:
304: IF process_mode='LOCK' THEN
305: NULL;
306: ELSE
307:
308: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
309: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ASO_QUOTE_LINES',FALSE);
310: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
311: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
312:
305: NULL;
306: ELSE
307:
308: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
309: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ASO_QUOTE_LINES',FALSE);
310: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
311: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
312:
313: open merged_records;
392: END IF;
393:
394: END LOOP;
395:
396: arp_message.set_name('AR','AR_ROWS_UPDATED');
397: arp_message.set_token('NUM_ROWS',to_char(l_count));
398:
399: END IF;
400:
393:
394: END LOOP;
395:
396: arp_message.set_name('AR','AR_ROWS_UPDATED');
397: arp_message.set_token('NUM_ROWS',to_char(l_count));
398:
399: END IF;
400:
401: EXCEPTION
401: EXCEPTION
402:
403: WHEN OTHERS THEN
404:
405: arp_message.set_line( 'UPDATE_QUOTE_LINES');
406: RAISE;
407:
408: END UPDATE_QUOTE_LINES;
409:
472:
473: IF process_mode='LOCK' THEN
474: NULL;
475: ELSE
476: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
477: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ASO_SHIPMENTS',FALSE);
478: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
479: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
480:
473: IF process_mode='LOCK' THEN
474: NULL;
475: ELSE
476: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
477: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ASO_SHIPMENTS',FALSE);
478: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
479: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
480:
481: open merged_records;
552: END IF;
553:
554: END LOOP;
555:
556: arp_message.set_name('AR','AR_ROWS_UPDATED');
557: arp_message.set_token('NUM_ROWS',to_char(l_count));
558:
559: END IF;
560:
553:
554: END LOOP;
555:
556: arp_message.set_name('AR','AR_ROWS_UPDATED');
557: arp_message.set_token('NUM_ROWS',to_char(l_count));
558:
559: END IF;
560:
561: EXCEPTION
561: EXCEPTION
562:
563: WHEN OTHERS THEN
564:
565: arp_message.set_line( 'UPDATE_SHIPMENTS');
566: RAISE;
567:
568: END UPDATE_SHIPMENTS;
569:
611: PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -0054);
612:
613: BEGIN
614:
615: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_HEADERS()+');
616:
617: x_return_status := FND_API.G_RET_STS_SUCCESS;
618:
619: /* Perform the merge operation */
632: if p_from_fk_id <> p_to_fk_id Then
633:
634: IF p_parent_entity_name = 'HZ_PARTIES' Then
635:
636: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
637: arp_message.set_token('TABLE_NAME','ASO_QUOTE_HEADERS_ALL', FALSE);
638:
639: UPDATE ASO_QUOTE_HEADERS_ALL SET
640: party_id = DECODE(party_id,p_from_fk_id,p_to_fk_id,party_id),
633:
634: IF p_parent_entity_name = 'HZ_PARTIES' Then
635:
636: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
637: arp_message.set_token('TABLE_NAME','ASO_QUOTE_HEADERS_ALL', FALSE);
638:
639: UPDATE ASO_QUOTE_HEADERS_ALL SET
640: party_id = DECODE(party_id,p_from_fk_id,p_to_fk_id,party_id),
641: invoice_to_party_id = DECODE(invoice_to_party_id,p_from_fk_id,p_to_fk_id,invoice_to_party_id),
656: OR invoice_to_cust_party_id = p_from_fk_id;
657:
658: l_count := sql%rowcount;
659:
660: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
661: arp_message.set_token('NUM_ROWS', to_char(l_count) );
662:
663: return;
664:
657:
658: l_count := sql%rowcount;
659:
660: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
661: arp_message.set_token('NUM_ROWS', to_char(l_count) );
662:
663: return;
664:
665: ELSIF p_parent_entity_name = 'HZ_PARTY_SITES' THEN
663: return;
664:
665: ELSIF p_parent_entity_name = 'HZ_PARTY_SITES' THEN
666:
667: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
668: arp_message.set_token('TABLE_NAME','ASO_QUOTE_HEADERS_ALL', FALSE);
669:
670: UPDATE ASO_QUOTE_HEADERS_ALL SET
671: invoice_to_party_site_id = DECODE(invoice_to_party_site_id,p_from_fk_id,p_to_fk_id,invoice_to_party_site_id),
664:
665: ELSIF p_parent_entity_name = 'HZ_PARTY_SITES' THEN
666:
667: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
668: arp_message.set_token('TABLE_NAME','ASO_QUOTE_HEADERS_ALL', FALSE);
669:
670: UPDATE ASO_QUOTE_HEADERS_ALL SET
671: invoice_to_party_site_id = DECODE(invoice_to_party_site_id,p_from_fk_id,p_to_fk_id,invoice_to_party_site_id),
672: End_Customer_party_site_id = DECODE(End_Customer_party_site_id,p_from_fk_id,p_to_fk_id,End_Customer_party_site_id),
683: OR sold_to_party_site_id = p_from_fk_id;
684:
685: l_count := sql%rowcount;
686:
687: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
688: arp_message.set_token('NUM_ROWS', to_char(l_count) );
689:
690: return;
691:
684:
685: l_count := sql%rowcount;
686:
687: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
688: arp_message.set_token('NUM_ROWS', to_char(l_count) );
689:
690: return;
691:
692: ELSIF p_parent_entity_name = 'HZ_ORG_CONTACTS' THEN
690: return;
691:
692: ELSIF p_parent_entity_name = 'HZ_ORG_CONTACTS' THEN
693:
694: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
695: arp_message.set_token('TABLE_NAME','ASO_QUOTE_HEADERS_ALL', FALSE);
696:
697: UPDATE ASO_QUOTE_HEADERS_ALL SET
698: org_contact_id = p_to_fk_id,
691:
692: ELSIF p_parent_entity_name = 'HZ_ORG_CONTACTS' THEN
693:
694: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
695: arp_message.set_token('TABLE_NAME','ASO_QUOTE_HEADERS_ALL', FALSE);
696:
697: UPDATE ASO_QUOTE_HEADERS_ALL SET
698: org_contact_id = p_to_fk_id,
699: last_update_date = hz_utility_pub.last_update_date,
706: Where org_contact_id = p_from_fk_id;
707:
708: l_count := sql%rowcount;
709:
710: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
711: arp_message.set_token('NUM_ROWS', to_char(l_count) );
712:
713: return;
714:
707:
708: l_count := sql%rowcount;
709:
710: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
711: arp_message.set_token('NUM_ROWS', to_char(l_count) );
712:
713: return;
714:
715:
716: END IF;
717:
718: End If;
719:
720: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_HEADERS()-');
721:
722: Exception
723: When RESOURCE_BUSY Then
724: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_HEADERS; Could not obtain lock'||
720: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_HEADERS()-');
721:
722: Exception
723: When RESOURCE_BUSY Then
724: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_HEADERS; Could not obtain lock'||
725: 'on table ASO_QUOTE_HEADERS_ALL');
726:
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: raise;
726:
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: raise;
729: When Others Then
730: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_HEADERS'||sqlerrm);
731: x_return_status := FND_API.G_RET_STS_ERROR;
732: raise;
733: END MERGE_QUOTE_HEADERS;
734:
774: PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -0054);
775:
776: BEGIN
777:
778: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_LINES()+');
779:
780: x_return_status := FND_API.G_RET_STS_SUCCESS;
781:
782: /* Perform the merge operation */
795: if p_from_fk_id <> p_to_fk_id Then
796:
797: If p_parent_entity_name = 'HZ_PARTIES' Then
798:
799: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
800: arp_message.set_token('TABLE_NAME','ASO_QUOTE_LINES_ALL', FALSE);
801:
802: UPDATE ASO_QUOTE_LINES_ALL SET
803: invoice_to_party_id = DECODE(invoice_to_party_id,p_from_fk_id,p_to_fk_id,invoice_to_party_id),
796:
797: If p_parent_entity_name = 'HZ_PARTIES' Then
798:
799: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
800: arp_message.set_token('TABLE_NAME','ASO_QUOTE_LINES_ALL', FALSE);
801:
802: UPDATE ASO_QUOTE_LINES_ALL SET
803: invoice_to_party_id = DECODE(invoice_to_party_id,p_from_fk_id,p_to_fk_id,invoice_to_party_id),
804: invoice_to_cust_party_id = DECODE(invoice_to_cust_party_id,p_from_fk_id,p_to_fk_id,invoice_to_cust_party_id),
816: OR End_Customer_cust_party_id = p_from_fk_id;
817:
818: l_count := sql%rowcount;
819:
820: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
821: arp_message.set_token('NUM_ROWS', to_char(l_count) );
822:
823: return;
824:
817:
818: l_count := sql%rowcount;
819:
820: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
821: arp_message.set_token('NUM_ROWS', to_char(l_count) );
822:
823: return;
824:
825: Elsif p_parent_entity_name = 'HZ_PARTY_SITES' Then
823: return;
824:
825: Elsif p_parent_entity_name = 'HZ_PARTY_SITES' Then
826:
827: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
828: arp_message.set_token('TABLE_NAME','ASO_QUOTE_LINES_ALL', FALSE);
829:
830: UPDATE ASO_QUOTE_LINES_ALL SET
831: invoice_to_party_site_id = p_to_fk_id,
824:
825: Elsif p_parent_entity_name = 'HZ_PARTY_SITES' Then
826:
827: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
828: arp_message.set_token('TABLE_NAME','ASO_QUOTE_LINES_ALL', FALSE);
829:
830: UPDATE ASO_QUOTE_LINES_ALL SET
831: invoice_to_party_site_id = p_to_fk_id,
832: End_Customer_party_site_id = p_to_fk_id,
841: OR End_Customer_party_site_id = p_from_fk_id;
842:
843: l_count := sql%rowcount;
844:
845: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
846: arp_message.set_token('NUM_ROWS', to_char(l_count) );
847:
848: return;
849:
842:
843: l_count := sql%rowcount;
844:
845: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
846: arp_message.set_token('NUM_ROWS', to_char(l_count) );
847:
848: return;
849:
850: End If;
850: End If;
851:
852: End If;
853:
854: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_LINES()-');
855:
856: Exception
857: When RESOURCE_BUSY Then
858: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_LINES; Could not obtain lock'||
854: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_LINES()-');
855:
856: Exception
857: When RESOURCE_BUSY Then
858: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_LINES; Could not obtain lock'||
859: 'on table ASO_QUOTE_LINES_ALL');
860:
861: x_return_status := FND_API.G_RET_STS_ERROR;
862: raise;
860:
861: x_return_status := FND_API.G_RET_STS_ERROR;
862: raise;
863: When Others Then
864: arp_message.set_line('ASO_MERGE_PVT.MERGE_QUOTE_LINES'||sqlerrm);
865: x_return_status := FND_API.G_RET_STS_ERROR;
866: raise;
867:
868: END MERGE_QUOTE_LINES;
909: PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -0054);
910:
911: BEGIN
912:
913: arp_message.set_line('ASO_MERGE_PVT.MERGE_SHIPMENTS()+');
914:
915: x_return_status := FND_API.G_RET_STS_SUCCESS;
916:
917: /* Perform the merge operation */
930: if p_from_fk_id <> p_to_fk_id Then
931:
932: If p_parent_entity_name = 'HZ_PARTIES' Then
933:
934: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
935: arp_message.set_token('TABLE_NAME','ASO_SHIPMENTS', FALSE);
936:
937: UPDATE ASO_SHIPMENTS SET
938: ship_to_party_id = DECODE(ship_to_party_id,p_from_fk_id,p_to_fk_id,ship_to_party_id),
931:
932: If p_parent_entity_name = 'HZ_PARTIES' Then
933:
934: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
935: arp_message.set_token('TABLE_NAME','ASO_SHIPMENTS', FALSE);
936:
937: UPDATE ASO_SHIPMENTS SET
938: ship_to_party_id = DECODE(ship_to_party_id,p_from_fk_id,p_to_fk_id,ship_to_party_id),
939: ship_to_cust_party_id = DECODE(ship_to_cust_party_id,p_from_fk_id,p_to_fk_id,ship_to_cust_party_id),
948: OR ship_to_cust_party_id = p_from_fk_id;
949:
950: l_count := sql%rowcount;
951:
952: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
953: arp_message.set_token('NUM_ROWS', to_char(l_count) );
954:
955: return;
956:
949:
950: l_count := sql%rowcount;
951:
952: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
953: arp_message.set_token('NUM_ROWS', to_char(l_count) );
954:
955: return;
956:
957: Elsif p_parent_entity_name = 'HZ_PARTY_SITES' Then
955: return;
956:
957: Elsif p_parent_entity_name = 'HZ_PARTY_SITES' Then
958:
959: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
960: arp_message.set_token('TABLE_NAME','ASO_SHIPMENTS', FALSE);
961:
962: UPDATE ASO_SHIPMENTS SET
963: ship_to_party_site_id = p_to_fk_id,
956:
957: Elsif p_parent_entity_name = 'HZ_PARTY_SITES' Then
958:
959: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
960: arp_message.set_token('TABLE_NAME','ASO_SHIPMENTS', FALSE);
961:
962: UPDATE ASO_SHIPMENTS SET
963: ship_to_party_site_id = p_to_fk_id,
964: last_update_date = hz_utility_pub.last_update_date,
971: Where ship_to_party_site_id = p_from_fk_id;
972:
973: l_count := sql%rowcount;
974:
975: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
976: arp_message.set_token('NUM_ROWS', to_char(l_count) );
977:
978: return;
979:
972:
973: l_count := sql%rowcount;
974:
975: arp_message.set_name('AR', 'AR_ROWS_UPDATED');
976: arp_message.set_token('NUM_ROWS', to_char(l_count) );
977:
978: return;
979:
980: End If;
980: End If;
981:
982: End If;
983:
984: arp_message.set_line('ASO_MERGE_PVT.MERGE_SHIPMENTS()-');
985:
986: Exception
987: When RESOURCE_BUSY Then
988: arp_message.set_line('ASO_MERGE_PVT.MERGE_SHIPMENTS; Could not obtain lock'||
984: arp_message.set_line('ASO_MERGE_PVT.MERGE_SHIPMENTS()-');
985:
986: Exception
987: When RESOURCE_BUSY Then
988: arp_message.set_line('ASO_MERGE_PVT.MERGE_SHIPMENTS; Could not obtain lock'||
989: 'on table ASO_SHIPMENTS');
990:
991: x_return_status := FND_API.G_RET_STS_ERROR;
992: raise;
990:
991: x_return_status := FND_API.G_RET_STS_ERROR;
992: raise;
993: When Others Then
994: arp_message.set_line('ASO_MERGE_PVT.MERGE_SHIPMENTS'||sqlerrm);
995: x_return_status := FND_API.G_RET_STS_ERROR;
996: raise;
997:
998: END MERGE_SHIPMENTS;