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_INTERIM_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_INTERIM_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_icr');
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_icr');
138: RAISE;
139: END ar_icr;
140:
141: PROCEDURE ar_icrl (
181: BEGIN
182: IF process_mode='LOCK' THEN
183: NULL;
184: ELSE
185: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
186: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_INTERIM_CASH_RECEIPT_LINES',FALSE);
187: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
188: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
189:
182: IF process_mode='LOCK' THEN
183: NULL;
184: ELSE
185: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
186: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','AR_INTERIM_CASH_RECEIPT_LINES',FALSE);
187: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
188: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
189:
190: open merged_records;
255: EXIT;
256: END IF;
257: END LOOP;
258:
259: arp_message.set_name('AR','AR_ROWS_UPDATED');
260: arp_message.set_token('NUM_ROWS',to_char(l_count));
261: END IF;
262: EXCEPTION
263: WHEN OTHERS THEN
256: END IF;
257: END LOOP;
258:
259: arp_message.set_name('AR','AR_ROWS_UPDATED');
260: arp_message.set_token('NUM_ROWS',to_char(l_count));
261: END IF;
262: EXCEPTION
263: WHEN OTHERS THEN
264: arp_message.set_line( 'ar_icrl');
260: arp_message.set_token('NUM_ROWS',to_char(l_count));
261: END IF;
262: EXCEPTION
263: WHEN OTHERS THEN
264: arp_message.set_line( 'ar_icrl');
265: RAISE;
266: END ar_icrl;
267:
268: /*---------------------------- PUBLIC ROUTINES ------------------------------*/
268: /*---------------------------- PUBLIC ROUTINES ------------------------------*/
269: PROCEDURE merge (req_id NUMBER, set_num NUMBER, process_mode VARCHAR2) is
270: BEGIN
271:
272: arp_message.set_line( 'ARP_CMERGE_ARATC.MERGE()+' );
273:
274: AR_ICR( req_id, set_num, process_mode );
275: AR_ICRL( req_id, set_num, process_mode );
276:
273:
274: AR_ICR( req_id, set_num, process_mode );
275: AR_ICRL( req_id, set_num, process_mode );
276:
277: arp_message.set_line( 'ARP_CMERGE_ARATC.MERGE()-' );
278:
279: END merge;
280:
281: end ARP_CMERGE_ARATC;