68: BEGIN
69: IF process_mode='LOCK' THEN
70: NULL;
71: ELSE
72: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
73: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_FORECAST_DATES',FALSE);
74: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
75: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
76:
69: IF process_mode='LOCK' THEN
70: NULL;
71: ELSE
72: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
73: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_FORECAST_DATES',FALSE);
74: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
75: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
76:
77: open merged_records;
154: EXIT;
155: END IF;
156: END LOOP;
157:
158: arp_message.set_name('AR','AR_ROWS_UPDATED');
159: arp_message.set_token('NUM_ROWS',to_char(l_count));
160: END IF;
161: EXCEPTION
162: WHEN OTHERS THEN
155: END IF;
156: END LOOP;
157:
158: arp_message.set_name('AR','AR_ROWS_UPDATED');
159: arp_message.set_token('NUM_ROWS',to_char(l_count));
160: END IF;
161: EXCEPTION
162: WHEN OTHERS THEN
163: arp_message.set_line( 'MRP_FD');
159: arp_message.set_token('NUM_ROWS',to_char(l_count));
160: END IF;
161: EXCEPTION
162: WHEN OTHERS THEN
163: arp_message.set_line( 'MRP_FD');
164: RAISE;
165: END MRP_FD;
166:
167:
234: BEGIN
235: IF process_mode='LOCK' THEN
236: NULL;
237: ELSE
238: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
239: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_FORECAST_DESIGNATORS',FALSE);
240: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
241: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
242:
235: IF process_mode='LOCK' THEN
236: NULL;
237: ELSE
238: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
239: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_FORECAST_DESIGNATORS',FALSE);
240: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
241: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
242:
243: open merged_records;
324: EXIT;
325: END IF;
326: END LOOP;
327:
328: arp_message.set_name('AR','AR_ROWS_UPDATED');
329: arp_message.set_token('NUM_ROWS',to_char(l_count));
330: END IF;
331: EXCEPTION
332: WHEN OTHERS THEN
325: END IF;
326: END LOOP;
327:
328: arp_message.set_name('AR','AR_ROWS_UPDATED');
329: arp_message.set_token('NUM_ROWS',to_char(l_count));
330: END IF;
331: EXCEPTION
332: WHEN OTHERS THEN
333: arp_message.set_line( 'MRP_FDE');
329: arp_message.set_token('NUM_ROWS',to_char(l_count));
330: END IF;
331: EXCEPTION
332: WHEN OTHERS THEN
333: arp_message.set_line( 'MRP_FDE');
334: RAISE;
335: END MRP_FDE;
336:
337:
399: BEGIN
400: IF process_mode='LOCK' THEN
401: NULL;
402: ELSE
403: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
404: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_FORECAST_UPDATES',FALSE);
405: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
406: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
407:
400: IF process_mode='LOCK' THEN
401: NULL;
402: ELSE
403: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
404: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_FORECAST_UPDATES',FALSE);
405: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
406: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
407:
408: open merged_records;
488: EXIT;
489: END IF;
490: END LOOP;
491:
492: arp_message.set_name('AR','AR_ROWS_UPDATED');
493: arp_message.set_token('NUM_ROWS',to_char(l_count));
494: END IF;
495: EXCEPTION
496: WHEN OTHERS THEN
489: END IF;
490: END LOOP;
491:
492: arp_message.set_name('AR','AR_ROWS_UPDATED');
493: arp_message.set_token('NUM_ROWS',to_char(l_count));
494: END IF;
495: EXCEPTION
496: WHEN OTHERS THEN
497: arp_message.set_line( 'MRP_FU');
493: arp_message.set_token('NUM_ROWS',to_char(l_count));
494: END IF;
495: EXCEPTION
496: WHEN OTHERS THEN
497: arp_message.set_line( 'MRP_FU');
498: RAISE;
499: END MRP_FU;
500:
501:
586: BEGIN
587: IF process_mode='LOCK' THEN
588: NULL;
589: ELSE
590: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
591: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_SALES_ORDER_UPDATES',FALSE);
592: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
593: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
594:
587: IF process_mode='LOCK' THEN
588: NULL;
589: ELSE
590: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
591: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_SALES_ORDER_UPDATES',FALSE);
592: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
593: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
594:
595: open merged_records;
692: EXIT;
693: END IF;
694: END LOOP;
695:
696: arp_message.set_name('AR','AR_ROWS_UPDATED');
697: arp_message.set_token('NUM_ROWS',to_char(l_count));
698: END IF;
699: EXCEPTION
700: WHEN OTHERS THEN
693: END IF;
694: END LOOP;
695:
696: arp_message.set_name('AR','AR_ROWS_UPDATED');
697: arp_message.set_token('NUM_ROWS',to_char(l_count));
698: END IF;
699: EXCEPTION
700: WHEN OTHERS THEN
701: arp_message.set_line( 'MRP_SOU');
697: arp_message.set_token('NUM_ROWS',to_char(l_count));
698: END IF;
699: EXCEPTION
700: WHEN OTHERS THEN
701: arp_message.set_line( 'MRP_SOU');
702: RAISE;
703: END MRP_SOU;
704:
705: /*-------------------------------------------------------------
758: BEGIN
759: IF process_mode='LOCK' THEN
760: NULL;
761: ELSE
762: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
763: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_SR_ASSIGNMENTS',FALSE);
764: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
765: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
766:
759: IF process_mode='LOCK' THEN
760: NULL;
761: ELSE
762: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
763: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','MRP_SR_ASSIGNMENTS',FALSE);
764: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
765: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
766:
767: open merged_records;
837: EXIT;
838: END IF;
839: END LOOP;
840:
841: arp_message.set_name('AR','AR_ROWS_UPDATED');
842: arp_message.set_token('NUM_ROWS',to_char(l_count));
843: END IF;
844: EXCEPTION
845: WHEN OTHERS THEN
838: END IF;
839: END LOOP;
840:
841: arp_message.set_name('AR','AR_ROWS_UPDATED');
842: arp_message.set_token('NUM_ROWS',to_char(l_count));
843: END IF;
844: EXCEPTION
845: WHEN OTHERS THEN
846: arp_message.set_line( 'MRP_SA');
842: arp_message.set_token('NUM_ROWS',to_char(l_count));
843: END IF;
844: EXCEPTION
845: WHEN OTHERS THEN
846: arp_message.set_line( 'MRP_SA');
847: RAISE;
848: END MRP_SA;
849:
850:
852:
853: PROCEDURE MERGE (req_id NUMBER, set_num NUMBER, process_mode VARCHAR2) is
854: BEGIN
855:
856: arp_message.set_line( 'MRPP_CMERGE_FCST.MERGE()+' );
857:
858: MRP_FD( req_id, set_num, process_mode );
859: MRP_FDE( req_id, set_num, process_mode );
860: MRP_FU( req_id, set_num, process_mode );
860: MRP_FU( req_id, set_num, process_mode );
861: MRP_SOU( req_id, set_num, process_mode);
862: MRP_SA( req_id, set_num, process_mode); /* Bug 1848916 */
863:
864: arp_message.set_line( 'MRPP_CMERGE_FCST.MERGE()-' );
865:
866: END MERGE;
867:
868: end MRPP_CMERGE_FCST;