51: BEGIN
52: IF process_mode='LOCK' THEN
53: NULL;
54: ELSE
55: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
56: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_CASH_RECEIPTS',FALSE);
57: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
58: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
59:
52: IF process_mode='LOCK' THEN
53: NULL;
54: ELSE
55: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
56: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_CASH_RECEIPTS',FALSE);
57: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
58: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
59:
60: open merged_records;
128: EXIT;
129: END IF;
130: END LOOP;
131:
132: arp_message.set_name('AR','AR_ROWS_UPDATED');
133: arp_message.set_token('NUM_ROWS',to_char(l_count));
134: END IF;
135: EXCEPTION
136: WHEN OTHERS THEN
129: END IF;
130: END LOOP;
131:
132: arp_message.set_name('AR','AR_ROWS_UPDATED');
133: arp_message.set_token('NUM_ROWS',to_char(l_count));
134: END IF;
135: EXCEPTION
136: WHEN OTHERS THEN
137: arp_message.set_line( 'ar_cr');
133: arp_message.set_token('NUM_ROWS',to_char(l_count));
134: END IF;
135: EXCEPTION
136: WHEN OTHERS THEN
137: arp_message.set_line( 'ar_cr');
138: RAISE;
139: END ar_cr;
140:
141: PROCEDURE ar_ps (
182: BEGIN
183: IF process_mode='LOCK' THEN
184: NULL;
185: ELSE
186: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
187: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_PAYMENT_SCHEDULES',FALSE);
188: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
189: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
190:
183: IF process_mode='LOCK' THEN
184: NULL;
185: ELSE
186: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
187: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_PAYMENT_SCHEDULES',FALSE);
188: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
189: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
190:
191: open merged_records;
259: EXIT;
260: END IF;
261: END LOOP;
262:
263: arp_message.set_name('AR','AR_ROWS_UPDATED');
264: arp_message.set_token('NUM_ROWS',to_char(l_count));
265: END IF;
266: EXCEPTION
267: WHEN OTHERS THEN
260: END IF;
261: END LOOP;
262:
263: arp_message.set_name('AR','AR_ROWS_UPDATED');
264: arp_message.set_token('NUM_ROWS',to_char(l_count));
265: END IF;
266: EXCEPTION
267: WHEN OTHERS THEN
268: arp_message.set_line( 'ar_ps');
264: arp_message.set_token('NUM_ROWS',to_char(l_count));
265: END IF;
266: EXCEPTION
267: WHEN OTHERS THEN
268: arp_message.set_line( 'ar_ps');
269: RAISE;
270: END ar_ps;
271:
272:
379: BEGIN
380: IF process_mode='LOCK' THEN
381: NULL;
382: ELSE
383: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
384: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','RA_CUSTOMER_TRX',FALSE);
385: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
386: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
387:
380: IF process_mode='LOCK' THEN
381: NULL;
382: ELSE
383: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
384: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','RA_CUSTOMER_TRX',FALSE);
385: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
386: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
387:
388: open merged_records;
511: EXIT;
512: END IF;
513: END LOOP;
514:
515: arp_message.set_name('AR','AR_ROWS_UPDATED');
516: arp_message.set_token('NUM_ROWS',to_char(l_count));
517: END IF;
518: EXCEPTION
519: WHEN OTHERS THEN
512: END IF;
513: END LOOP;
514:
515: arp_message.set_name('AR','AR_ROWS_UPDATED');
516: arp_message.set_token('NUM_ROWS',to_char(l_count));
517: END IF;
518: EXCEPTION
519: WHEN OTHERS THEN
520: arp_message.set_line( 'ra_ct');
516: arp_message.set_token('NUM_ROWS',to_char(l_count));
517: END IF;
518: EXCEPTION
519: WHEN OTHERS THEN
520: arp_message.set_line( 'ra_ct');
521: RAISE;
522: END ra_ct;
523:
524: -- bug9095566
571: BEGIN
572: IF process_mode='LOCK' THEN
573: NULL;
574: ELSE
575: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
576: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','RA_CUSTOMER_TRX_LINES',FALSE);
577: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
578: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
579:
572: IF process_mode='LOCK' THEN
573: NULL;
574: ELSE
575: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
576: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','RA_CUSTOMER_TRX_LINES',FALSE);
577: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
578: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
579:
580: open merged_records;
651: EXIT;
652: END IF;
653: END LOOP;
654:
655: arp_message.set_name('AR','AR_ROWS_UPDATED');
656: arp_message.set_token('NUM_ROWS',to_char(l_count));
657: END IF;
658: EXCEPTION
659: WHEN OTHERS THEN
652: END IF;
653: END LOOP;
654:
655: arp_message.set_name('AR','AR_ROWS_UPDATED');
656: arp_message.set_token('NUM_ROWS',to_char(l_count));
657: END IF;
658: EXCEPTION
659: WHEN OTHERS THEN
660: arp_message.set_line( 'ra_ctl');
656: arp_message.set_token('NUM_ROWS',to_char(l_count));
657: END IF;
658: EXCEPTION
659: WHEN OTHERS THEN
660: arp_message.set_line( 'ra_ctl');
661: RAISE;
662: END ra_ctl;
663:
664:
709: BEGIN
710: IF process_mode='LOCK' THEN
711: NULL;
712: ELSE
713: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
714: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ar_receivable_applications',FALSE);
715: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
716: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
717:
710: IF process_mode='LOCK' THEN
711: NULL;
712: ELSE
713: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
714: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','ar_receivable_applications',FALSE);
715: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
716: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
717:
718: open merged_records;
787: EXIT;
788: END IF;
789: END LOOP;
790:
791: arp_message.set_name('AR','AR_ROWS_UPDATED');
792: arp_message.set_token('NUM_ROWS',to_char(l_count));
793: END IF;
794: EXCEPTION
795: WHEN OTHERS THEN
788: END IF;
789: END LOOP;
790:
791: arp_message.set_name('AR','AR_ROWS_UPDATED');
792: arp_message.set_token('NUM_ROWS',to_char(l_count));
793: END IF;
794: EXCEPTION
795: WHEN OTHERS THEN
796: arp_message.set_line( 'ar_ra');
792: arp_message.set_token('NUM_ROWS',to_char(l_count));
793: END IF;
794: EXCEPTION
795: WHEN OTHERS THEN
796: arp_message.set_line( 'ar_ra');
797: RAISE;
798: END ar_ra;
799:
800: PROCEDURE RA_INT (
1114: BEGIN
1115: IF process_mode='LOCK' THEN
1116: NULL;
1117: ELSE
1118: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
1119: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','RA_INTERFACE_LINES',FALSE);
1120: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1121: /*Additional change for ra_interface_lines under bug2447449*/
1122: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1115: IF process_mode='LOCK' THEN
1116: NULL;
1117: ELSE
1118: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
1119: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','RA_INTERFACE_LINES',FALSE);
1120: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1121: /*Additional change for ra_interface_lines under bug2447449*/
1122: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1123: open merged_records;
1274: EXIT;
1275: END IF;
1276: END LOOP;
1277:
1278: arp_message.set_name('AR','AR_ROWS_UPDATED');
1279: arp_message.set_token('NUM_ROWS',to_char(l_count));
1280: END IF;
1281: EXCEPTION
1282: WHEN OTHERS THEN
1275: END IF;
1276: END LOOP;
1277:
1278: arp_message.set_name('AR','AR_ROWS_UPDATED');
1279: arp_message.set_token('NUM_ROWS',to_char(l_count));
1280: END IF;
1281: EXCEPTION
1282: WHEN OTHERS THEN
1283: arp_message.set_line( 'RA_INT');
1279: arp_message.set_token('NUM_ROWS',to_char(l_count));
1280: END IF;
1281: EXCEPTION
1282: WHEN OTHERS THEN
1283: arp_message.set_line( 'RA_INT');
1284: RAISE;
1285: END RA_INT;
1286:
1287: PROCEDURE ar_ard (
1328: BEGIN
1329: IF process_mode='LOCK' THEN
1330: NULL;
1331: ELSE
1332: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
1333: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_DISTRIBUTIONS',FALSE);
1334: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1335: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1336:
1329: IF process_mode='LOCK' THEN
1330: NULL;
1331: ELSE
1332: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
1333: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_DISTRIBUTIONS',FALSE);
1334: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1335: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1336:
1337: open merged_records;
1401: EXIT;
1402: END IF;
1403: END LOOP;
1404:
1405: arp_message.set_name('AR','AR_ROWS_UPDATED');
1406: arp_message.set_token('NUM_ROWS',to_char(l_count));
1407: END IF;
1408: EXCEPTION
1409: WHEN OTHERS THEN
1402: END IF;
1403: END LOOP;
1404:
1405: arp_message.set_name('AR','AR_ROWS_UPDATED');
1406: arp_message.set_token('NUM_ROWS',to_char(l_count));
1407: END IF;
1408: EXCEPTION
1409: WHEN OTHERS THEN
1410: arp_message.set_line( 'ar_ard');
1406: arp_message.set_token('NUM_ROWS',to_char(l_count));
1407: END IF;
1408: EXCEPTION
1409: WHEN OTHERS THEN
1410: arp_message.set_line( 'ar_ard');
1411: RAISE;
1412: END ar_ard;
1413:
1414:
1415: /*---------------------------- PUBLIC ROUTINES ------------------------------*/
1416: PROCEDURE merge (req_id NUMBER, set_num NUMBER, process_mode VARCHAR2) is
1417: BEGIN
1418:
1419: arp_message.set_line( 'ARP_CMERGE_ARTRX.MERGE()+' );
1420:
1421: ar_cr( req_id, set_num, process_mode );
1422: ar_ps( req_id, set_num, process_mode );
1423: ra_ct( req_id, set_num, process_mode );
1425: ra_int(req_id, set_num, process_mode );
1426: ar_ard(req_id, set_num, process_mode );
1427: ar_ra(req_id, set_num, process_mode ); -- Bug 9155869
1428:
1429: arp_message.set_line( 'ARP_CMERGE_ARTRX.MERGE()-' );
1430:
1431: EXCEPTION
1432: when others then
1433: raise;