74: l_last_fetch BOOLEAN := FALSE;
75: l_count NUMBER;
76: BEGIN
77:
78: arp_message.set_line( 'INV_CMERGE_ITEMS.MERGE()+' );
79: /*-----------------------+
80: | MTL_CUSTOMER_ITEMS |
81: +-----------------------*/
82: /* try to lock the table first */
83:
84: IF process_mode='LOCK' THEN
85: NULL;
86: ELSE
87: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
88: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MTL_CUSTOMER_ITEMS',FALSE);
89: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
90: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
91:
84: IF process_mode='LOCK' THEN
85: NULL;
86: ELSE
87: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
88: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MTL_CUSTOMER_ITEMS',FALSE);
89: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
90: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
91:
92: open merged_records;
182: EXIT;
183: END IF;
184: END LOOP;
185: /* Number of rows updates */
186: arp_message.set_line( 'INV_CMERGE_ITEMS.MERGE()-' );
187: arp_message.set_name('AR','AR_ROWS_UPDATED');
188: arp_message.set_token('NUM_ROWS',to_char(l_count));
189: END IF;
190: EXCEPTION
183: END IF;
184: END LOOP;
185: /* Number of rows updates */
186: arp_message.set_line( 'INV_CMERGE_ITEMS.MERGE()-' );
187: arp_message.set_name('AR','AR_ROWS_UPDATED');
188: arp_message.set_token('NUM_ROWS',to_char(l_count));
189: END IF;
190: EXCEPTION
191: WHEN OTHERS THEN
184: END LOOP;
185: /* Number of rows updates */
186: arp_message.set_line( 'INV_CMERGE_ITEMS.MERGE()-' );
187: arp_message.set_name('AR','AR_ROWS_UPDATED');
188: arp_message.set_token('NUM_ROWS',to_char(l_count));
189: END IF;
190: EXCEPTION
191: WHEN OTHERS THEN
192: arp_message.set_line( 'INV_CMERGE_ITEMS.MERGE');
188: arp_message.set_token('NUM_ROWS',to_char(l_count));
189: END IF;
190: EXCEPTION
191: WHEN OTHERS THEN
192: arp_message.set_line( 'INV_CMERGE_ITEMS.MERGE');
193: arp_message.set_line( substrb(SQLERRM,1,200) );
194: RAISE;
195: END MERGE;
196:
189: END IF;
190: EXCEPTION
191: WHEN OTHERS THEN
192: arp_message.set_line( 'INV_CMERGE_ITEMS.MERGE');
193: arp_message.set_line( substrb(SQLERRM,1,200) );
194: RAISE;
195: END MERGE;
196:
197: end INV_CMERGE_ITEMS;