60: BEGIN
61: IF process_mode='LOCK' THEN
62: NULL;
63: ELSE
64: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
65: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','FII_AR_PMT_SCHEDULES_F',FALSE);
66: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
67: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
68:
61: IF process_mode='LOCK' THEN
62: NULL;
63: ELSE
64: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
65: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','FII_AR_PMT_SCHEDULES_F',FALSE);
66: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
67: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
68:
69: open merged_records;
195: EXIT;
196: END IF;
197: END LOOP;
198:
199: arp_message.set_name('AR','AR_ROWS_UPDATED');
200: arp_message.set_token('NUM_ROWS',to_char(l_count));
201: END IF;
202:
203: EXCEPTION
196: END IF;
197: END LOOP;
198:
199: arp_message.set_name('AR','AR_ROWS_UPDATED');
200: arp_message.set_token('NUM_ROWS',to_char(l_count));
201: END IF;
202:
203: EXCEPTION
204:
202:
203: EXCEPTION
204:
205: WHEN OTHERS THEN
206: arp_message.set_line('MERGE_FACT_ACCOUNTS');
207: RAISE;
208: END MERGE_FACT_ACCOUNTS;
209:
210: PROCEDURE MERGE_COLLECTOR_ACCOUNTS
282: BEGIN
283: IF process_mode='LOCK' THEN
284: NULL;
285: ELSE
286: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
287: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','FII_COLLECTORS',FALSE);
288: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
289: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
290:
283: IF process_mode='LOCK' THEN
284: NULL;
285: ELSE
286: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
287: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','FII_COLLECTORS',FALSE);
288: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
289: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
290:
291: /*
362: EXIT;
363: END IF;
364: END LOOP;
365:
366: arp_message.set_name('AR','AR_ROWS_UPDATED');
367: arp_message.set_token('NUM_ROWS',to_char(l_count));
368:
369:
370: /*
363: END IF;
364: END LOOP;
365:
366: arp_message.set_name('AR','AR_ROWS_UPDATED');
367: arp_message.set_token('NUM_ROWS',to_char(l_count));
368:
369:
370: /*
371: The following code will delete records, which if updated with the surviving account/site_use
436: EXIT;
437: END IF;
438: END LOOP;
439:
440: --arp_message.set_name('AR','AR_ROWS_UPDATED');
441: --arp_message.set_token('NUM_ROWS',to_char(l_count));
442:
443: END IF;
444:
437: END IF;
438: END LOOP;
439:
440: --arp_message.set_name('AR','AR_ROWS_UPDATED');
441: --arp_message.set_token('NUM_ROWS',to_char(l_count));
442:
443: END IF;
444:
445: EXCEPTION
444:
445: EXCEPTION
446:
447: WHEN OTHERS THEN
448: arp_message.set_line('MERGE_COLLECTOR_ACCOUNTS');
449: RAISE;
450:
451: END MERGE_COLLECTOR_ACCOUNTS;
452:
498: BEGIN
499:
500: IF Process_Mode <> 'LOCK' THEN --Process_Mode = 'UPDATE'
501:
502: ARP_MESSAGE.SET_NAME('FII','FII_DELETING_TABLE');
503: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','FII_CUST_ACCOUNTS',FALSE);
504: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
505:
506: OPEN Account_Merge_Records;
499:
500: IF Process_Mode <> 'LOCK' THEN --Process_Mode = 'UPDATE'
501:
502: ARP_MESSAGE.SET_NAME('FII','FII_DELETING_TABLE');
503: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','FII_CUST_ACCOUNTS',FALSE);
504: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
505:
506: OPEN Account_Merge_Records;
507: LOOP
569: END IF;
570:
571: END LOOP;
572:
573: ARP_MESSAGE.SET_NAME('FII','FII_ROWS_DELETED');
574: ARP_MESSAGE.SET_TOKEN('NUM_ROWS', To_Char(Merge_Header_ID_List.Count),FALSE);
575:
576: END IF;
577:
570:
571: END LOOP;
572:
573: ARP_MESSAGE.SET_NAME('FII','FII_ROWS_DELETED');
574: ARP_MESSAGE.SET_TOKEN('NUM_ROWS', To_Char(Merge_Header_ID_List.Count),FALSE);
575:
576: END IF;
577:
578: EXCEPTION
576: END IF;
577:
578: EXCEPTION
579: WHEN OTHERS THEN
580: ARP_MESSAGE.SET_LINE('MERGE_CUSTOMER_ACCOUNTS');
581: RAISE;
582: END MERGE_CUSTOMER_ACCOUNTS;
583:
584: