eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_HZ_MERGE_PUB dependencies on OKC_HZ_MERGE_PUB

Line 1: Package Body OKC_HZ_MERGE_PUB AS

1: Package Body OKC_HZ_MERGE_PUB AS
2: /* $Header: OKCPMRGB.pls 120.3.12020000.2 2013/02/06 07:49:38 mchandak ship $ */
3: l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
4: --
5: -- Copyright (c) 2000 Oracle Corporation, Redwood Shores, CA, USA

Line 9: -- API Name :OKC_HZ_MERGE_PUB

5: -- Copyright (c) 2000 Oracle Corporation, Redwood Shores, CA, USA
6: -- All rights reserved.
7: --
8: -- Start of Comments
9: -- API Name :OKC_HZ_MERGE_PUB
10: -- Type :Public
11: -- Purpose :Manage customer and party merges
12: --
13: -- Modification History

Line 192: arp_message.set_line('OKC_HZ_MERGE_PUB.LOCK_TABLES()+');

188: )
189: FOR UPDATE NOWAIT;
190:
191: BEGIN
192: arp_message.set_line('OKC_HZ_MERGE_PUB.LOCK_TABLES()+');
193:
194: -- party roles for accounts
195: arp_message.set_name('AR','AR_LOCKING_TABLE');
196: arp_message.set_token('TABLE_NAME','OKC_K_PARTY_ROLES_B',FALSE);

Line 259: arp_message.set_line('OKC_HZ_MERGE_PUB.LOCK_TABLES()-');

255: arp_message.set_line('Locking for site uses');
256: open c_lock_cim(c_c_site_use);
257: close c_lock_cim;
258:
259: arp_message.set_line('OKC_HZ_MERGE_PUB.LOCK_TABLES()-');
260: EXCEPTION
261: WHEN TIMEOUT_ON_RESOURCE THEN
262: arp_message.set_line('Could not obtain lock for records');
263: raise;

Line 405: arp_message.set_line('OKC_HZ_MERGE_PUB.PARTY_MERGE()+');

401: l_log_party_id NUMBER;
402:
403: l_merge_not_allowed_excp EXCEPTION;
404: BEGIN
405: arp_message.set_line('OKC_HZ_MERGE_PUB.PARTY_MERGE()+');
406: arp_message.set_line('At the begining of Party Merge procedure');
407:
408: --
409: -- initialize the status to check whether any contract has more than one

Line 561: arp_message.set_line('OKC_HZ_MERGE_PUB.PARTY_MERGE()-');

557: END LOOP; -- cursor c_cpr
558: CLOSE c_cpr;
559:
560: arp_message.set_line('At the end of Party Merge procedure');
561: arp_message.set_line('OKC_HZ_MERGE_PUB.PARTY_MERGE()-');
562:
563: EXCEPTION
564: WHEN l_merge_not_allowed_excp THEN
565: arp_message.set_line('Contract exists for duplicate party with more than one account, merge cannot proceed');

Line 567: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');

563: EXCEPTION
564: WHEN l_merge_not_allowed_excp THEN
565: arp_message.set_line('Contract exists for duplicate party with more than one account, merge cannot proceed');
566: arp_message.set_line('Please update the above mentioned contracts and run customer merge again');
567: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');
568: RAISE;
569:
570: WHEN others THEN
571: l_error_msg := substr(SQLERRM,1,70);

Line 572: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT', l_error_msg);

568: RAISE;
569:
570: WHEN others THEN
571: l_error_msg := substr(SQLERRM,1,70);
572: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT', l_error_msg);
573: RAISE;
574:
575: END; -- party_merge
576:

Line 602: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_MERGE()+');

598: l_cum_count NUMBER := 0;
599: /*BUG9077092*/
600:
601: BEGIN
602: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_MERGE()+');
603:
604: -- contract party roles
605: -- Insert into log table
606: IF l_profile_val IS NOT NULL AND l_profile_val = 'Y' THEN

Line 1211: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_MERGE()-');

1207: l_cum_count := l_cum_count + l_count; /*bug9077092*/
1208: arp_message.set_name('AR','AR_ROWS_UPDATED');
1209: arp_message.set_token('NUM_ROWS',to_char(l_count));
1210:
1211: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_MERGE()-');
1212:
1213: /*bug9077092 - incrementing minor version even when account merge happens within the parties*/
1214: IF l_cum_count > 0 AND g_minor_ver_upd_processed = 'N' THEN
1215:

Line 1289: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_SITE_MERGE()+');

1285: l_cum_count NUMBER := 0;
1286: /*BUG9077092*/
1287:
1288: BEGIN
1289: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_SITE_MERGE()+');
1290: arp_message.set_line('Updating account sites');
1291: --
1292: -- Account Sites come first, then site uses
1293: --

Line 2379: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_SITE_MERGE()-');

2375: l_cum_count := l_cum_count + l_count; /*bug9077092*/
2376: arp_message.set_name('AR','AR_ROWS_UPDATED');
2377: arp_message.set_token('NUM_ROWS',to_char(l_count));
2378:
2379: arp_message.set_line('OKC_HZ_MERGE_PUB.ACCOUNT_SITE_MERGE()-');
2380:
2381: /*bug9077092 - incrementing minor version even when account merge happens within the parties*/
2382: IF l_cum_count > 0 AND g_minor_ver_upd_processed = 'N' THEN
2383:

Line 2512: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()+');

2508: l_lock_excp EXCEPTION;
2509: l_hook NUMBER;
2510:
2511: BEGIN
2512: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()+');
2513:
2514: --
2515: -- check process mode. If LOCK, then just lock the tables
2516: --

Line 2613: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()-');

2609: elsif l_hook = -1 then
2610: arp_message.set_line(' Exception raised in OKS_CODE_HOOK.Update_Merge_Account()-');
2611: End If;
2612:
2613: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()-');
2614:
2615: EXCEPTION
2616: WHEN l_merge_disallowed_excp THEN
2617: arp_message.set_line('Contract exists for duplicate party, merge cannot proceed');

Line 2618: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');

2614:
2615: EXCEPTION
2616: WHEN l_merge_disallowed_excp THEN
2617: arp_message.set_line('Contract exists for duplicate party, merge cannot proceed');
2618: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');
2619: RAISE;
2620: WHEN l_no_data_found_excp THEN
2621: arp_message.set_line('No data found for merge information');
2622: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');

Line 2622: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');

2618: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');
2619: RAISE;
2620: WHEN l_no_data_found_excp THEN
2621: arp_message.set_line('No data found for merge information');
2622: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');
2623: RAISE;
2624: WHEN l_lock_excp THEN -- normal exit after locking
2625: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()-');
2626: WHEN others THEN

Line 2625: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()-');

2621: arp_message.set_line('No data found for merge information');
2622: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT');
2623: RAISE;
2624: WHEN l_lock_excp THEN -- normal exit after locking
2625: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()-');
2626: WHEN others THEN
2627: l_error_msg := substr(SQLERRM,1,70);
2628: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT', l_error_msg);
2629: RAISE;

Line 2628: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT', l_error_msg);

2624: WHEN l_lock_excp THEN -- normal exit after locking
2625: arp_message.set_line('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT()-');
2626: WHEN others THEN
2627: l_error_msg := substr(SQLERRM,1,70);
2628: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT', l_error_msg);
2629: RAISE;
2630: END; -- merge_account
2631:
2632: END; -- Package Body OKC_HZ_MERGE_PUB

Line 2632: END; -- Package Body OKC_HZ_MERGE_PUB

2628: arp_message.set_error('OKC_HZ_MERGE_PUB.MERGE_ACCOUNT', l_error_msg);
2629: RAISE;
2630: END; -- merge_account
2631:
2632: END; -- Package Body OKC_HZ_MERGE_PUB