17: BEGIN
18:
19: ---Put the header in the report to identify the block to be run
20:
21: arp_message.set_line('CRM_MERGE.SR_MERGE()+');
22:
23: IF ( process_mode = 'LOCK' ) Then
24: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
25: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
20:
21: arp_message.set_line('CRM_MERGE.SR_MERGE()+');
22:
23: IF ( process_mode = 'LOCK' ) Then
24: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
25: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
26: ELSE
27: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
28: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
21: arp_message.set_line('CRM_MERGE.SR_MERGE()+');
22:
23: IF ( process_mode = 'LOCK' ) Then
24: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
25: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
26: ELSE
27: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
28: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
29:
23: IF ( process_mode = 'LOCK' ) Then
24: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
25: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
26: ELSE
27: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
28: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
29:
30: END IF;
31:
24: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
25: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
26: ELSE
27: arp_message.set_name('AR', 'AR_UPDATING_TABLE');
28: arp_message.set_token('TABLE_NAME', 'CS_INCIDENTS_ALL_B',FALSE );
29:
30: END IF;
31:
32: ----Merge the CS_INCIDENTS table update the account_id
31:
32: ----Merge the CS_INCIDENTS table update the account_id
33:
34: message_text := '***-- Procedure CS_MERGE_CUSTOMER_ACCOUNT_ID --**';
35: arp_message.set_line(message_text);
36:
37: ---dbms_output.put_line('am going to call small proc');
38:
39: CS_MERGE_CUST_ACCOUNT_ID( req_id, set_number, process_mode );
38:
39: CS_MERGE_CUST_ACCOUNT_ID( req_id, set_number, process_mode );
40:
41: message_text := '***-- End CS_MERGE_CUSTOMER_ACCOUNT_ID --**';
42: arp_message.set_line(message_text);
43:
44:
45: ---Report that the process for CS_INCIDENTS is complete
46:
45: ---Report that the process for CS_INCIDENTS is complete
46:
47: IF ( process_mode = 'LOCK' ) Then
48: message_text := '** LOCKING completed for table CS_INCIDENTS_ALL_B **';
49: arp_message.set_line(message_text);
50: ELSE
51: message_text := '** MERGE completed for table CS_INCIDENTS_ALL_B **';
52: arp_message.set_line(message_text);
53: END IF;
48: message_text := '** LOCKING completed for table CS_INCIDENTS_ALL_B **';
49: arp_message.set_line(message_text);
50: ELSE
51: message_text := '** MERGE completed for table CS_INCIDENTS_ALL_B **';
52: arp_message.set_line(message_text);
53: END IF;
54:
55: arp_message.set_line('CRM_MERGE.SR_MERGE()-');
56:
51: message_text := '** MERGE completed for table CS_INCIDENTS_ALL_B **';
52: arp_message.set_line(message_text);
53: END IF;
54:
55: arp_message.set_line('CRM_MERGE.SR_MERGE()-');
56:
57: END MERGE_CUST_ACCOUNTS;
58:
59: -- The following procedure merges the following columns from CS_INCIDENTS_ALL_B
143: BEGIN
144: IF process_mode='LOCK' THEN
145: NULL;
146: ELSE
147: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
148: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','CS_INCIDENTS_ALL_B',FALSE);
149:
150: HZ_ACCT_MERGE_UTIL.load_set(set_number, req_id);
151: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
144: IF process_mode='LOCK' THEN
145: NULL;
146: ELSE
147: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
148: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','CS_INCIDENTS_ALL_B',FALSE);
149:
150: HZ_ACCT_MERGE_UTIL.load_set(set_number, req_id);
151: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
152:
325: END IF;
326:
327: END LOOP;
328:
329: arp_message.set_name('AR','AR_ROWS_UPDATED');
330: arp_message.set_token('NUM_ROWS',to_char(l_count));
331: END IF;
332:
333: EXCEPTION
326:
327: END LOOP;
328:
329: arp_message.set_name('AR','AR_ROWS_UPDATED');
330: arp_message.set_token('NUM_ROWS',to_char(l_count));
331: END IF;
332:
333: EXCEPTION
334: WHEN DIFFERENT_PARTIES THEN
331: END IF;
332:
333: EXCEPTION
334: WHEN DIFFERENT_PARTIES THEN
335: arp_message.set_name('CS','CS_ACCT_MERGE_NOT_ALLOWED');
336: RAISE;
337:
338: WHEN OTHERS THEN
339: arp_message.set_line( 'CS_MERGE_CUST_ACCOUNT_ID');
335: arp_message.set_name('CS','CS_ACCT_MERGE_NOT_ALLOWED');
336: RAISE;
337:
338: WHEN OTHERS THEN
339: arp_message.set_line( 'CS_MERGE_CUST_ACCOUNT_ID');
340: RAISE;
341:
342: END CS_MERGE_CUST_ACCOUNT_ID;
343: