[Home] [Help]
228: l_return_status VARCHAR2(1);
229:
230: BEGIN
231: IF PG_DEBUG in ('Y', 'C') THEN
232: msc_sch_wb.atp_debug('*********Begin procedure Add_PF_Bucketed_Demands ********');
233: msc_sch_wb.atp_debug('Add_PF_Bucketed_Demands: ' || 'demand_source_type = ' ||p_atp_rec.demand_source_type);--cmro
234: END IF;
235:
236: -- Initializing API return code
229:
230: BEGIN
231: IF PG_DEBUG in ('Y', 'C') THEN
232: msc_sch_wb.atp_debug('*********Begin procedure Add_PF_Bucketed_Demands ********');
233: msc_sch_wb.atp_debug('Add_PF_Bucketed_Demands: ' || 'demand_source_type = ' ||p_atp_rec.demand_source_type);--cmro
234: END IF;
235:
236: -- Initializing API return code
237: x_return_status := FND_API.G_RET_STS_SUCCESS;
263: );
264:
265: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
266: IF PG_DEBUG in ('Y', 'C') THEN
267: msc_sch_wb.atp_debug('Add_PF_Bucketed_Demands: ' || 'Error occured in procedure Calc_Bucketed_Demands_Info');
268: END IF;
269: x_return_status := FND_API.G_RET_STS_ERROR;
270: return;
271: END IF;
283: l_return_status
284: );
285: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
286: IF PG_DEBUG in ('Y', 'C') THEN
287: msc_sch_wb.atp_debug('Add_PF_Bucketed_Demands: ' || 'Error occured in procedure Insert_Bucketed_Demand');
288: END IF;
289: x_return_status := FND_API.G_RET_STS_ERROR;
290: return;
291: END IF;
304: l_return_status
305: );
306: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
307: IF PG_DEBUG in ('Y', 'C') THEN
308: msc_sch_wb.atp_debug('Add_PF_Bucketed_Demands: ' || 'Error occured in procedure Insert_Bucketed_Demand');
309: END IF;
310: x_return_status := FND_API.G_RET_STS_ERROR;
311: return;
312: END IF;
312: END IF;
313: END IF;
314:
315: IF PG_DEBUG in ('Y', 'C') THEN
316: msc_sch_wb.atp_debug('*********End of procedure Add_PF_Bucketed_Demands ********');
317: END IF;
318:
319: EXCEPTION
320: WHEN OTHERS THEN
318:
319: EXCEPTION
320: WHEN OTHERS THEN
321: IF PG_DEBUG in ('Y', 'C') THEN
322: msc_sch_wb.atp_debug('Add_PF_Bucketed_Demands: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
323: END IF;
324: x_return_status := FND_API.G_RET_STS_ERROR;
325:
326: END Add_PF_Bucketed_Demands;
340: -- local variables
341:
342: BEGIN
343: IF PG_DEBUG in ('Y', 'C') THEN
344: msc_sch_wb.atp_debug('*********Begin procedure Calc_Bucketed_Demands_Info ********');
345: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date = ' ||to_char(p_req_date));
346: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
347: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Qty = ' ||to_char(p_req_qty));
348: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date Qty = ' ||to_char(p_req_date_qty));
341:
342: BEGIN
343: IF PG_DEBUG in ('Y', 'C') THEN
344: msc_sch_wb.atp_debug('*********Begin procedure Calc_Bucketed_Demands_Info ********');
345: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date = ' ||to_char(p_req_date));
346: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
347: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Qty = ' ||to_char(p_req_qty));
348: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date Qty = ' ||to_char(p_req_date_qty));
349: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date Qty = ' ||to_char(p_atf_date_qty));
342: BEGIN
343: IF PG_DEBUG in ('Y', 'C') THEN
344: msc_sch_wb.atp_debug('*********Begin procedure Calc_Bucketed_Demands_Info ********');
345: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date = ' ||to_char(p_req_date));
346: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
347: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Qty = ' ||to_char(p_req_qty));
348: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date Qty = ' ||to_char(p_req_date_qty));
349: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date Qty = ' ||to_char(p_atf_date_qty));
350: END IF;
343: IF PG_DEBUG in ('Y', 'C') THEN
344: msc_sch_wb.atp_debug('*********Begin procedure Calc_Bucketed_Demands_Info ********');
345: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date = ' ||to_char(p_req_date));
346: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
347: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Qty = ' ||to_char(p_req_qty));
348: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date Qty = ' ||to_char(p_req_date_qty));
349: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date Qty = ' ||to_char(p_atf_date_qty));
350: END IF;
351:
344: msc_sch_wb.atp_debug('*********Begin procedure Calc_Bucketed_Demands_Info ********');
345: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date = ' ||to_char(p_req_date));
346: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
347: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Qty = ' ||to_char(p_req_qty));
348: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date Qty = ' ||to_char(p_req_date_qty));
349: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date Qty = ' ||to_char(p_atf_date_qty));
350: END IF;
351:
352: -- Initializing API return code
345: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date = ' ||to_char(p_req_date));
346: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
347: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Qty = ' ||to_char(p_req_qty));
348: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Req Date Qty = ' ||to_char(p_req_date_qty));
349: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'ATF Date Qty = ' ||to_char(p_atf_date_qty));
350: END IF;
351:
352: -- Initializing API return code
353: x_return_status := FND_API.G_RET_STS_SUCCESS;
428: END IF;
429: END IF;
430:
431: IF PG_DEBUG in ('Y', 'C') THEN
432: msc_sch_wb.atp_debug('************** Bucketed Demands *************');
433: msc_sch_wb.atp_debug('* Add member item bucketed demand = ' ||x_bucketed_demands_rec.insert_mem_bd);
434: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(x_bucketed_demands_rec.mem_bd_date));
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
429: END IF;
430:
431: IF PG_DEBUG in ('Y', 'C') THEN
432: msc_sch_wb.atp_debug('************** Bucketed Demands *************');
433: msc_sch_wb.atp_debug('* Add member item bucketed demand = ' ||x_bucketed_demands_rec.insert_mem_bd);
434: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(x_bucketed_demands_rec.mem_bd_date));
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
430:
431: IF PG_DEBUG in ('Y', 'C') THEN
432: msc_sch_wb.atp_debug('************** Bucketed Demands *************');
433: msc_sch_wb.atp_debug('* Add member item bucketed demand = ' ||x_bucketed_demands_rec.insert_mem_bd);
434: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(x_bucketed_demands_rec.mem_bd_date));
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
431: IF PG_DEBUG in ('Y', 'C') THEN
432: msc_sch_wb.atp_debug('************** Bucketed Demands *************');
433: msc_sch_wb.atp_debug('* Add member item bucketed demand = ' ||x_bucketed_demands_rec.insert_mem_bd);
434: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(x_bucketed_demands_rec.mem_bd_date));
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
432: msc_sch_wb.atp_debug('************** Bucketed Demands *************');
433: msc_sch_wb.atp_debug('* Add member item bucketed demand = ' ||x_bucketed_demands_rec.insert_mem_bd);
434: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(x_bucketed_demands_rec.mem_bd_date));
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
433: msc_sch_wb.atp_debug('* Add member item bucketed demand = ' ||x_bucketed_demands_rec.insert_mem_bd);
434: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(x_bucketed_demands_rec.mem_bd_date));
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
441: msc_sch_wb.atp_debug('* Pf Display Flag = ' ||to_char(x_bucketed_demands_rec.pf_display_flag));
434: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(x_bucketed_demands_rec.mem_bd_date));
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
441: msc_sch_wb.atp_debug('* Pf Display Flag = ' ||to_char(x_bucketed_demands_rec.pf_display_flag));
442: msc_sch_wb.atp_debug('***********************************************');
435: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(x_bucketed_demands_rec.mem_bd_qty));
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
441: msc_sch_wb.atp_debug('* Pf Display Flag = ' ||to_char(x_bucketed_demands_rec.pf_display_flag));
442: msc_sch_wb.atp_debug('***********************************************');
443: msc_sch_wb.atp_debug('*********End of procedure Calc_Bucketed_Demands_Info ********');
436: msc_sch_wb.atp_debug('* Member Display Flag = ' ||to_char(x_bucketed_demands_rec.mem_display_flag));
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
441: msc_sch_wb.atp_debug('* Pf Display Flag = ' ||to_char(x_bucketed_demands_rec.pf_display_flag));
442: msc_sch_wb.atp_debug('***********************************************');
443: msc_sch_wb.atp_debug('*********End of procedure Calc_Bucketed_Demands_Info ********');
444: END IF;
437: msc_sch_wb.atp_debug('* ');
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
441: msc_sch_wb.atp_debug('* Pf Display Flag = ' ||to_char(x_bucketed_demands_rec.pf_display_flag));
442: msc_sch_wb.atp_debug('***********************************************');
443: msc_sch_wb.atp_debug('*********End of procedure Calc_Bucketed_Demands_Info ********');
444: END IF;
445:
438: msc_sch_wb.atp_debug('* Add family item bucketed demand = ' ||x_bucketed_demands_rec.insert_pf_bd);
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
441: msc_sch_wb.atp_debug('* Pf Display Flag = ' ||to_char(x_bucketed_demands_rec.pf_display_flag));
442: msc_sch_wb.atp_debug('***********************************************');
443: msc_sch_wb.atp_debug('*********End of procedure Calc_Bucketed_Demands_Info ********');
444: END IF;
445:
446: EXCEPTION
439: msc_sch_wb.atp_debug('* Family Item BD Date = ' ||to_char(x_bucketed_demands_rec.pf_bd_date));
440: msc_sch_wb.atp_debug('* Family Item BD Qty = ' ||to_char(x_bucketed_demands_rec.pf_bd_qty));
441: msc_sch_wb.atp_debug('* Pf Display Flag = ' ||to_char(x_bucketed_demands_rec.pf_display_flag));
442: msc_sch_wb.atp_debug('***********************************************');
443: msc_sch_wb.atp_debug('*********End of procedure Calc_Bucketed_Demands_Info ********');
444: END IF;
445:
446: EXCEPTION
447: WHEN OTHERS THEN
445:
446: EXCEPTION
447: WHEN OTHERS THEN
448: IF PG_DEBUG in ('Y', 'C') THEN
449: msc_sch_wb.atp_debug('Calc_Bucketed_Demands_Info: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
450: END IF;
451: x_return_status := FND_API.G_RET_STS_ERROR;
452:
453: END Calc_Bucketed_Demands_Info;
472: l_update_pf_bd VARCHAR2(1) := 'N';
473:
474: BEGIN
475: IF PG_DEBUG in ('Y', 'C') THEN
476: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Bucketed_Demands ********');
477: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
478: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
479: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_demand_date = ' ||to_char(p_demand_date));
480: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
473:
474: BEGIN
475: IF PG_DEBUG in ('Y', 'C') THEN
476: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Bucketed_Demands ********');
477: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
478: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
479: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_demand_date = ' ||to_char(p_demand_date));
480: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
481: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_old_demand_date_qty = ' ||to_char(p_old_demand_date_qty));
474: BEGIN
475: IF PG_DEBUG in ('Y', 'C') THEN
476: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Bucketed_Demands ********');
477: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
478: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
479: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_demand_date = ' ||to_char(p_demand_date));
480: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
481: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_old_demand_date_qty = ' ||to_char(p_old_demand_date_qty));
482: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
475: IF PG_DEBUG in ('Y', 'C') THEN
476: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Bucketed_Demands ********');
477: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
478: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
479: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_demand_date = ' ||to_char(p_demand_date));
480: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
481: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_old_demand_date_qty = ' ||to_char(p_old_demand_date_qty));
482: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
483: END IF;
476: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Bucketed_Demands ********');
477: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
478: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
479: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_demand_date = ' ||to_char(p_demand_date));
480: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
481: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_old_demand_date_qty = ' ||to_char(p_old_demand_date_qty));
482: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
483: END IF;
484:
477: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
478: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
479: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_demand_date = ' ||to_char(p_demand_date));
480: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
481: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_old_demand_date_qty = ' ||to_char(p_old_demand_date_qty));
482: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
483: END IF;
484:
485: -- Initializing API return code
478: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
479: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_demand_date = ' ||to_char(p_demand_date));
480: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
481: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_old_demand_date_qty = ' ||to_char(p_old_demand_date_qty));
482: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
483: END IF;
484:
485: -- Initializing API return code
486: x_return_status := FND_API.G_RET_STS_SUCCESS;
490: l_mem_bd_qty := p_new_demand_date_qty;
491:
492: l_update_pf_bd := 'D';
493: IF PG_DEBUG in ('Y', 'C') THEN
494: msc_sch_wb.atp_debug('********* New Bucketed Demands ********');
495: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(p_demand_date));
496: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(l_mem_bd_qty));
497: msc_sch_wb.atp_debug('* ');
498: msc_sch_wb.atp_debug('* Family Item BD Qty = 0');
491:
492: l_update_pf_bd := 'D';
493: IF PG_DEBUG in ('Y', 'C') THEN
494: msc_sch_wb.atp_debug('********* New Bucketed Demands ********');
495: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(p_demand_date));
496: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(l_mem_bd_qty));
497: msc_sch_wb.atp_debug('* ');
498: msc_sch_wb.atp_debug('* Family Item BD Qty = 0');
499: msc_sch_wb.atp_debug('*************************************');
492: l_update_pf_bd := 'D';
493: IF PG_DEBUG in ('Y', 'C') THEN
494: msc_sch_wb.atp_debug('********* New Bucketed Demands ********');
495: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(p_demand_date));
496: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(l_mem_bd_qty));
497: msc_sch_wb.atp_debug('* ');
498: msc_sch_wb.atp_debug('* Family Item BD Qty = 0');
499: msc_sch_wb.atp_debug('*************************************');
500: END IF;
493: IF PG_DEBUG in ('Y', 'C') THEN
494: msc_sch_wb.atp_debug('********* New Bucketed Demands ********');
495: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(p_demand_date));
496: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(l_mem_bd_qty));
497: msc_sch_wb.atp_debug('* ');
498: msc_sch_wb.atp_debug('* Family Item BD Qty = 0');
499: msc_sch_wb.atp_debug('*************************************');
500: END IF;
501: ELSE
494: msc_sch_wb.atp_debug('********* New Bucketed Demands ********');
495: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(p_demand_date));
496: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(l_mem_bd_qty));
497: msc_sch_wb.atp_debug('* ');
498: msc_sch_wb.atp_debug('* Family Item BD Qty = 0');
499: msc_sch_wb.atp_debug('*************************************');
500: END IF;
501: ELSE
502: l_update_mem_bd := 'Y';
495: msc_sch_wb.atp_debug('* Member Item BD Date = ' ||to_char(p_demand_date));
496: msc_sch_wb.atp_debug('* Member Item BD Qty = ' ||to_char(l_mem_bd_qty));
497: msc_sch_wb.atp_debug('* ');
498: msc_sch_wb.atp_debug('* Family Item BD Qty = 0');
499: msc_sch_wb.atp_debug('*************************************');
500: END IF;
501: ELSE
502: l_update_mem_bd := 'Y';
503: l_mem_bd_qty := null;
505: l_update_pf_bd := 'Y';
506: l_pf_bd_decrement_qty := GREATEST(nvl(p_old_demand_date_qty, 0)
507: - nvl(p_new_demand_date_qty, 0), 0);
508: IF PG_DEBUG in ('Y', 'C') THEN
509: msc_sch_wb.atp_debug('************ New Bucketed Demands **************');
510: msc_sch_wb.atp_debug('* Decremented Previous Family Item BD by ' ||to_char(l_pf_bd_decrement_qty));
511: msc_sch_wb.atp_debug('**************************************************');
512: END IF;
513: END IF;
506: l_pf_bd_decrement_qty := GREATEST(nvl(p_old_demand_date_qty, 0)
507: - nvl(p_new_demand_date_qty, 0), 0);
508: IF PG_DEBUG in ('Y', 'C') THEN
509: msc_sch_wb.atp_debug('************ New Bucketed Demands **************');
510: msc_sch_wb.atp_debug('* Decremented Previous Family Item BD by ' ||to_char(l_pf_bd_decrement_qty));
511: msc_sch_wb.atp_debug('**************************************************');
512: END IF;
513: END IF;
514:
507: - nvl(p_new_demand_date_qty, 0), 0);
508: IF PG_DEBUG in ('Y', 'C') THEN
509: msc_sch_wb.atp_debug('************ New Bucketed Demands **************');
510: msc_sch_wb.atp_debug('* Decremented Previous Family Item BD by ' ||to_char(l_pf_bd_decrement_qty));
511: msc_sch_wb.atp_debug('**************************************************');
512: END IF;
513: END IF;
514:
515: IF l_update_mem_bd = 'Y' THEN
538: and plan_id = p_plan_id;
539: END IF;
540:
541: IF PG_DEBUG in ('Y', 'C') THEN
542: msc_sch_wb.atp_debug('*********End of procedure Update_PF_Bucketed_Demands ********');
543: END IF;
544:
545: EXCEPTION
546: WHEN OTHERS THEN
544:
545: EXCEPTION
546: WHEN OTHERS THEN
547: IF PG_DEBUG in ('Y', 'C') THEN
548: msc_sch_wb.atp_debug('Update_PF_Bucketed_Demands: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
549: END IF;
550: x_return_status := FND_API.G_RET_STS_ERROR;
551:
552: END Update_PF_Bucketed_Demands;
576: l_return_status VARCHAR2(1);
577:
578: BEGIN
579: IF PG_DEBUG in ('Y', 'C') THEN
580: msc_sch_wb.atp_debug('*********Begin procedure Increment_Bucketed_Demands_Qty ********');
581: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'p_plan_id = ' ||to_char(p_plan_id));
582: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
583: END IF;
584:
577:
578: BEGIN
579: IF PG_DEBUG in ('Y', 'C') THEN
580: msc_sch_wb.atp_debug('*********Begin procedure Increment_Bucketed_Demands_Qty ********');
581: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'p_plan_id = ' ||to_char(p_plan_id));
582: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
583: END IF;
584:
585: -- Initializing API return code
578: BEGIN
579: IF PG_DEBUG in ('Y', 'C') THEN
580: msc_sch_wb.atp_debug('*********Begin procedure Increment_Bucketed_Demands_Qty ********');
581: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'p_plan_id = ' ||to_char(p_plan_id));
582: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
583: END IF;
584:
585: -- Initializing API return code
586: x_return_status := FND_API.G_RET_STS_SUCCESS;
612: );
613:
614: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
615: IF PG_DEBUG in ('Y', 'C') THEN
616: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'Error occured in procedure Calc_Bucketed_Demands_Info');
617: END IF;
618: x_return_status := FND_API.G_RET_STS_ERROR;
619: return;
620: END IF;
620: END IF;
621:
622: IF nvl(l_bucketed_demands_rec.mem_bd_qty, 0) = 0 THEN
623: IF PG_DEBUG in ('Y', 'C') THEN
624: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: Deleting member item bucketed demand...');
625: END IF;
626: delete msc_alloc_demands
627: where parent_demand_id = p_parent_demand_id
628: and inventory_item_id = p_atp_rec.request_item_id
640: and plan_id = p_plan_id;
641:
642: IF SQL%NOTFOUND THEN
643: IF PG_DEBUG in ('Y', 'C') THEN
644: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: Member item bucketed demand not found. Inserting now...');
645: END IF;
646: Insert_Bucketed_Demand(
647: p_atp_rec,
648: p_plan_id,
655: l_return_status
656: );
657: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
658: IF PG_DEBUG in ('Y', 'C') THEN
659: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'Error occured in procedure Insert_Bucketed_Demand');
660: END IF;
661: x_return_status := FND_API.G_RET_STS_ERROR;
662: return;
663: END IF;
665: END IF;
666:
667: IF nvl(l_bucketed_demands_rec.pf_bd_qty,0) = 0 THEN
668: IF PG_DEBUG in ('Y', 'C') THEN
669: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: Deleting family item bucketed demand...');
670: END IF;
671: delete msc_alloc_demands
672: where parent_demand_id = p_parent_demand_id
673: and inventory_item_id = p_atp_rec.inventory_item_id
685: and plan_id = p_plan_id;
686:
687: IF SQL%NOTFOUND THEN
688: IF PG_DEBUG in ('Y', 'C') THEN
689: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: Family item bucketed demand not found. Inserting now...');
690: END IF;
691: Insert_Bucketed_Demand(
692: p_atp_rec,
693: p_plan_id,
700: l_return_status
701: );
702: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
703: IF PG_DEBUG in ('Y', 'C') THEN
704: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'Error occured in procedure Insert_Bucketed_Demand');
705: END IF;
706: x_return_status := FND_API.G_RET_STS_ERROR;
707: return;
708: END IF;
709: END IF;
710: END IF;
711:
712: IF PG_DEBUG in ('Y', 'C') THEN
713: msc_sch_wb.atp_debug('*********End of procedure Increment_Bucketed_Demands_Qty ********');
714: END IF;
715:
716: EXCEPTION
717: WHEN OTHERS THEN
715:
716: EXCEPTION
717: WHEN OTHERS THEN
718: IF PG_DEBUG in ('Y', 'C') THEN
719: msc_sch_wb.atp_debug('Increment_Bucketed_Demands_Qty: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
720: END IF;
721: x_return_status := FND_API.G_RET_STS_ERROR;
722:
723: END Increment_Bucketed_Demands_Qty;
755: l_atf_date_qty NUMBER; --bug3397904
756:
757: BEGIN
758: IF PG_DEBUG in ('Y', 'C') THEN
759: msc_sch_wb.atp_debug('*********Begin procedure Move_PF_Bucketed_Demands ********');
760: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
761: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
756:
757: BEGIN
758: IF PG_DEBUG in ('Y', 'C') THEN
759: msc_sch_wb.atp_debug('*********Begin procedure Move_PF_Bucketed_Demands ********');
760: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
761: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
757: BEGIN
758: IF PG_DEBUG in ('Y', 'C') THEN
759: msc_sch_wb.atp_debug('*********Begin procedure Move_PF_Bucketed_Demands ********');
760: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
761: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
765: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
758: IF PG_DEBUG in ('Y', 'C') THEN
759: msc_sch_wb.atp_debug('*********Begin procedure Move_PF_Bucketed_Demands ********');
760: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
761: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
765: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
766: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
759: msc_sch_wb.atp_debug('*********Begin procedure Move_PF_Bucketed_Demands ********');
760: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
761: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
765: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
766: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
767: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date_qty = ' ||to_char(p_atf_date_qty));
760: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
761: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
765: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
766: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
767: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date_qty = ' ||to_char(p_atf_date_qty));
768: END IF;
761: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
765: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
766: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
767: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date_qty = ' ||to_char(p_atf_date_qty));
768: END IF;
769:
762: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_old_demand_date = ' ||to_char(p_old_demand_date));
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
765: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
766: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
767: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date_qty = ' ||to_char(p_atf_date_qty));
768: END IF;
769:
770: -- Initializing API return code
763: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date = ' ||to_char(p_new_demand_date));
764: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_demand_qty = ' ||to_char(p_demand_qty));
765: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_new_demand_date_qty = ' ||to_char(p_new_demand_date_qty));
766: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date = ' ||to_char(p_atf_date));
767: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'p_atf_date_qty = ' ||to_char(p_atf_date_qty));
768: END IF;
769:
770: -- Initializing API return code
771: x_return_status := FND_API.G_RET_STS_SUCCESS;
777: --This condition was before for override case
778: --now checking by flag as now both dates can be different.
779: /*
780: IF PG_DEBUG in ('Y', 'C') THEN
781: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: No need to move bucketed demand dates. Update qtys');
782: END IF;
783: IF (p_atf_date_qty is NULL) THEN
784: IF PG_DEBUG in ('Y', 'C') THEN
785: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: No need to update qtys');
781: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: No need to move bucketed demand dates. Update qtys');
782: END IF;
783: IF (p_atf_date_qty is NULL) THEN
784: IF PG_DEBUG in ('Y', 'C') THEN
785: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: No need to update qtys');
786: END IF;
787: ELSIF p_old_demand_date <= p_atf_date THEN
788: update msc_alloc_demands
789: set allocated_quantity = p_demand_qty,
792: and demand_date <= p_atf_date
793: and plan_id = p_plan_id;
794:
795: IF PG_DEBUG in ('Y', 'C') THEN
796: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
797: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
798: msc_sch_wb.atp_debug('* ');
799: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
800: msc_sch_wb.atp_debug('*********************************************');
793: and plan_id = p_plan_id;
794:
795: IF PG_DEBUG in ('Y', 'C') THEN
796: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
797: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
798: msc_sch_wb.atp_debug('* ');
799: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
800: msc_sch_wb.atp_debug('*********************************************');
801: END IF;
794:
795: IF PG_DEBUG in ('Y', 'C') THEN
796: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
797: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
798: msc_sch_wb.atp_debug('* ');
799: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
800: msc_sch_wb.atp_debug('*********************************************');
801: END IF;
802: ELSE
795: IF PG_DEBUG in ('Y', 'C') THEN
796: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
797: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
798: msc_sch_wb.atp_debug('* ');
799: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
800: msc_sch_wb.atp_debug('*********************************************');
801: END IF;
802: ELSE
803: update msc_alloc_demands
796: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
797: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
798: msc_sch_wb.atp_debug('* ');
799: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
800: msc_sch_wb.atp_debug('*********************************************');
801: END IF;
802: ELSE
803: update msc_alloc_demands
804: set allocated_quantity = nvl(p_atf_date_qty, 0),
814: and demand_date > p_atf_date
815: and plan_id = p_plan_id;
816:
817: IF PG_DEBUG in ('Y', 'C') THEN
818: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
819: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
820: msc_sch_wb.atp_debug('* ');
821: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
822: msc_sch_wb.atp_debug('*********************************************');
815: and plan_id = p_plan_id;
816:
817: IF PG_DEBUG in ('Y', 'C') THEN
818: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
819: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
820: msc_sch_wb.atp_debug('* ');
821: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
822: msc_sch_wb.atp_debug('*********************************************');
823: END IF;
816:
817: IF PG_DEBUG in ('Y', 'C') THEN
818: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
819: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
820: msc_sch_wb.atp_debug('* ');
821: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
822: msc_sch_wb.atp_debug('*********************************************');
823: END IF;
824: END IF;*/
817: IF PG_DEBUG in ('Y', 'C') THEN
818: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
819: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
820: msc_sch_wb.atp_debug('* ');
821: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
822: msc_sch_wb.atp_debug('*********************************************');
823: END IF;
824: END IF;*/
825: IF (p_new_demand_date <= p_atf_date) AND
818: msc_sch_wb.atp_debug('********* New Bucketed Demand Qtys ********');
819: msc_sch_wb.atp_debug('* Member Item BD Qty = ' || nvl(p_atf_date_qty, 0));
820: msc_sch_wb.atp_debug('* ');
821: msc_sch_wb.atp_debug('* Family Item BD Qty = ' || (p_demand_qty - nvl(p_atf_date_qty, 0)));
822: msc_sch_wb.atp_debug('*********************************************');
823: END IF;
824: END IF;*/
825: IF (p_new_demand_date <= p_atf_date) AND
826: (NVL(p_atf_date_qty,p_demand_qty) >= p_demand_qty) THEN
830: l_mem_bd_date := p_new_demand_date;
831: l_mem_bd_qty := p_demand_qty;
832:
833: IF PG_DEBUG in ('Y', 'C') THEN
834: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: Inside IF');
835: END IF;
836:
837: ELSIF (p_new_demand_date <= p_atf_date) AND (p_atf_date_qty > 0) THEN
838:
846: l_pf_bd_date := p_atf_date + 1;
847: l_pf_bd_qty := p_demand_qty - p_atf_date_qty;
848:
849: IF PG_DEBUG in ('Y', 'C') THEN
850: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: p_new_demand_date <= p_atf_date');
851: END IF;
852:
853: ELSIF (p_new_demand_date <= p_atf_date) THEN
854:
875: l_pf_bd_date := p_new_demand_date;
876: l_pf_bd_qty := p_demand_qty - p_atf_date_qty;
877:
878: IF PG_DEBUG in ('Y', 'C') THEN
879: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: inside else');
880: END IF;
881: END IF;
882:
883: IF PG_DEBUG in ('Y', 'C') THEN
880: END IF;
881: END IF;
882:
883: IF PG_DEBUG in ('Y', 'C') THEN
884: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
885: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
886: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
881: END IF;
882:
883: IF PG_DEBUG in ('Y', 'C') THEN
884: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
885: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
886: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
882:
883: IF PG_DEBUG in ('Y', 'C') THEN
884: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
885: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
886: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
883: IF PG_DEBUG in ('Y', 'C') THEN
884: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
885: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
886: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
884: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
885: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
886: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
892: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
885: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
886: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
892: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
893: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
886: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
892: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
893: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
894: msc_sch_wb.atp_debug('*************************************');
887: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
892: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
893: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
894: msc_sch_wb.atp_debug('*************************************');
895: END IF;
888: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
892: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
893: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
894: msc_sch_wb.atp_debug('*************************************');
895: END IF;
896:
889: msc_sch_wb.atp_debug('* ');
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
892: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
893: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
894: msc_sch_wb.atp_debug('*************************************');
895: END IF;
896:
897: IF l_update_mem_bd = 'Y' THEN
890: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
891: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
892: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
893: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
894: msc_sch_wb.atp_debug('*************************************');
895: END IF;
896:
897: IF l_update_mem_bd = 'Y' THEN
898: update msc_alloc_demands
909: and plan_id = p_plan_id;
910:
911: IF (SQL%NOTFOUND) and (nvl(l_mem_bd_qty, 0) > 0) and (l_atp_rec.inventory_item_id is NOT NULL) THEN
912: IF PG_DEBUG in ('Y', 'C') THEN
913: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: Member item bucketed demand not found. Inserting now...');
914: END IF;
915: l_atp_rec.quantity_ordered := p_demand_qty;
916: l_atp_rec.requested_ship_date := p_new_demand_date;
917: Insert_Bucketed_Demand(
926: l_return_status
927: );
928: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
929: IF PG_DEBUG in ('Y', 'C') THEN
930: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'Error occured in procedure Insert_Bucketed_Demand');
931: END IF;
932: x_return_status := FND_API.G_RET_STS_ERROR;
933: return;
934: END IF;
950: and plan_id = p_plan_id;
951:
952: IF (SQL%NOTFOUND) and (nvl(l_pf_bd_qty, 0) > 0) and (l_atp_rec.inventory_item_id is NOT NULL) THEN
953: IF PG_DEBUG in ('Y', 'C') THEN
954: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: Family item bucketed demand not found. Inserting now...');
955: END IF;
956: l_atp_rec.quantity_ordered := p_demand_qty;
957: l_atp_rec.requested_ship_date := p_new_demand_date;
958: Insert_Bucketed_Demand(
967: l_return_status
968: );
969: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
970: IF PG_DEBUG in ('Y', 'C') THEN
971: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'Error occured in procedure Insert_Bucketed_Demand');
972: END IF;
973: x_return_status := FND_API.G_RET_STS_ERROR;
974: return;
975: END IF;
986: l_return_status
987: );
988: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
989: IF PG_DEBUG in ('Y', 'C') THEN
990: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'Error occured in procedure Move_PF_Bd_Dates');
991: END IF;
992: x_return_status := FND_API.G_RET_STS_ERROR;
993: return;
994: END IF;
997: l_new_demand_date_qty := p_new_demand_date_qty - nvl(p_bkwd_pass_atf_date_qty,0); --bug3397904
998: l_atf_date_qty := p_atf_date_qty - nvl(p_bkwd_pass_atf_date_qty,0); --bug3397904
999:
1000: IF PG_DEBUG in ('Y', 'C') THEN --bug3397904 start
1001: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1002: msc_sch_wb.atp_debug('* Backward pass atf date qty = ' ||to_char(p_bkwd_pass_atf_date_qty));
1003: msc_sch_wb.atp_debug('* l_new_demand_date_qty = ' ||to_char(l_new_demand_date_qty));
1004: msc_sch_wb.atp_debug('* l_atf_date_qty = ' ||to_char(l_atf_date_qty));
1005: msc_sch_wb.atp_debug('* ');
998: l_atf_date_qty := p_atf_date_qty - nvl(p_bkwd_pass_atf_date_qty,0); --bug3397904
999:
1000: IF PG_DEBUG in ('Y', 'C') THEN --bug3397904 start
1001: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1002: msc_sch_wb.atp_debug('* Backward pass atf date qty = ' ||to_char(p_bkwd_pass_atf_date_qty));
1003: msc_sch_wb.atp_debug('* l_new_demand_date_qty = ' ||to_char(l_new_demand_date_qty));
1004: msc_sch_wb.atp_debug('* l_atf_date_qty = ' ||to_char(l_atf_date_qty));
1005: msc_sch_wb.atp_debug('* ');
1006: END IF; --bug3397904 end
999:
1000: IF PG_DEBUG in ('Y', 'C') THEN --bug3397904 start
1001: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1002: msc_sch_wb.atp_debug('* Backward pass atf date qty = ' ||to_char(p_bkwd_pass_atf_date_qty));
1003: msc_sch_wb.atp_debug('* l_new_demand_date_qty = ' ||to_char(l_new_demand_date_qty));
1004: msc_sch_wb.atp_debug('* l_atf_date_qty = ' ||to_char(l_atf_date_qty));
1005: msc_sch_wb.atp_debug('* ');
1006: END IF; --bug3397904 end
1007: IF p_new_demand_date <= p_atf_date THEN
1000: IF PG_DEBUG in ('Y', 'C') THEN --bug3397904 start
1001: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1002: msc_sch_wb.atp_debug('* Backward pass atf date qty = ' ||to_char(p_bkwd_pass_atf_date_qty));
1003: msc_sch_wb.atp_debug('* l_new_demand_date_qty = ' ||to_char(l_new_demand_date_qty));
1004: msc_sch_wb.atp_debug('* l_atf_date_qty = ' ||to_char(l_atf_date_qty));
1005: msc_sch_wb.atp_debug('* ');
1006: END IF; --bug3397904 end
1007: IF p_new_demand_date <= p_atf_date THEN
1008: /* Move member item's bucketed demand*/
1001: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1002: msc_sch_wb.atp_debug('* Backward pass atf date qty = ' ||to_char(p_bkwd_pass_atf_date_qty));
1003: msc_sch_wb.atp_debug('* l_new_demand_date_qty = ' ||to_char(l_new_demand_date_qty));
1004: msc_sch_wb.atp_debug('* l_atf_date_qty = ' ||to_char(l_atf_date_qty));
1005: msc_sch_wb.atp_debug('* ');
1006: END IF; --bug3397904 end
1007: IF p_new_demand_date <= p_atf_date THEN
1008: /* Move member item's bucketed demand*/
1009: l_update_mem_bd := 'Y';
1042:
1043: l_mem_bd_qty := l_mem_bd_qty + p_bkwd_pass_atf_date_qty; --bug3397904
1044:
1045: IF PG_DEBUG in ('Y', 'C') THEN
1046: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1047: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
1048: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1043: l_mem_bd_qty := l_mem_bd_qty + p_bkwd_pass_atf_date_qty; --bug3397904
1044:
1045: IF PG_DEBUG in ('Y', 'C') THEN
1046: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1047: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
1048: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1044:
1045: IF PG_DEBUG in ('Y', 'C') THEN
1046: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1047: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
1048: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1045: IF PG_DEBUG in ('Y', 'C') THEN
1046: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1047: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
1048: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1046: msc_sch_wb.atp_debug('********* Bucketed Demands ********');
1047: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
1048: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1054: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
1047: msc_sch_wb.atp_debug('* Update member item bucketed demand = ' ||l_update_mem_bd);
1048: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1054: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
1055: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
1048: msc_sch_wb.atp_debug('* l_mem_bd_date = ' ||to_char(l_mem_bd_date));
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1054: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
1055: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
1056: msc_sch_wb.atp_debug('*************************************');
1049: msc_sch_wb.atp_debug('* l_mem_bd_qty = ' ||to_char(l_mem_bd_qty));
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1054: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
1055: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
1056: msc_sch_wb.atp_debug('*************************************');
1057: END IF;
1050: msc_sch_wb.atp_debug('* l_mem_display_flag = ' ||to_char(l_mem_display_flag));
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1054: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
1055: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
1056: msc_sch_wb.atp_debug('*************************************');
1057: END IF;
1058:
1051: msc_sch_wb.atp_debug('* ');
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1054: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
1055: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
1056: msc_sch_wb.atp_debug('*************************************');
1057: END IF;
1058:
1059: IF l_update_mem_bd = 'Y' THEN
1052: msc_sch_wb.atp_debug('* Update family item bucketed demand = ' ||l_update_pf_bd);
1053: msc_sch_wb.atp_debug('* l_pf_bd_date = ' ||to_char(l_pf_bd_date));
1054: msc_sch_wb.atp_debug('* l_pf_bd_qty = ' ||to_char(l_pf_bd_qty));
1055: msc_sch_wb.atp_debug('* l_pf_display_flag = ' ||to_char(l_pf_display_flag));
1056: msc_sch_wb.atp_debug('*************************************');
1057: END IF;
1058:
1059: IF l_update_mem_bd = 'Y' THEN
1060: update msc_alloc_demands
1071: and plan_id = p_plan_id;
1072:
1073: IF (SQL%NOTFOUND) and (nvl(l_mem_bd_qty, 0) > 0) and (l_atp_rec.inventory_item_id is NOT NULL) THEN
1074: IF PG_DEBUG in ('Y', 'C') THEN
1075: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: Member item bucketed demand not found. Inserting now...');
1076: END IF;
1077: l_atp_rec.quantity_ordered := p_demand_qty;
1078: l_atp_rec.requested_ship_date := p_new_demand_date;
1079: Insert_Bucketed_Demand(
1089: l_return_status
1090: );
1091: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1092: IF PG_DEBUG in ('Y', 'C') THEN
1093: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'Error occured in procedure Insert_Bucketed_Demand');
1094: END IF;
1095: x_return_status := FND_API.G_RET_STS_ERROR;
1096: return;
1097: END IF;
1119: and plan_id = p_plan_id;
1120:
1121: IF (SQL%NOTFOUND) and (nvl(l_pf_bd_qty, 0) > 0) and (l_atp_rec.inventory_item_id is NOT NULL) THEN
1122: IF PG_DEBUG in ('Y', 'C') THEN
1123: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: Family item bucketed demand not found. Inserting now...');
1124: END IF;
1125: l_atp_rec.quantity_ordered := p_demand_qty;
1126: l_atp_rec.requested_ship_date := p_new_demand_date;
1127: Insert_Bucketed_Demand(
1136: l_return_status
1137: );
1138: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1139: IF PG_DEBUG in ('Y', 'C') THEN
1140: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'Error occured in procedure Insert_Bucketed_Demand');
1141: END IF;
1142: x_return_status := FND_API.G_RET_STS_ERROR;
1143: return;
1144: END IF;
1146: END IF;
1147: END IF;
1148: END IF;
1149: IF PG_DEBUG in ('Y', 'C') THEN
1150: msc_sch_wb.atp_debug('*********End of procedure Move_PF_Bucketed_Demands ********');
1151: END IF;
1152:
1153: EXCEPTION
1154: WHEN OTHERS THEN
1152:
1153: EXCEPTION
1154: WHEN OTHERS THEN
1155: IF PG_DEBUG in ('Y', 'C') THEN
1156: msc_sch_wb.atp_debug('Move_PF_Bucketed_Demands: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1157: END IF;
1158: x_return_status := FND_API.G_RET_STS_ERROR;
1159:
1160: END Move_PF_Bucketed_Demands;
1173: -- local variables
1174:
1175: BEGIN
1176: IF PG_DEBUG in ('Y', 'C') THEN
1177: msc_sch_wb.atp_debug('*********Begin procedure Move_PF_Bd_Dates ********');
1178: END IF;
1179:
1180: -- Initializing API return code
1181: x_return_status := FND_API.G_RET_STS_SUCCESS;
1220: and plan_id = p_plan_id;
1221: END IF;
1222:
1223: IF PG_DEBUG in ('Y', 'C') THEN
1224: msc_sch_wb.atp_debug('*********End of procedure Move_PF_Bd_Dates ********');
1225: END IF;
1226:
1227: EXCEPTION
1228: WHEN OTHERS THEN
1226:
1227: EXCEPTION
1228: WHEN OTHERS THEN
1229: IF PG_DEBUG in ('Y', 'C') THEN
1230: msc_sch_wb.atp_debug('Move_PF_Bd_Dates: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1231: END IF;
1232: x_return_status := FND_API.G_RET_STS_ERROR;
1233:
1234: END Move_PF_Bd_Dates;
1252: l_sysdate date := sysdate;
1253:
1254: BEGIN
1255: IF PG_DEBUG in ('Y', 'C') THEN
1256: msc_sch_wb.atp_debug('*********Begin procedure Insert_Bucketed_Demand ********');
1257: END IF;
1258:
1259: -- Initializing API return code
1260: x_return_status := FND_API.G_RET_STS_SUCCESS;
1323:
1324: EXCEPTION
1325: WHEN OTHERS THEN
1326: IF PG_DEBUG in ('Y', 'C') THEN
1327: msc_sch_wb.atp_debug('Insert_Bucketed_Demand: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1328: END IF;
1329: x_return_status := FND_API.G_RET_STS_ERROR;
1330:
1331: END Insert_Bucketed_Demand;
1342: -- local variables
1343:
1344: BEGIN
1345: IF PG_DEBUG in ('Y', 'C') THEN
1346: msc_sch_wb.atp_debug('*********Begin procedure Find_PF_Bucketed_Demands ********');
1347: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'mem_item_id = ' ||to_char(p_bucketed_demands_rec.mem_item_id));
1348: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
1349: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
1350: END IF;
1343:
1344: BEGIN
1345: IF PG_DEBUG in ('Y', 'C') THEN
1346: msc_sch_wb.atp_debug('*********Begin procedure Find_PF_Bucketed_Demands ********');
1347: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'mem_item_id = ' ||to_char(p_bucketed_demands_rec.mem_item_id));
1348: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
1349: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
1350: END IF;
1351:
1344: BEGIN
1345: IF PG_DEBUG in ('Y', 'C') THEN
1346: msc_sch_wb.atp_debug('*********Begin procedure Find_PF_Bucketed_Demands ********');
1347: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'mem_item_id = ' ||to_char(p_bucketed_demands_rec.mem_item_id));
1348: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
1349: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
1350: END IF;
1351:
1352: -- Initializing API return code
1345: IF PG_DEBUG in ('Y', 'C') THEN
1346: msc_sch_wb.atp_debug('*********Begin procedure Find_PF_Bucketed_Demands ********');
1347: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'mem_item_id = ' ||to_char(p_bucketed_demands_rec.mem_item_id));
1348: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_plan_id = ' ||to_char(p_plan_id));
1349: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'p_parent_demand_id = ' ||to_char(p_parent_demand_id));
1350: END IF;
1351:
1352: -- Initializing API return code
1353: x_return_status := FND_API.G_RET_STS_SUCCESS;
1367: p_bucketed_demands_rec.mem_bd_qty := 0;
1368: p_bucketed_demands_rec.mem_bd_date := null;
1369: END;
1370: IF PG_DEBUG in ('Y', 'C') THEN
1371: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'pf_item_id = ' ||to_char(p_bucketed_demands_rec.pf_item_id));
1372: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Member item BD Date = ' ||to_char(p_bucketed_demands_rec.mem_bd_date));
1373: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Member item BD Qty = ' ||to_char(p_bucketed_demands_rec.mem_bd_qty));
1374: END IF;
1375:
1368: p_bucketed_demands_rec.mem_bd_date := null;
1369: END;
1370: IF PG_DEBUG in ('Y', 'C') THEN
1371: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'pf_item_id = ' ||to_char(p_bucketed_demands_rec.pf_item_id));
1372: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Member item BD Date = ' ||to_char(p_bucketed_demands_rec.mem_bd_date));
1373: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Member item BD Qty = ' ||to_char(p_bucketed_demands_rec.mem_bd_qty));
1374: END IF;
1375:
1376: BEGIN
1369: END;
1370: IF PG_DEBUG in ('Y', 'C') THEN
1371: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'pf_item_id = ' ||to_char(p_bucketed_demands_rec.pf_item_id));
1372: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Member item BD Date = ' ||to_char(p_bucketed_demands_rec.mem_bd_date));
1373: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Member item BD Qty = ' ||to_char(p_bucketed_demands_rec.mem_bd_qty));
1374: END IF;
1375:
1376: BEGIN
1377: SELECT allocated_quantity,
1388: p_bucketed_demands_rec.pf_bd_qty := 0;
1389: p_bucketed_demands_rec.pf_bd_date := null;
1390: END;
1391: IF PG_DEBUG in ('Y', 'C') THEN
1392: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Family item BD Date = ' ||to_char(p_bucketed_demands_rec.pf_bd_date));
1393: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Family item BD Qty = ' ||to_char(p_bucketed_demands_rec.pf_bd_qty));
1394: msc_sch_wb.atp_debug('*********End of procedure Find_PF_Bucketed_Demands ********');
1395: END IF;
1396:
1389: p_bucketed_demands_rec.pf_bd_date := null;
1390: END;
1391: IF PG_DEBUG in ('Y', 'C') THEN
1392: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Family item BD Date = ' ||to_char(p_bucketed_demands_rec.pf_bd_date));
1393: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Family item BD Qty = ' ||to_char(p_bucketed_demands_rec.pf_bd_qty));
1394: msc_sch_wb.atp_debug('*********End of procedure Find_PF_Bucketed_Demands ********');
1395: END IF;
1396:
1397: EXCEPTION
1390: END;
1391: IF PG_DEBUG in ('Y', 'C') THEN
1392: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Family item BD Date = ' ||to_char(p_bucketed_demands_rec.pf_bd_date));
1393: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Family item BD Qty = ' ||to_char(p_bucketed_demands_rec.pf_bd_qty));
1394: msc_sch_wb.atp_debug('*********End of procedure Find_PF_Bucketed_Demands ********');
1395: END IF;
1396:
1397: EXCEPTION
1398: WHEN OTHERS THEN
1396:
1397: EXCEPTION
1398: WHEN OTHERS THEN
1399: IF PG_DEBUG in ('Y', 'C') THEN
1400: msc_sch_wb.atp_debug('Find_PF_Bucketed_Demands: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1401: END IF;
1402: x_return_status := FND_API.G_RET_STS_ERROR;
1403:
1404: END Find_PF_Bucketed_Demands;
1427: l_sysdate date := sysdate;
1428:
1429: BEGIN
1430: IF PG_DEBUG in ('Y', 'C') THEN
1431: msc_sch_wb.atp_debug('*********Begin procedure Add_PF_Rollup_Supplies ********');
1432: END IF;
1433:
1434: -- Initializing API return code
1435: x_return_status := FND_API.G_RET_STS_SUCCESS;
1477: NVL(MSC_ATP_PVT.G_PARTNER_ID,-1), -- Bug 3558125
1478: NVL(MSC_ATP_PVT.G_PARTNER_SITE_ID,-1) -- Bug 3558125
1479: );
1480: IF PG_DEBUG in ('Y', 'C') THEN
1481: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1482: msc_sch_wb.atp_debug('* Add rollup supply for member item ');
1483: msc_sch_wb.atp_debug('* Member Item Id = ' ||to_char(p_member_item_id));
1484: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1485: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1478: NVL(MSC_ATP_PVT.G_PARTNER_SITE_ID,-1) -- Bug 3558125
1479: );
1480: IF PG_DEBUG in ('Y', 'C') THEN
1481: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1482: msc_sch_wb.atp_debug('* Add rollup supply for member item ');
1483: msc_sch_wb.atp_debug('* Member Item Id = ' ||to_char(p_member_item_id));
1484: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1485: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1486: msc_sch_wb.atp_debug('**************************************');
1479: );
1480: IF PG_DEBUG in ('Y', 'C') THEN
1481: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1482: msc_sch_wb.atp_debug('* Add rollup supply for member item ');
1483: msc_sch_wb.atp_debug('* Member Item Id = ' ||to_char(p_member_item_id));
1484: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1485: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1486: msc_sch_wb.atp_debug('**************************************');
1487: END IF;
1480: IF PG_DEBUG in ('Y', 'C') THEN
1481: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1482: msc_sch_wb.atp_debug('* Add rollup supply for member item ');
1483: msc_sch_wb.atp_debug('* Member Item Id = ' ||to_char(p_member_item_id));
1484: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1485: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1486: msc_sch_wb.atp_debug('**************************************');
1487: END IF;
1488: ELSE
1481: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1482: msc_sch_wb.atp_debug('* Add rollup supply for member item ');
1483: msc_sch_wb.atp_debug('* Member Item Id = ' ||to_char(p_member_item_id));
1484: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1485: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1486: msc_sch_wb.atp_debug('**************************************');
1487: END IF;
1488: ELSE
1489: INSERT INTO MSC_ALLOC_SUPPLIES(
1482: msc_sch_wb.atp_debug('* Add rollup supply for member item ');
1483: msc_sch_wb.atp_debug('* Member Item Id = ' ||to_char(p_member_item_id));
1484: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1485: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1486: msc_sch_wb.atp_debug('**************************************');
1487: END IF;
1488: ELSE
1489: INSERT INTO MSC_ALLOC_SUPPLIES(
1490: PLAN_ID,
1528: NVL(MSC_ATP_PVT.G_PARTNER_ID,-1), -- Bug 3558125
1529: NVL(MSC_ATP_PVT.G_PARTNER_SITE_ID,-1) -- Bug 3558125
1530: );
1531: IF PG_DEBUG in ('Y', 'C') THEN
1532: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1533: msc_sch_wb.atp_debug('* Add rollup supply for family item ');
1534: msc_sch_wb.atp_debug('* Family Item Id = ' ||to_char(p_family_item_id));
1535: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1536: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1529: NVL(MSC_ATP_PVT.G_PARTNER_SITE_ID,-1) -- Bug 3558125
1530: );
1531: IF PG_DEBUG in ('Y', 'C') THEN
1532: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1533: msc_sch_wb.atp_debug('* Add rollup supply for family item ');
1534: msc_sch_wb.atp_debug('* Family Item Id = ' ||to_char(p_family_item_id));
1535: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1536: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1537: msc_sch_wb.atp_debug('**************************************');
1530: );
1531: IF PG_DEBUG in ('Y', 'C') THEN
1532: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1533: msc_sch_wb.atp_debug('* Add rollup supply for family item ');
1534: msc_sch_wb.atp_debug('* Family Item Id = ' ||to_char(p_family_item_id));
1535: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1536: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1537: msc_sch_wb.atp_debug('**************************************');
1538: END IF;
1531: IF PG_DEBUG in ('Y', 'C') THEN
1532: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1533: msc_sch_wb.atp_debug('* Add rollup supply for family item ');
1534: msc_sch_wb.atp_debug('* Family Item Id = ' ||to_char(p_family_item_id));
1535: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1536: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1537: msc_sch_wb.atp_debug('**************************************');
1538: END IF;
1539: END IF;
1532: msc_sch_wb.atp_debug('*********** Rollup Supply **********');
1533: msc_sch_wb.atp_debug('* Add rollup supply for family item ');
1534: msc_sch_wb.atp_debug('* Family Item Id = ' ||to_char(p_family_item_id));
1535: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1536: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1537: msc_sch_wb.atp_debug('**************************************');
1538: END IF;
1539: END IF;
1540:
1533: msc_sch_wb.atp_debug('* Add rollup supply for family item ');
1534: msc_sch_wb.atp_debug('* Family Item Id = ' ||to_char(p_family_item_id));
1535: msc_sch_wb.atp_debug('* Qty = ' ||to_char(p_order_quantity));
1536: msc_sch_wb.atp_debug('* Date = ' ||to_char(p_schedule_date));
1537: msc_sch_wb.atp_debug('**************************************');
1538: END IF;
1539: END IF;
1540:
1541: IF PG_DEBUG in ('Y', 'C') THEN
1538: END IF;
1539: END IF;
1540:
1541: IF PG_DEBUG in ('Y', 'C') THEN
1542: msc_sch_wb.atp_debug('*********End of procedure Add_PF_Rollup_Supplies ********');
1543: END IF;
1544:
1545: EXCEPTION
1546: WHEN OTHERS THEN
1544:
1545: EXCEPTION
1546: WHEN OTHERS THEN
1547: IF PG_DEBUG in ('Y', 'C') THEN
1548: msc_sch_wb.atp_debug('Add_PF_Rollup_Supplies: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1549: END IF;
1550: x_return_status := FND_API.G_RET_STS_ERROR;
1551:
1552: END Add_PF_Rollup_Supplies;
1570: l_sysdate date := sysdate;
1571:
1572: BEGIN
1573: IF PG_DEBUG in ('Y', 'C') THEN
1574: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Rollup_Supplies ********');
1575: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_plan_id ='||to_char(p_plan_id));
1576: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_parent_transaction_id ='||to_char(p_parent_transaction_id));
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1571:
1572: BEGIN
1573: IF PG_DEBUG in ('Y', 'C') THEN
1574: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Rollup_Supplies ********');
1575: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_plan_id ='||to_char(p_plan_id));
1576: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_parent_transaction_id ='||to_char(p_parent_transaction_id));
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1579: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_date ='||to_char(p_date));
1572: BEGIN
1573: IF PG_DEBUG in ('Y', 'C') THEN
1574: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Rollup_Supplies ********');
1575: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_plan_id ='||to_char(p_plan_id));
1576: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_parent_transaction_id ='||to_char(p_parent_transaction_id));
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1579: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_date ='||to_char(p_date));
1580: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_quantity ='||to_char(p_quantity));
1573: IF PG_DEBUG in ('Y', 'C') THEN
1574: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Rollup_Supplies ********');
1575: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_plan_id ='||to_char(p_plan_id));
1576: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_parent_transaction_id ='||to_char(p_parent_transaction_id));
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1579: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_date ='||to_char(p_date));
1580: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_quantity ='||to_char(p_quantity));
1581: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_atf_date ='||to_char(p_atf_date));
1574: msc_sch_wb.atp_debug('*********Begin procedure Update_PF_Rollup_Supplies ********');
1575: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_plan_id ='||to_char(p_plan_id));
1576: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_parent_transaction_id ='||to_char(p_parent_transaction_id));
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1579: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_date ='||to_char(p_date));
1580: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_quantity ='||to_char(p_quantity));
1581: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_atf_date ='||to_char(p_atf_date));
1582: END IF;
1575: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_plan_id ='||to_char(p_plan_id));
1576: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_parent_transaction_id ='||to_char(p_parent_transaction_id));
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1579: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_date ='||to_char(p_date));
1580: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_quantity ='||to_char(p_quantity));
1581: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_atf_date ='||to_char(p_atf_date));
1582: END IF;
1583:
1576: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_parent_transaction_id ='||to_char(p_parent_transaction_id));
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1579: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_date ='||to_char(p_date));
1580: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_quantity ='||to_char(p_quantity));
1581: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_atf_date ='||to_char(p_atf_date));
1582: END IF;
1583:
1584: -- Initializing API return code
1577: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1578: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1579: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_date ='||to_char(p_date));
1580: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_quantity ='||to_char(p_quantity));
1581: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'p_atf_date ='||to_char(p_atf_date));
1582: END IF;
1583:
1584: -- Initializing API return code
1585: x_return_status := FND_API.G_RET_STS_SUCCESS;
1620: AND parent_transaction_id = p_parent_transaction_id;
1621: END IF;
1622:
1623: IF PG_DEBUG in ('Y', 'C') THEN
1624: msc_sch_wb.atp_debug('*********End of procedure Update_PF_Rollup_Supplies ********');
1625: END IF;
1626:
1627: EXCEPTION
1628: WHEN OTHERS THEN
1626:
1627: EXCEPTION
1628: WHEN OTHERS THEN
1629: IF PG_DEBUG in ('Y', 'C') THEN
1630: msc_sch_wb.atp_debug('Update_PF_Rollup_Supplies: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1631: END IF;
1632: x_return_status := FND_API.G_RET_STS_ERROR;
1633:
1634: END Update_PF_Rollup_Supplies;
1664: l_rows_proc NUMBER := 0;
1665:
1666: BEGIN
1667: IF PG_DEBUG in ('Y', 'C') THEN
1668: msc_sch_wb.atp_debug('*** Begin Add_PF_Stealing_Supply_Details Procedure ***');
1669: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_plan_id ='||to_char(p_plan_id));
1670: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_identifier ='||to_char(p_identifier));
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1665:
1666: BEGIN
1667: IF PG_DEBUG in ('Y', 'C') THEN
1668: msc_sch_wb.atp_debug('*** Begin Add_PF_Stealing_Supply_Details Procedure ***');
1669: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_plan_id ='||to_char(p_plan_id));
1670: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_identifier ='||to_char(p_identifier));
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1666: BEGIN
1667: IF PG_DEBUG in ('Y', 'C') THEN
1668: msc_sch_wb.atp_debug('*** Begin Add_PF_Stealing_Supply_Details Procedure ***');
1669: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_plan_id ='||to_char(p_plan_id));
1670: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_identifier ='||to_char(p_identifier));
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1667: IF PG_DEBUG in ('Y', 'C') THEN
1668: msc_sch_wb.atp_debug('*** Begin Add_PF_Stealing_Supply_Details Procedure ***');
1669: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_plan_id ='||to_char(p_plan_id));
1670: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_identifier ='||to_char(p_identifier));
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1668: msc_sch_wb.atp_debug('*** Begin Add_PF_Stealing_Supply_Details Procedure ***');
1669: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_plan_id ='||to_char(p_plan_id));
1670: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_identifier ='||to_char(p_identifier));
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1669: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_plan_id ='||to_char(p_plan_id));
1670: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_identifier ='||to_char(p_identifier));
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1670: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_identifier ='||to_char(p_identifier));
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1671: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_demand_source_type ='||to_char(p_demand_source_type));--cmro
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1679: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stolen_demand_class = ' ||p_stolen_demand_class);
1672: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_item_id ='||to_char(p_mem_item_id));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1679: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stolen_demand_class = ' ||p_stolen_demand_class);
1680: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_ship_date = ' ||to_char(p_ship_date));
1673: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_item_id ='||to_char(p_pf_item_id));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1679: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stolen_demand_class = ' ||p_stolen_demand_class);
1680: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_ship_date = ' ||to_char(p_ship_date));
1681: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_atf_date = ' ||to_char(p_atf_date));
1674: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_organization_id = ' ||to_char(p_organization_id));
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1679: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stolen_demand_class = ' ||p_stolen_demand_class);
1680: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_ship_date = ' ||to_char(p_ship_date));
1681: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_atf_date = ' ||to_char(p_atf_date));
1682: END IF;
1675: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_instance_id = ' ||to_char(p_sr_instance_id));
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1679: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stolen_demand_class = ' ||p_stolen_demand_class);
1680: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_ship_date = ' ||to_char(p_ship_date));
1681: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_atf_date = ' ||to_char(p_atf_date));
1682: END IF;
1683:
1676: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_mem_stealing_quantity ='||to_char(p_mem_stealing_quantity));
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1679: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stolen_demand_class = ' ||p_stolen_demand_class);
1680: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_ship_date = ' ||to_char(p_ship_date));
1681: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_atf_date = ' ||to_char(p_atf_date));
1682: END IF;
1683:
1684: -- Initializing API return code
1677: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_pf_stealing_quantity ='||to_char(p_pf_stealing_quantity));
1678: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stealing_demand_class = '||p_stealing_demand_class);
1679: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_stolen_demand_class = ' ||p_stolen_demand_class);
1680: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_ship_date = ' ||to_char(p_ship_date));
1681: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'p_atf_date = ' ||to_char(p_atf_date));
1682: END IF;
1683:
1684: -- Initializing API return code
1685: x_return_status := FND_API.G_RET_STS_SUCCESS;
1695: --SELECT msc_supplies_s.nextval into p_transaction_id from dual;
1696:
1697: IF p_mem_stealing_quantity > 0 THEN
1698: IF PG_DEBUG in ('Y', 'C') THEN
1699: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'before insert into msc_alloc_supplies-Stealing Info');
1700: END IF;
1701:
1702: -- Add Member item
1703: INSERT INTO MSC_ALLOC_SUPPLIES
1723: l_rows_proc := SQL%ROWCOUNT;
1724:
1725: -- Next add the Stolen Data.
1726: IF PG_DEBUG in ('Y', 'C') THEN
1727: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'before insert into msc_alloc_supplies-Stolen Info');
1728: END IF;
1729:
1730: INSERT INTO MSC_ALLOC_SUPPLIES
1731: (plan_id, inventory_item_id, organization_id, sr_instance_id,
1748: END IF;
1749:
1750: IF (l_pf_stealing_rec_date is not null) and (p_pf_stealing_quantity > 0) THEN
1751: IF PG_DEBUG in ('Y', 'C') THEN
1752: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'before insert into msc_alloc_supplies-Stealing Info');
1753: END IF;
1754:
1755: IF p_transaction_id is not null THEN --bug3555084
1756:
1797: END IF;
1798: --bug3555084 end
1799: -- Next add the Stolen Data.
1800: IF PG_DEBUG in ('Y', 'C') THEN
1801: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'before insert into msc_alloc_supplies-Stolen Info');
1802: END IF;
1803:
1804: INSERT INTO MSC_ALLOC_SUPPLIES
1805: (plan_id, inventory_item_id, organization_id, sr_instance_id,
1821: l_rows_proc := l_rows_proc + SQL%ROWCOUNT;
1822: END IF;
1823:
1824: IF PG_DEBUG in ('Y', 'C') THEN
1825: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'Total Rows inserted ' || l_rows_proc);
1826: END IF;
1827:
1828: EXCEPTION
1829: WHEN OTHERS THEN
1827:
1828: EXCEPTION
1829: WHEN OTHERS THEN
1830: IF PG_DEBUG in ('Y', 'C') THEN
1831: msc_sch_wb.atp_debug('Add_PF_Stealing_Supply_Details: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1832: END IF;
1833: x_return_status := FND_API.G_RET_STS_ERROR;
1834:
1835: END Add_PF_Stealing_Supply_Details;
1865: l_return_status VARCHAR2(1);
1866:
1867: BEGIN
1868: IF PG_DEBUG in ('Y', 'C') THEN
1869: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf');
1870: END IF;
1871:
1872: -- Initializing API return code
1873: x_return_status := FND_API.G_RET_STS_SUCCESS;
1890: l_return_status
1891: );
1892: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1893: IF PG_DEBUG in ('Y', 'C') THEN
1894: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf: ' || 'Error occured in procedure Get_Mat_Avail_Pf_Ods_Summ');
1895: END IF;
1896: x_return_status := FND_API.G_RET_STS_ERROR;
1897: return;
1898: END IF;
1915: l_return_status
1916: );
1917: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1918: IF PG_DEBUG in ('Y', 'C') THEN
1919: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf: ' || 'Error occured in procedure Get_Mat_Avail_Pf_Ods');
1920: END IF;
1921: x_return_status := FND_API.G_RET_STS_ERROR;
1922: return;
1923: END IF;
1938: l_return_status
1939: );
1940: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1941: IF PG_DEBUG in ('Y', 'C') THEN
1942: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf: ' || 'Error occured in procedure Get_Mat_Avail_Pf_Pds_Summ');
1943: END IF;
1944: x_return_status := FND_API.G_RET_STS_ERROR;
1945: return;
1946: END IF;
1957: l_return_status
1958: );
1959: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1960: IF PG_DEBUG in ('Y', 'C') THEN
1961: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf: ' || 'Error occured in procedure Get_Mat_Avail_Pf_Pds');
1962: END IF;
1963: x_return_status := FND_API.G_RET_STS_ERROR;
1964: return;
1965: END IF;
1967: END IF; -- ODS/PDS
1968: EXCEPTION
1969: WHEN OTHERS THEN
1970: IF PG_DEBUG in ('Y', 'C') THEN
1971: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
1972: END IF;
1973: x_return_status := FND_API.G_RET_STS_ERROR;
1974:
1975: END Get_Mat_Avail_Pf;
2000: ) IS
2001: l_return_status VARCHAR2(1);
2002: BEGIN
2003: IF PG_DEBUG in ('Y', 'C') THEN
2004: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf_Dtls');
2005: END IF;
2006:
2007: -- Initializing API return code
2008: x_return_status := FND_API.G_RET_STS_SUCCESS;
2028: l_return_status
2029: );
2030: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2031: IF PG_DEBUG in ('Y', 'C') THEN
2032: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Dtls: ' || 'Error occured in procedure Get_Mat_Avail_Pf_Ods_Dtls');
2033: END IF;
2034: x_return_status := FND_API.G_RET_STS_ERROR;
2035: return;
2036: END IF;
2048: l_return_status
2049: );
2050: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2051: IF PG_DEBUG in ('Y', 'C') THEN
2052: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Dtls: ' || 'Error occured in procedure Get_Mat_Avail_Pf_Pds_Dtls');
2053: END IF;
2054: x_return_status := FND_API.G_RET_STS_ERROR;
2055: return;
2056: END IF;
2057: END IF; -- ODS/PDS
2058: EXCEPTION
2059: WHEN OTHERS THEN
2060: IF PG_DEBUG in ('Y', 'C') THEN
2061: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Dtls: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
2062: END IF;
2063: x_return_status := FND_API.G_RET_STS_ERROR;
2064:
2065: END Get_Mat_Avail_Pf_Dtls;
2082: ) IS
2083:
2084: BEGIN
2085: IF PG_DEBUG in ('Y', 'C') THEN
2086: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf_Ods_Summ');
2087: END IF;
2088:
2089: -- Initializing API return code
2090: x_return_status := FND_API.G_RET_STS_SUCCESS;
2151: order by SD_DATE; --4698199
2152: EXCEPTION
2153: WHEN OTHERS THEN
2154: IF PG_DEBUG in ('Y', 'C') THEN
2155: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Ods_Summ: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
2156: END IF;
2157: x_return_status := FND_API.G_RET_STS_ERROR;
2158:
2159: END Get_Mat_Avail_Pf_Ods_Summ;
2181: l_sysdate date := sysdate;
2182:
2183: BEGIN
2184: IF PG_DEBUG in ('Y', 'C') THEN
2185: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf_Ods');
2186: END IF;
2187:
2188: -- Initializing API return code
2189: x_return_status := FND_API.G_RET_STS_SUCCESS;
2415:
2416: EXCEPTION
2417: WHEN OTHERS THEN
2418: IF PG_DEBUG in ('Y', 'C') THEN
2419: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Ods: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
2420: END IF;
2421: x_return_status := FND_API.G_RET_STS_ERROR;
2422:
2423: END Get_Mat_Avail_Pf_Ods;
2447: ) IS
2448:
2449: BEGIN
2450: IF PG_DEBUG in ('Y', 'C') THEN
2451: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf_Pds_Summ');
2452: END IF;
2453:
2454: -- Initializing API return code
2455: x_return_status := FND_API.G_RET_STS_SUCCESS;
2521:
2522: EXCEPTION
2523: WHEN OTHERS THEN
2524: IF PG_DEBUG in ('Y', 'C') THEN
2525: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Pds_Summ: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
2526: END IF;
2527: x_return_status := FND_API.G_RET_STS_ERROR;
2528:
2529: END Get_Mat_Avail_Pf_Pds_Summ;
2551: ) IS
2552:
2553: BEGIN
2554: IF PG_DEBUG in ('Y', 'C') THEN
2555: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf_Pds');
2556: END IF;
2557:
2558: -- Initializing API return code
2559: x_return_status := FND_API.G_RET_STS_SUCCESS;
2605:
2606: EXCEPTION
2607: WHEN OTHERS THEN
2608: IF PG_DEBUG in ('Y', 'C') THEN
2609: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Pds: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
2610: END IF;
2611: x_return_status := FND_API.G_RET_STS_ERROR;
2612:
2613: END Get_Mat_Avail_Pf_Pds;
2639: l_sysdate DATE := sysdate;
2640:
2641: BEGIN
2642: IF PG_DEBUG in ('Y', 'C') THEN
2643: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf_Ods_Dtls');
2644: END IF;
2645:
2646: -- Initializing API return code
2647: x_return_status := FND_API.G_RET_STS_SUCCESS;
3050:
3051: EXCEPTION
3052: WHEN OTHERS THEN
3053: IF PG_DEBUG in ('Y', 'C') THEN
3054: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Ods_Dtls: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
3055: END IF;
3056: x_return_status := FND_API.G_RET_STS_ERROR;
3057:
3058: END Get_Mat_Avail_Pf_Ods_Dtls;
3090: l_sysdate DATE := sysdate;
3091:
3092: BEGIN
3093: IF PG_DEBUG in ('Y', 'C') THEN
3094: msc_sch_wb.atp_debug('Begin Get_Mat_Avail_Pf_Pds_Dtls');
3095: END IF;
3096:
3097: -- Initializing API return code
3098: x_return_status := FND_API.G_RET_STS_SUCCESS;
3292:
3293: EXCEPTION
3294: WHEN OTHERS THEN
3295: IF PG_DEBUG in ('Y', 'C') THEN
3296: msc_sch_wb.atp_debug('Get_Mat_Avail_Pf_Pds_Dtls: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
3297: END IF;
3298: x_return_status := FND_API.G_RET_STS_ERROR;
3299:
3300: END Get_Mat_Avail_Pf_Pds_Dtls;
3316: ) IS
3317: l_alloc_percent NUMBER;
3318: BEGIN
3319: IF PG_DEBUG in ('Y', 'C') THEN
3320: msc_sch_wb.atp_debug('******* Begin Set_Alloc_Rule_Variables **********');
3321: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_member_id: ' || p_member_id);
3322: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_family_id: ' || p_family_id);
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3317: l_alloc_percent NUMBER;
3318: BEGIN
3319: IF PG_DEBUG in ('Y', 'C') THEN
3320: msc_sch_wb.atp_debug('******* Begin Set_Alloc_Rule_Variables **********');
3321: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_member_id: ' || p_member_id);
3322: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_family_id: ' || p_family_id);
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3318: BEGIN
3319: IF PG_DEBUG in ('Y', 'C') THEN
3320: msc_sch_wb.atp_debug('******* Begin Set_Alloc_Rule_Variables **********');
3321: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_member_id: ' || p_member_id);
3322: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_family_id: ' || p_family_id);
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3326: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_atf_date: ' || p_atf_date);
3319: IF PG_DEBUG in ('Y', 'C') THEN
3320: msc_sch_wb.atp_debug('******* Begin Set_Alloc_Rule_Variables **********');
3321: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_member_id: ' || p_member_id);
3322: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_family_id: ' || p_family_id);
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3326: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_atf_date: ' || p_atf_date);
3327: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_ALLOCATION_METHOD: ' || MSC_ATP_PVT.G_ALLOCATION_METHOD);
3320: msc_sch_wb.atp_debug('******* Begin Set_Alloc_Rule_Variables **********');
3321: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_member_id: ' || p_member_id);
3322: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_family_id: ' || p_family_id);
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3326: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_atf_date: ' || p_atf_date);
3327: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_ALLOCATION_METHOD: ' || MSC_ATP_PVT.G_ALLOCATION_METHOD);
3328: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_HIERARCHY_PROFILE: ' || MSC_AATP_PVT.G_HIERARCHY_PROFILE);
3321: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_member_id: ' || p_member_id);
3322: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_family_id: ' || p_family_id);
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3326: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_atf_date: ' || p_atf_date);
3327: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_ALLOCATION_METHOD: ' || MSC_ATP_PVT.G_ALLOCATION_METHOD);
3328: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_HIERARCHY_PROFILE: ' || MSC_AATP_PVT.G_HIERARCHY_PROFILE);
3329: END IF;
3322: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_family_id: ' || p_family_id);
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3326: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_atf_date: ' || p_atf_date);
3327: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_ALLOCATION_METHOD: ' || MSC_ATP_PVT.G_ALLOCATION_METHOD);
3328: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_HIERARCHY_PROFILE: ' || MSC_AATP_PVT.G_HIERARCHY_PROFILE);
3329: END IF;
3330:
3323: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_instance_id: ' || p_instance_id);
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3326: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_atf_date: ' || p_atf_date);
3327: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_ALLOCATION_METHOD: ' || MSC_ATP_PVT.G_ALLOCATION_METHOD);
3328: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_HIERARCHY_PROFILE: ' || MSC_AATP_PVT.G_HIERARCHY_PROFILE);
3329: END IF;
3330:
3331: -- Initializing API return code
3324: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_org_id: ' || p_org_id);
3325: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_demand_class: ' || p_demand_class);
3326: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: p_atf_date: ' || p_atf_date);
3327: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_ALLOCATION_METHOD: ' || MSC_ATP_PVT.G_ALLOCATION_METHOD);
3328: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: G_HIERARCHY_PROFILE: ' || MSC_AATP_PVT.G_HIERARCHY_PROFILE);
3329: END IF;
3330:
3331: -- Initializing API return code
3332: x_return_status := FND_API.G_RET_STS_SUCCESS;
3351: ELSE use allocation rule from family within ATF
3352: - Always use allocation rule from family outside ATF
3353: */
3354: IF PG_DEBUG in ('Y', 'C') THEN
3355: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'Determine whether rule exist for member item within ATF');
3356: END IF;
3357:
3358: IF MSC_AATP_PVT.G_HIERARCHY_PROFILE = 1 THEN
3359: BEGIN
3374: END IF;
3375: EXCEPTION
3376: WHEN NO_DATA_FOUND THEN
3377: IF PG_DEBUG in ('Y', 'C') THEN
3378: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'Alloc Rule not found at member level');
3379: END IF;
3380: MSC_ATP_PVT.G_MEM_RULE_WITHIN_ATF := 'N';
3381: END;
3382: ELSE
3398: END IF;
3399: EXCEPTION
3400: WHEN NO_DATA_FOUND THEN
3401: IF PG_DEBUG in ('Y', 'C') THEN
3402: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'Alloc Rule not found for member within ATF');
3403: END IF;
3404: MSC_ATP_PVT.G_MEM_RULE_WITHIN_ATF := 'N';
3405: END;
3406: END IF;
3405: END;
3406: END IF;
3407:
3408: IF PG_DEBUG in ('Y', 'C') THEN
3409: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'Always use rule for family item outside ATF');
3410: END IF;
3411: MSC_ATP_PVT.G_PF_RULE_OUTSIDE_ATF := 'Y';
3412: END IF;
3413:
3411: MSC_ATP_PVT.G_PF_RULE_OUTSIDE_ATF := 'Y';
3412: END IF;
3413:
3414: IF PG_DEBUG in ('Y', 'C') THEN
3415: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'G_MEM_RULE_WITHIN_ATF = ' || MSC_ATP_PVT.G_MEM_RULE_WITHIN_ATF);
3416: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'G_PF_RULE_OUTSIDE_ATF = ' || MSC_ATP_PVT.G_PF_RULE_OUTSIDE_ATF);
3417: END IF;
3418:
3419: EXCEPTION
3412: END IF;
3413:
3414: IF PG_DEBUG in ('Y', 'C') THEN
3415: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'G_MEM_RULE_WITHIN_ATF = ' || MSC_ATP_PVT.G_MEM_RULE_WITHIN_ATF);
3416: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'G_PF_RULE_OUTSIDE_ATF = ' || MSC_ATP_PVT.G_PF_RULE_OUTSIDE_ATF);
3417: END IF;
3418:
3419: EXCEPTION
3420: WHEN OTHERS THEN
3418:
3419: EXCEPTION
3420: WHEN OTHERS THEN
3421: IF PG_DEBUG in ('Y', 'C') THEN
3422: msc_sch_wb.atp_debug('Set_Alloc_Rule_Variables: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
3423: END IF;
3424: x_return_status := FND_API.G_RET_STS_ERROR;
3425:
3426: END Set_Alloc_Rule_Variables;
3455: ) IS
3456:
3457: BEGIN
3458: IF PG_DEBUG in ('Y', 'C') THEN
3459: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf **********');
3460: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_member_id: ' || p_member_id);
3461: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_family_id: ' || p_family_id);
3462: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_instance_id: ' || p_instance_id);
3463: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_plan_id: ' || p_plan_id);
3456:
3457: BEGIN
3458: IF PG_DEBUG in ('Y', 'C') THEN
3459: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf **********');
3460: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_member_id: ' || p_member_id);
3461: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_family_id: ' || p_family_id);
3462: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_instance_id: ' || p_instance_id);
3463: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_plan_id: ' || p_plan_id);
3464: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_demand_class: ' || p_demand_class);
3457: BEGIN
3458: IF PG_DEBUG in ('Y', 'C') THEN
3459: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf **********');
3460: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_member_id: ' || p_member_id);
3461: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_family_id: ' || p_family_id);
3462: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_instance_id: ' || p_instance_id);
3463: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_plan_id: ' || p_plan_id);
3464: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_demand_class: ' || p_demand_class);
3465: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_level_id: ' || p_level_id);
3458: IF PG_DEBUG in ('Y', 'C') THEN
3459: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf **********');
3460: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_member_id: ' || p_member_id);
3461: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_family_id: ' || p_family_id);
3462: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_instance_id: ' || p_instance_id);
3463: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_plan_id: ' || p_plan_id);
3464: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_demand_class: ' || p_demand_class);
3465: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_level_id: ' || p_level_id);
3466: END IF;
3459: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf **********');
3460: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_member_id: ' || p_member_id);
3461: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_family_id: ' || p_family_id);
3462: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_instance_id: ' || p_instance_id);
3463: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_plan_id: ' || p_plan_id);
3464: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_demand_class: ' || p_demand_class);
3465: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_level_id: ' || p_level_id);
3466: END IF;
3467:
3460: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_member_id: ' || p_member_id);
3461: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_family_id: ' || p_family_id);
3462: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_instance_id: ' || p_instance_id);
3463: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_plan_id: ' || p_plan_id);
3464: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_demand_class: ' || p_demand_class);
3465: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_level_id: ' || p_level_id);
3466: END IF;
3467:
3468: -- Initializing API return code
3461: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_family_id: ' || p_family_id);
3462: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_instance_id: ' || p_instance_id);
3463: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_plan_id: ' || p_plan_id);
3464: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_demand_class: ' || p_demand_class);
3465: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: p_level_id: ' || p_level_id);
3466: END IF;
3467:
3468: -- Initializing API return code
3469: x_return_status := FND_API.G_RET_STS_SUCCESS;
3891: order by SD_DATE; --4698199
3892: EXCEPTION
3893: WHEN OTHERS THEN
3894: IF PG_DEBUG in ('Y', 'C') THEN
3895: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
3896: END IF;
3897: x_return_status := FND_API.G_RET_STS_ERROR;
3898:
3899: END Item_Alloc_Avail_Pf;
3922: ) IS
3923:
3924: BEGIN
3925: IF PG_DEBUG in ('Y', 'C') THEN
3926: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Unalloc **********');
3927: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_member_id: ' || p_member_id);
3928: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_family_id: ' || p_family_id);
3929: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_instance_id: ' || p_instance_id);
3930: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_plan_id: ' || p_plan_id);
3923:
3924: BEGIN
3925: IF PG_DEBUG in ('Y', 'C') THEN
3926: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Unalloc **********');
3927: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_member_id: ' || p_member_id);
3928: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_family_id: ' || p_family_id);
3929: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_instance_id: ' || p_instance_id);
3930: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_plan_id: ' || p_plan_id);
3931: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_demand_class: ' || p_demand_class);
3924: BEGIN
3925: IF PG_DEBUG in ('Y', 'C') THEN
3926: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Unalloc **********');
3927: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_member_id: ' || p_member_id);
3928: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_family_id: ' || p_family_id);
3929: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_instance_id: ' || p_instance_id);
3930: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_plan_id: ' || p_plan_id);
3931: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_demand_class: ' || p_demand_class);
3932: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_level_id: ' || p_level_id);
3925: IF PG_DEBUG in ('Y', 'C') THEN
3926: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Unalloc **********');
3927: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_member_id: ' || p_member_id);
3928: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_family_id: ' || p_family_id);
3929: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_instance_id: ' || p_instance_id);
3930: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_plan_id: ' || p_plan_id);
3931: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_demand_class: ' || p_demand_class);
3932: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_level_id: ' || p_level_id);
3933: END IF;
3926: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Unalloc **********');
3927: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_member_id: ' || p_member_id);
3928: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_family_id: ' || p_family_id);
3929: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_instance_id: ' || p_instance_id);
3930: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_plan_id: ' || p_plan_id);
3931: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_demand_class: ' || p_demand_class);
3932: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_level_id: ' || p_level_id);
3933: END IF;
3934:
3927: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_member_id: ' || p_member_id);
3928: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_family_id: ' || p_family_id);
3929: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_instance_id: ' || p_instance_id);
3930: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_plan_id: ' || p_plan_id);
3931: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_demand_class: ' || p_demand_class);
3932: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_level_id: ' || p_level_id);
3933: END IF;
3934:
3935: -- Initializing API return code
3928: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_family_id: ' || p_family_id);
3929: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_instance_id: ' || p_instance_id);
3930: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_plan_id: ' || p_plan_id);
3931: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_demand_class: ' || p_demand_class);
3932: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: p_level_id: ' || p_level_id);
3933: END IF;
3934:
3935: -- Initializing API return code
3936: x_return_status := FND_API.G_RET_STS_SUCCESS;
4362:
4363: EXCEPTION
4364: WHEN OTHERS THEN
4365: IF PG_DEBUG in ('Y', 'C') THEN
4366: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Unalloc: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
4367: END IF;
4368: x_return_status := FND_API.G_RET_STS_ERROR;
4369:
4370: END Item_Alloc_Avail_Pf_Unalloc;
4410: l_sysdate DATE := sysdate;
4411:
4412: BEGIN
4413: IF PG_DEBUG in ('Y', 'C') THEN
4414: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Dtls **********');
4415: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
4416: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4411:
4412: BEGIN
4413: IF PG_DEBUG in ('Y', 'C') THEN
4414: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Dtls **********');
4415: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
4416: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4412: BEGIN
4413: IF PG_DEBUG in ('Y', 'C') THEN
4414: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Dtls **********');
4415: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
4416: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4413: IF PG_DEBUG in ('Y', 'C') THEN
4414: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Dtls **********');
4415: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
4416: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4414: msc_sch_wb.atp_debug('******* Begin Item_Alloc_Avail_Pf_Dtls **********');
4415: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
4416: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4415: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
4416: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4423: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_identifier: ' || p_identifier);
4416: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4423: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_identifier: ' || p_identifier);
4424: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_scenario_id: ' || p_scenario_id);
4417: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_member_id: ' || p_sr_member_id);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4423: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_identifier: ' || p_identifier);
4424: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_scenario_id: ' || p_scenario_id);
4425: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_uom_code: ' || p_uom_code);
4418: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_sr_family_id: ' || p_sr_family_id);
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4423: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_identifier: ' || p_identifier);
4424: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_scenario_id: ' || p_scenario_id);
4425: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_uom_code: ' || p_uom_code);
4426: END IF;
4419: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4423: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_identifier: ' || p_identifier);
4424: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_scenario_id: ' || p_scenario_id);
4425: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_uom_code: ' || p_uom_code);
4426: END IF;
4427:
4420: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4423: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_identifier: ' || p_identifier);
4424: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_scenario_id: ' || p_scenario_id);
4425: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_uom_code: ' || p_uom_code);
4426: END IF;
4427:
4428: -- Initializing API return code
4421: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_demand_class: ' || p_demand_class);
4422: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_level_id: ' || p_level_id);
4423: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_identifier: ' || p_identifier);
4424: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_scenario_id: ' || p_scenario_id);
4425: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: p_uom_code: ' || p_uom_code);
4426: END IF;
4427:
4428: -- Initializing API return code
4429: x_return_status := FND_API.G_RET_STS_SUCCESS;
5336: ;
5337: EXCEPTION
5338: WHEN OTHERS THEN
5339: IF PG_DEBUG in ('Y', 'C') THEN
5340: msc_sch_wb.atp_debug('Item_Alloc_Avail_Pf_Dtls: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
5341: END IF;
5342: x_return_status := FND_API.G_RET_STS_ERROR;
5343:
5344: END Item_Alloc_Avail_Pf_Dtls;
5361: ) IS
5362:
5363: BEGIN
5364: IF PG_DEBUG in ('Y', 'C') THEN
5365: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf **********');
5366: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_member_id: ' || p_member_id);
5367: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_family_id: ' || p_family_id);
5368: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_instance_id: ' || p_instance_id);
5369: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_plan_id: ' || p_plan_id);
5362:
5363: BEGIN
5364: IF PG_DEBUG in ('Y', 'C') THEN
5365: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf **********');
5366: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_member_id: ' || p_member_id);
5367: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_family_id: ' || p_family_id);
5368: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_instance_id: ' || p_instance_id);
5369: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_plan_id: ' || p_plan_id);
5370: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf p_demand_class: ' || p_demand_class);
5363: BEGIN
5364: IF PG_DEBUG in ('Y', 'C') THEN
5365: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf **********');
5366: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_member_id: ' || p_member_id);
5367: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_family_id: ' || p_family_id);
5368: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_instance_id: ' || p_instance_id);
5369: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_plan_id: ' || p_plan_id);
5370: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf p_demand_class: ' || p_demand_class);
5371: END IF;
5364: IF PG_DEBUG in ('Y', 'C') THEN
5365: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf **********');
5366: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_member_id: ' || p_member_id);
5367: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_family_id: ' || p_family_id);
5368: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_instance_id: ' || p_instance_id);
5369: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_plan_id: ' || p_plan_id);
5370: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf p_demand_class: ' || p_demand_class);
5371: END IF;
5372:
5365: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf **********');
5366: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_member_id: ' || p_member_id);
5367: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_family_id: ' || p_family_id);
5368: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_instance_id: ' || p_instance_id);
5369: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_plan_id: ' || p_plan_id);
5370: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf p_demand_class: ' || p_demand_class);
5371: END IF;
5372:
5373: -- Initializing API return code
5366: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_member_id: ' || p_member_id);
5367: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_family_id: ' || p_family_id);
5368: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_instance_id: ' || p_instance_id);
5369: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: p_plan_id: ' || p_plan_id);
5370: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf p_demand_class: ' || p_demand_class);
5371: END IF;
5372:
5373: -- Initializing API return code
5374: x_return_status := FND_API.G_RET_STS_SUCCESS;
5411:
5412: EXCEPTION
5413: WHEN OTHERS THEN
5414: IF PG_DEBUG in ('Y', 'C') THEN
5415: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
5416: END IF;
5417: x_return_status := FND_API.G_RET_STS_ERROR;
5418:
5419: END Item_Prealloc_Avail_Pf;
5437: ) IS
5438:
5439: BEGIN
5440: IF PG_DEBUG in ('Y', 'C') THEN
5441: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Summ **********');
5442: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_member_id: ' || p_member_id);
5443: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_family_id: ' || p_family_id);
5444: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_instance_id: ' || p_instance_id);
5445: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_plan_id: ' || p_plan_id);
5438:
5439: BEGIN
5440: IF PG_DEBUG in ('Y', 'C') THEN
5441: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Summ **********');
5442: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_member_id: ' || p_member_id);
5443: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_family_id: ' || p_family_id);
5444: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_instance_id: ' || p_instance_id);
5445: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_plan_id: ' || p_plan_id);
5446: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ p_demand_class: ' || p_demand_class);
5439: BEGIN
5440: IF PG_DEBUG in ('Y', 'C') THEN
5441: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Summ **********');
5442: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_member_id: ' || p_member_id);
5443: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_family_id: ' || p_family_id);
5444: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_instance_id: ' || p_instance_id);
5445: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_plan_id: ' || p_plan_id);
5446: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ p_demand_class: ' || p_demand_class);
5447: END IF;
5440: IF PG_DEBUG in ('Y', 'C') THEN
5441: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Summ **********');
5442: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_member_id: ' || p_member_id);
5443: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_family_id: ' || p_family_id);
5444: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_instance_id: ' || p_instance_id);
5445: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_plan_id: ' || p_plan_id);
5446: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ p_demand_class: ' || p_demand_class);
5447: END IF;
5448:
5441: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Summ **********');
5442: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_member_id: ' || p_member_id);
5443: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_family_id: ' || p_family_id);
5444: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_instance_id: ' || p_instance_id);
5445: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_plan_id: ' || p_plan_id);
5446: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ p_demand_class: ' || p_demand_class);
5447: END IF;
5448:
5449: -- Initializing API return code
5442: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_member_id: ' || p_member_id);
5443: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_family_id: ' || p_family_id);
5444: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_instance_id: ' || p_instance_id);
5445: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: p_plan_id: ' || p_plan_id);
5446: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ p_demand_class: ' || p_demand_class);
5447: END IF;
5448:
5449: -- Initializing API return code
5450: x_return_status := FND_API.G_RET_STS_SUCCESS;
5514:
5515: EXCEPTION
5516: WHEN OTHERS THEN
5517: IF PG_DEBUG in ('Y', 'C') THEN
5518: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Summ: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
5519: END IF;
5520: x_return_status := FND_API.G_RET_STS_ERROR;
5521:
5522: END Item_Prealloc_Avail_Pf_Summ;
5548: l_null_date DATE; --bug3814584
5549: l_return_status VARCHAR2(1);
5550: BEGIN
5551: IF PG_DEBUG in ('Y', 'C') THEN
5552: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Dtls **********');
5553: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
5554: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
5555: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
5556: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
5549: l_return_status VARCHAR2(1);
5550: BEGIN
5551: IF PG_DEBUG in ('Y', 'C') THEN
5552: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Dtls **********');
5553: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
5554: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
5555: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
5556: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
5557: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls p_demand_class: ' || p_demand_class);
5550: BEGIN
5551: IF PG_DEBUG in ('Y', 'C') THEN
5552: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Dtls **********');
5553: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
5554: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
5555: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
5556: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
5557: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls p_demand_class: ' || p_demand_class);
5558: END IF;
5551: IF PG_DEBUG in ('Y', 'C') THEN
5552: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Dtls **********');
5553: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
5554: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
5555: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
5556: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
5557: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls p_demand_class: ' || p_demand_class);
5558: END IF;
5559:
5552: msc_sch_wb.atp_debug('******* Begin Item_Prealloc_Avail_Pf_Dtls **********');
5553: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
5554: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
5555: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
5556: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
5557: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls p_demand_class: ' || p_demand_class);
5558: END IF;
5559:
5560: -- Initializing API return code
5553: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_member_id: ' || p_member_id);
5554: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_family_id: ' || p_family_id);
5555: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_instance_id: ' || p_instance_id);
5556: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: p_plan_id: ' || p_plan_id);
5557: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls p_demand_class: ' || p_demand_class);
5558: END IF;
5559:
5560: -- Initializing API return code
5561: x_return_status := FND_API.G_RET_STS_SUCCESS;
5765: );
5766:
5767: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5768: IF PG_DEBUG in ('Y', 'C') THEN
5769: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: ' || 'Error occured in procedure Populate_Original_Demand_Qty');
5770: END IF;
5771: x_return_status := FND_API.G_RET_STS_ERROR;
5772: return;
5773: END IF;
5774:
5775: EXCEPTION
5776: WHEN OTHERS THEN
5777: IF PG_DEBUG in ('Y', 'C') THEN
5778: msc_sch_wb.atp_debug('Item_Prealloc_Avail_Pf_Dtls: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
5779: END IF;
5780: x_return_status := FND_API.G_RET_STS_ERROR;
5781:
5782: END Item_Prealloc_Avail_Pf_Dtls;
5799: ) IS
5800:
5801: BEGIN
5802: IF PG_DEBUG in ('Y', 'C') THEN
5803: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf **********');
5804: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_member_id: ' || p_member_id);
5805: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_family_id: ' || p_family_id);
5806: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_instance_id: ' || p_instance_id);
5807: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_plan_id: ' || p_plan_id);
5800:
5801: BEGIN
5802: IF PG_DEBUG in ('Y', 'C') THEN
5803: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf **********');
5804: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_member_id: ' || p_member_id);
5805: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_family_id: ' || p_family_id);
5806: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_instance_id: ' || p_instance_id);
5807: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_plan_id: ' || p_plan_id);
5808: END IF;
5801: BEGIN
5802: IF PG_DEBUG in ('Y', 'C') THEN
5803: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf **********');
5804: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_member_id: ' || p_member_id);
5805: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_family_id: ' || p_family_id);
5806: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_instance_id: ' || p_instance_id);
5807: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_plan_id: ' || p_plan_id);
5808: END IF;
5809:
5802: IF PG_DEBUG in ('Y', 'C') THEN
5803: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf **********');
5804: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_member_id: ' || p_member_id);
5805: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_family_id: ' || p_family_id);
5806: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_instance_id: ' || p_instance_id);
5807: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_plan_id: ' || p_plan_id);
5808: END IF;
5809:
5810: -- Initializing API return code
5803: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf **********');
5804: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_member_id: ' || p_member_id);
5805: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_family_id: ' || p_family_id);
5806: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_instance_id: ' || p_instance_id);
5807: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: p_plan_id: ' || p_plan_id);
5808: END IF;
5809:
5810: -- Initializing API return code
5811: x_return_status := FND_API.G_RET_STS_SUCCESS;
5864:
5865: EXCEPTION
5866: WHEN OTHERS THEN
5867: IF PG_DEBUG in ('Y', 'C') THEN
5868: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
5869: END IF;
5870: x_return_status := FND_API.G_RET_STS_ERROR;
5871:
5872: END Get_Forward_Mat_Pf;
5890: ) IS
5891:
5892: BEGIN
5893: IF PG_DEBUG in ('Y', 'C') THEN
5894: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf_Summ **********');
5895: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_member_id: ' || p_member_id);
5896: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_family_id: ' || p_family_id);
5897: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_instance_id: ' || p_instance_id);
5898: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_plan_id: ' || p_plan_id);
5891:
5892: BEGIN
5893: IF PG_DEBUG in ('Y', 'C') THEN
5894: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf_Summ **********');
5895: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_member_id: ' || p_member_id);
5896: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_family_id: ' || p_family_id);
5897: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_instance_id: ' || p_instance_id);
5898: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_plan_id: ' || p_plan_id);
5899: END IF;
5892: BEGIN
5893: IF PG_DEBUG in ('Y', 'C') THEN
5894: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf_Summ **********');
5895: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_member_id: ' || p_member_id);
5896: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_family_id: ' || p_family_id);
5897: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_instance_id: ' || p_instance_id);
5898: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_plan_id: ' || p_plan_id);
5899: END IF;
5900:
5893: IF PG_DEBUG in ('Y', 'C') THEN
5894: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf_Summ **********');
5895: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_member_id: ' || p_member_id);
5896: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_family_id: ' || p_family_id);
5897: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_instance_id: ' || p_instance_id);
5898: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_plan_id: ' || p_plan_id);
5899: END IF;
5900:
5901: -- Initializing API return code
5894: msc_sch_wb.atp_debug('******* Begin Get_Forward_Mat_Pf_Summ **********');
5895: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_member_id: ' || p_member_id);
5896: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_family_id: ' || p_family_id);
5897: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_instance_id: ' || p_instance_id);
5898: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: p_plan_id: ' || p_plan_id);
5899: END IF;
5900:
5901: -- Initializing API return code
5902: x_return_status := FND_API.G_RET_STS_SUCCESS;
5975:
5976: EXCEPTION
5977: WHEN OTHERS THEN
5978: IF PG_DEBUG in ('Y', 'C') THEN
5979: msc_sch_wb.atp_debug('Get_Forward_Mat_Pf_Summ: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
5980: END IF;
5981: x_return_status := FND_API.G_RET_STS_ERROR;
5982:
5983: END Get_Forward_Mat_Pf_Summ;
6013: l_return_status VARCHAR2(1);
6014: BEGIN
6015:
6016: IF PG_DEBUG in ('Y', 'C') THEN
6017: msc_sch_wb.atp_debug('******* Begin Insert_SD_Into_Details_Temp **********');
6018: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_type: ' || p_type);
6019: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_member_id: ' || p_member_id);
6020: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_family_id: ' || p_family_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6014: BEGIN
6015:
6016: IF PG_DEBUG in ('Y', 'C') THEN
6017: msc_sch_wb.atp_debug('******* Begin Insert_SD_Into_Details_Temp **********');
6018: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_type: ' || p_type);
6019: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_member_id: ' || p_member_id);
6020: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_family_id: ' || p_family_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6015:
6016: IF PG_DEBUG in ('Y', 'C') THEN
6017: msc_sch_wb.atp_debug('******* Begin Insert_SD_Into_Details_Temp **********');
6018: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_type: ' || p_type);
6019: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_member_id: ' || p_member_id);
6020: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_family_id: ' || p_family_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6016: IF PG_DEBUG in ('Y', 'C') THEN
6017: msc_sch_wb.atp_debug('******* Begin Insert_SD_Into_Details_Temp **********');
6018: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_type: ' || p_type);
6019: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_member_id: ' || p_member_id);
6020: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_family_id: ' || p_family_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6024: --bug3671294
6017: msc_sch_wb.atp_debug('******* Begin Insert_SD_Into_Details_Temp **********');
6018: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_type: ' || p_type);
6019: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_member_id: ' || p_member_id);
6020: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_family_id: ' || p_family_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6024: --bug3671294
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6018: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_type: ' || p_type);
6019: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_member_id: ' || p_member_id);
6020: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_family_id: ' || p_family_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6024: --bug3671294
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6019: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_member_id: ' || p_member_id);
6020: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_family_id: ' || p_family_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6024: --bug3671294
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6021: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_member_id: ' || p_sr_member_id);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6024: --bug3671294
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6022: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_sr_family_id: ' || p_sr_family_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6024: --bug3671294
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6023: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_id: ' || p_org_id);
6024: --bug3671294
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6024: --bug3671294
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6032: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_record_type: ' || p_record_type);
6025: --msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_inv_item_name: ' || p_inv_item_name);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6032: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_record_type: ' || p_record_type);
6033: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_scenario_id: ' || p_scenario_id);
6026: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_org_code: ' || p_org_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6032: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_record_type: ' || p_record_type);
6033: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_scenario_id: ' || p_scenario_id);
6034: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_uom_code: ' || p_uom_code);
6027: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_instance_id: ' || p_instance_id);
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6032: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_record_type: ' || p_record_type);
6033: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_scenario_id: ' || p_scenario_id);
6034: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_uom_code: ' || p_uom_code);
6035: END IF;
6028: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_plan_id: ' || p_plan_id);
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6032: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_record_type: ' || p_record_type);
6033: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_scenario_id: ' || p_scenario_id);
6034: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_uom_code: ' || p_uom_code);
6035: END IF;
6036:
6029: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_itf: ' || p_itf);
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6032: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_record_type: ' || p_record_type);
6033: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_scenario_id: ' || p_scenario_id);
6034: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_uom_code: ' || p_uom_code);
6035: END IF;
6036:
6037: -- initialize API return status to success
6030: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_level_id: ' || p_level_id);
6031: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_session_id: ' || p_session_id);
6032: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_record_type: ' || p_record_type);
6033: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_scenario_id: ' || p_scenario_id);
6034: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: p_uom_code: ' || p_uom_code);
6035: END IF;
6036:
6037: -- initialize API return status to success
6038: x_return_status := FND_API.G_RET_STS_SUCCESS;
7296:
7297: EXCEPTION
7298: WHEN OTHERS THEN
7299: IF PG_DEBUG in ('Y', 'C') THEN
7300: msc_sch_wb.atp_debug('Insert_SD_Into_Details_Temp: ' || 'Error code:' || to_char(sqlcode));
7301: END IF;
7302: x_return_status := FND_API.G_RET_STS_ERROR;
7303:
7304: END Insert_SD_Into_Details_Temp;
7318: -- local variables
7319: BEGIN
7320:
7321: IF PG_DEBUG in ('Y', 'C') THEN
7322: msc_sch_wb.atp_debug('********** Begin Populate_Original_Demand_Qty Procedure **********');
7323: msc_sch_wb.atp_debug('Populate_Original_Demand_Qty: ' || 'p_table: '|| to_char(p_table));
7324: msc_sch_wb.atp_debug('Populate_Original_Demand_Qty: ' || 'p_session_id: '|| to_char(p_session_id));
7325: END IF;
7326:
7319: BEGIN
7320:
7321: IF PG_DEBUG in ('Y', 'C') THEN
7322: msc_sch_wb.atp_debug('********** Begin Populate_Original_Demand_Qty Procedure **********');
7323: msc_sch_wb.atp_debug('Populate_Original_Demand_Qty: ' || 'p_table: '|| to_char(p_table));
7324: msc_sch_wb.atp_debug('Populate_Original_Demand_Qty: ' || 'p_session_id: '|| to_char(p_session_id));
7325: END IF;
7326:
7327: -- Initializing API return code
7320:
7321: IF PG_DEBUG in ('Y', 'C') THEN
7322: msc_sch_wb.atp_debug('********** Begin Populate_Original_Demand_Qty Procedure **********');
7323: msc_sch_wb.atp_debug('Populate_Original_Demand_Qty: ' || 'p_table: '|| to_char(p_table));
7324: msc_sch_wb.atp_debug('Populate_Original_Demand_Qty: ' || 'p_session_id: '|| to_char(p_session_id));
7325: END IF;
7326:
7327: -- Initializing API return code
7328: x_return_status := FND_API.G_RET_STS_SUCCESS;
7395:
7396: END IF;
7397:
7398: IF PG_DEBUG in ('Y', 'C') THEN
7399: msc_sch_wb.atp_debug('**********End Populate_Original_Demand_Qty Procedure************');
7400: END IF;
7401:
7402: EXCEPTION
7403: WHEN OTHERS THEN
7401:
7402: EXCEPTION
7403: WHEN OTHERS THEN
7404: IF PG_DEBUG in ('Y', 'C') THEN
7405: msc_sch_wb.atp_debug('Populate_Original_Demand_Qty: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
7406: END IF;
7407: x_return_status := FND_API.G_RET_STS_ERROR;
7408:
7409: END Populate_Original_Demand_Qty;
7441:
7442: BEGIN
7443:
7444: IF PG_DEBUG in ('Y', 'C') THEN
7445: msc_sch_wb.atp_debug('********** Begin PF_Atp_Consume Procedure **********');
7446: msc_sch_wb.atp_debug('PF_Atp_Consume: ' || 'p_consumption_type: '|| to_char(p_consumption_type));
7447: msc_sch_wb.atp_debug('PF_Atp_Consume: ' || 'p_atf_date: '|| to_char(p_atf_date));
7448: END IF;
7449:
7442: BEGIN
7443:
7444: IF PG_DEBUG in ('Y', 'C') THEN
7445: msc_sch_wb.atp_debug('********** Begin PF_Atp_Consume Procedure **********');
7446: msc_sch_wb.atp_debug('PF_Atp_Consume: ' || 'p_consumption_type: '|| to_char(p_consumption_type));
7447: msc_sch_wb.atp_debug('PF_Atp_Consume: ' || 'p_atf_date: '|| to_char(p_atf_date));
7448: END IF;
7449:
7450: -- Initializing API return code
7443:
7444: IF PG_DEBUG in ('Y', 'C') THEN
7445: msc_sch_wb.atp_debug('********** Begin PF_Atp_Consume Procedure **********');
7446: msc_sch_wb.atp_debug('PF_Atp_Consume: ' || 'p_consumption_type: '|| to_char(p_consumption_type));
7447: msc_sch_wb.atp_debug('PF_Atp_Consume: ' || 'p_atf_date: '|| to_char(p_atf_date));
7448: END IF;
7449:
7450: -- Initializing API return code
7451: x_return_status := FND_API.G_RET_STS_SUCCESS;
7592: END LOOP;
7593: END IF;
7594:
7595: IF PG_DEBUG in ('Y', 'C') THEN
7596: msc_sch_wb.atp_debug('**********End PF_Atp_Consume Procedure************');
7597: END IF;
7598:
7599: EXCEPTION
7600: WHEN OTHERS THEN
7598:
7599: EXCEPTION
7600: WHEN OTHERS THEN
7601: IF PG_DEBUG in ('Y', 'C') THEN
7602: msc_sch_wb.atp_debug('PF_Atp_Consume: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
7603: END IF;
7604: x_return_status := FND_API.G_RET_STS_ERROR;
7605:
7606: END PF_Atp_Consume;
7630:
7631:
7632: BEGIN
7633: IF PG_DEBUG in ('Y', 'C') THEN
7634: msc_sch_wb.atp_debug('**********Begin PF_Atp_Alloc_Consume Procedure************');
7635: END IF;
7636:
7637: -- Initializing API return code
7638: x_return_status := FND_API.G_RET_STS_SUCCESS;
7645: x_dc_start_index.EXTEND;
7646: x_dc_end_index.EXTEND;
7647:
7648: IF PG_DEBUG in ('Y', 'C') THEN
7649: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'after extend : ' || p_atp_dc_tab(p_atp_dc_tab.FIRST));
7650: END IF;
7651:
7652: x_dc_list_tab(1) := p_atp_dc_tab(p_atp_dc_tab.FIRST);
7653: x_dc_start_index(1) := 1;
7651:
7652: x_dc_list_tab(1) := p_atp_dc_tab(p_atp_dc_tab.FIRST);
7653: x_dc_start_index(1) := 1;
7654: IF PG_DEBUG in ('Y', 'C') THEN
7655: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'after assign : ' || x_dc_list_tab(1));
7656: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'start index : ' || x_dc_start_index(1));
7657: END IF;
7658:
7659: FOR i in 1..p_atp_dc_tab.COUNT LOOP
7652: x_dc_list_tab(1) := p_atp_dc_tab(p_atp_dc_tab.FIRST);
7653: x_dc_start_index(1) := 1;
7654: IF PG_DEBUG in ('Y', 'C') THEN
7655: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'after assign : ' || x_dc_list_tab(1));
7656: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'start index : ' || x_dc_start_index(1));
7657: END IF;
7658:
7659: FOR i in 1..p_atp_dc_tab.COUNT LOOP
7660: IF PG_DEBUG in ('Y', 'C') THEN
7657: END IF;
7658:
7659: FOR i in 1..p_atp_dc_tab.COUNT LOOP
7660: IF PG_DEBUG in ('Y', 'C') THEN
7661: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'index : ' || i);
7662: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'x_dc_list_tab : ' || x_dc_list_tab(x_dc_list_tab.COUNT));
7663: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'p_atp_dc_tab : ' || p_atp_dc_tab(i));
7664: END IF;
7665:
7658:
7659: FOR i in 1..p_atp_dc_tab.COUNT LOOP
7660: IF PG_DEBUG in ('Y', 'C') THEN
7661: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'index : ' || i);
7662: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'x_dc_list_tab : ' || x_dc_list_tab(x_dc_list_tab.COUNT));
7663: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'p_atp_dc_tab : ' || p_atp_dc_tab(i));
7664: END IF;
7665:
7666: -- If demand class changes, re-initialize these variables.
7659: FOR i in 1..p_atp_dc_tab.COUNT LOOP
7660: IF PG_DEBUG in ('Y', 'C') THEN
7661: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'index : ' || i);
7662: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'x_dc_list_tab : ' || x_dc_list_tab(x_dc_list_tab.COUNT));
7663: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'p_atp_dc_tab : ' || p_atp_dc_tab(i));
7664: END IF;
7665:
7666: -- If demand class changes, re-initialize these variables.
7667: IF p_atp_dc_tab(i) <> x_dc_list_tab(x_dc_list_tab.COUNT) THEN
7666: -- If demand class changes, re-initialize these variables.
7667: IF p_atp_dc_tab(i) <> x_dc_list_tab(x_dc_list_tab.COUNT) THEN
7668: x_dc_end_index(x_dc_end_index.COUNT) := i - 1;
7669: IF PG_DEBUG in ('Y', 'C') THEN
7670: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'inside IF');
7671: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'end index : ' || x_dc_end_index(x_dc_end_index.COUNT));
7672: END IF;
7673: x_dc_list_tab.EXTEND;
7674: x_dc_start_index.EXTEND;
7667: IF p_atp_dc_tab(i) <> x_dc_list_tab(x_dc_list_tab.COUNT) THEN
7668: x_dc_end_index(x_dc_end_index.COUNT) := i - 1;
7669: IF PG_DEBUG in ('Y', 'C') THEN
7670: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'inside IF');
7671: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'end index : ' || x_dc_end_index(x_dc_end_index.COUNT));
7672: END IF;
7673: x_dc_list_tab.EXTEND;
7674: x_dc_start_index.EXTEND;
7675: x_dc_end_index.EXTEND;
7679: x_dc_end_index(x_dc_end_index.COUNT) := i;
7680: END IF;
7681:
7682: IF PG_DEBUG in ('Y', 'C') THEN
7683: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'start index : ' || x_dc_start_index(x_dc_start_index.COUNT));
7684: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'end index : ' || x_dc_end_index(x_dc_end_index.COUNT));
7685: END IF;
7686: -- Do backward consumption only when neg bucket and current index
7687: -- greater l_fw_nullifying_bucket_index.
7680: END IF;
7681:
7682: IF PG_DEBUG in ('Y', 'C') THEN
7683: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'start index : ' || x_dc_start_index(x_dc_start_index.COUNT));
7684: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'end index : ' || x_dc_end_index(x_dc_end_index.COUNT));
7685: END IF;
7686: -- Do backward consumption only when neg bucket and current index
7687: -- greater l_fw_nullifying_bucket_index.
7688: IF (p_atp_qty(i) < 0 AND i > l_fw_nullifying_bucket_index) THEN
7710: END LOOP;
7711: END IF;
7712:
7713: IF PG_DEBUG in ('Y', 'C') THEN
7714: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'before forward consumption');
7715: END IF;
7716:
7717: -- forward consumption when neg atp quantity occurs
7718: IF (p_atp_qty(i) < 0 ) THEN
7717: -- forward consumption when neg atp quantity occurs
7718: IF (p_atp_qty(i) < 0 ) THEN
7719: j := i + 1;
7720: IF PG_DEBUG in ('Y', 'C') THEN
7721: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'in forward consumption : ' || i || ':' || j);
7722: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'in forward : ' || p_atp_dc_tab.COUNT);
7723: END IF;
7724:
7725: IF j < p_atp_dc_tab.COUNT THEN
7718: IF (p_atp_qty(i) < 0 ) THEN
7719: j := i + 1;
7720: IF PG_DEBUG in ('Y', 'C') THEN
7721: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'in forward consumption : ' || i || ':' || j);
7722: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'in forward : ' || p_atp_dc_tab.COUNT);
7723: END IF;
7724:
7725: IF j < p_atp_dc_tab.COUNT THEN
7726: IF PG_DEBUG in ('Y', 'C') THEN
7723: END IF;
7724:
7725: IF j < p_atp_dc_tab.COUNT THEN
7726: IF PG_DEBUG in ('Y', 'C') THEN
7727: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'in j : ' || p_atp_dc_tab.COUNT);
7728: END IF;
7729: WHILE (p_atp_dc_tab(j) = x_dc_list_tab(x_dc_list_tab.COUNT)) LOOP
7730: IF ((p_atp_period(i) <= p_atf_date) and (p_atp_period(j) > p_atf_date)) THEN
7731: -- exit loop when crossing time fence
7759: x_dc_end_index(x_dc_end_index.count) := p_atp_dc_tab.count;
7760:
7761: IF PG_DEBUG in ('Y', 'C') THEN
7762: FOR i in 1..x_dc_list_tab.COUNT LOOP
7763: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'DC:start:end - ' || x_dc_list_tab(i) || ':' ||
7764: x_dc_start_index(i) || ':' ||
7765: x_dc_end_index(i));
7766: END LOOP;
7767:
7764: x_dc_start_index(i) || ':' ||
7765: x_dc_end_index(i));
7766: END LOOP;
7767:
7768: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'x_dc_list_tab : ' || x_dc_list_tab.COUNT);
7769: END IF;
7770:
7771: -- this for loop will do atp consume on each dc
7772: FOR j in 1..x_dc_list_tab.COUNT LOOP
7775: p_atp_qty(x_dc_start_index(j)) := 0;
7776: END IF;
7777: FOR i in (x_dc_start_index(j) + 1)..x_dc_end_index(j) LOOP
7778: IF PG_DEBUG in ('Y', 'C') THEN
7779: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'inside accumulation : ' || i);
7780: END IF;
7781: --Bug 3919388 (Cum is decreasing)
7782: p_atp_qty(i) := GREATEST(p_atp_qty(i), 0) + GREATEST(p_atp_qty(i-1),0);
7783: END LOOP;
7783: END LOOP;
7784: END LOOP; --FOR i in 1..x_dc_list_tab.COUNT LOOP
7785:
7786: IF PG_DEBUG in ('Y', 'C') THEN
7787: msc_sch_wb.atp_debug('**********End PF_Atp_Alloc_Consume Procedure************');
7788: END IF;
7789:
7790: EXCEPTION
7791: WHEN OTHERS THEN
7789:
7790: EXCEPTION
7791: WHEN OTHERS THEN
7792: IF PG_DEBUG in ('Y', 'C') THEN
7793: msc_sch_wb.atp_debug('PF_Atp_Alloc_Consume: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
7794: END IF;
7795: x_return_status := FND_API.G_RET_STS_ERROR;
7796:
7797: END PF_Atp_Alloc_Consume;
7815:
7816: BEGIN
7817:
7818: IF PG_DEBUG in ('Y', 'C') THEN
7819: msc_sch_wb.atp_debug('PROCEDURE Get_Period_Data_From_Sd_Temp');
7820: END IF;
7821:
7822: -- Initializing API return code
7823: x_return_status := FND_API.G_RET_STS_SUCCESS;
7946:
7947: EXCEPTION
7948: WHEN OTHERS THEN
7949: IF PG_DEBUG in ('Y', 'C') THEN
7950: msc_sch_wb.atp_debug('Get_Period_Data_From_Sd_Temp: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
7951: END IF;
7952: x_return_status := FND_API.G_RET_STS_ERROR;
7953:
7954: END Get_Period_Data_From_Sd_Temp;
7969:
7970: BEGIN
7971:
7972: IF PG_DEBUG in ('Y', 'C') THEN
7973: msc_sch_wb.atp_debug('PROCEDURE Get_Unalloc_Data_From_Sd_Temp');
7974: END IF;
7975:
7976: -- initialize API return status to success
7977: x_return_status := FND_API.G_RET_STS_SUCCESS;
8106:
8107: EXCEPTION
8108: WHEN OTHERS THEN
8109: IF PG_DEBUG in ('Y', 'C') THEN
8110: msc_sch_wb.atp_debug('Get_Unalloc_Data_From_Sd_Temp: ' || 'Error code:' || to_char(sqlcode));
8111: END IF;
8112: x_return_status := FND_API.G_RET_STS_ERROR;
8113:
8114: END Get_Unalloc_Data_From_Sd_Temp;
8132:
8133: BEGIN
8134:
8135: IF PG_DEBUG in ('Y', 'C') THEN
8136: msc_sch_wb.atp_debug('PROCEDURE Get_Period_From_Details_Temp');
8137: END IF;
8138:
8139: -- initialize API return status to success
8140: x_return_status := FND_API.G_RET_STS_SUCCESS;
8481:
8482: EXCEPTION
8483: WHEN OTHERS THEN
8484: IF PG_DEBUG in ('Y', 'C') THEN
8485: msc_sch_wb.atp_debug('Get_Period_From_Details_Temp: ' || 'Error code:' || to_char(sqlcode));
8486: END IF;
8487: x_return_status := FND_API.G_RET_STS_ERROR;
8488:
8489: END Get_Period_From_Details_Temp;
8504: l_pf_atp_item_id NUMBER;
8505:
8506: BEGIN
8507: IF PG_DEBUG in ('Y', 'C') THEN
8508: msc_sch_wb.atp_debug('*********Begin function Get_Pf_Atp_Item_Id ********');
8509: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8510: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8511: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8512: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8505:
8506: BEGIN
8507: IF PG_DEBUG in ('Y', 'C') THEN
8508: msc_sch_wb.atp_debug('*********Begin function Get_Pf_Atp_Item_Id ********');
8509: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8510: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8511: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8512: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8513: END IF;
8506: BEGIN
8507: IF PG_DEBUG in ('Y', 'C') THEN
8508: msc_sch_wb.atp_debug('*********Begin function Get_Pf_Atp_Item_Id ********');
8509: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8510: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8511: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8512: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8513: END IF;
8514:
8507: IF PG_DEBUG in ('Y', 'C') THEN
8508: msc_sch_wb.atp_debug('*********Begin function Get_Pf_Atp_Item_Id ********');
8509: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8510: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8511: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8512: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8513: END IF;
8514:
8515: SELECT DECODE(i2.bom_item_type,
8508: msc_sch_wb.atp_debug('*********Begin function Get_Pf_Atp_Item_Id ********');
8509: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8510: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8511: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8512: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8513: END IF;
8514:
8515: SELECT DECODE(i2.bom_item_type,
8516: 5, DECODE(i2.atp_flag,
8533: AND i2.sr_instance_id = i1.sr_instance_id
8534: AND i2.plan_id = i1.plan_id;
8535:
8536: IF PG_DEBUG in ('Y', 'C') THEN
8537: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'PF Item Id = ' ||to_char(l_pf_atp_item_id));
8538: msc_sch_wb.atp_debug('*********End function Get_Pf_Atp_Item_Id ********');
8539: END IF;
8540:
8541: return l_pf_atp_item_id;
8534: AND i2.plan_id = i1.plan_id;
8535:
8536: IF PG_DEBUG in ('Y', 'C') THEN
8537: msc_sch_wb.atp_debug('Get_Pf_Atp_Item_Id: ' || 'PF Item Id = ' ||to_char(l_pf_atp_item_id));
8538: msc_sch_wb.atp_debug('*********End function Get_Pf_Atp_Item_Id ********');
8539: END IF;
8540:
8541: return l_pf_atp_item_id;
8542:
8560: l_atf_date DATE;
8561:
8562: BEGIN
8563: IF PG_DEBUG in ('Y', 'C') THEN
8564: msc_sch_wb.atp_debug('Begin Get_Atf_Date');
8565: msc_sch_wb.atp_debug('Get_Atf_Date : p_instance_id = ' || p_instance_id);
8566: msc_sch_wb.atp_debug('Get_Atf_Date : p_inventory_item_id = ' || p_inventory_item_id);
8567: msc_sch_wb.atp_debug('Get_Atf_Date : p_organization_id = ' || p_organization_id);
8568: msc_sch_wb.atp_debug('Get_Atf_Date : p_plan_id = ' || p_plan_id);
8561:
8562: BEGIN
8563: IF PG_DEBUG in ('Y', 'C') THEN
8564: msc_sch_wb.atp_debug('Begin Get_Atf_Date');
8565: msc_sch_wb.atp_debug('Get_Atf_Date : p_instance_id = ' || p_instance_id);
8566: msc_sch_wb.atp_debug('Get_Atf_Date : p_inventory_item_id = ' || p_inventory_item_id);
8567: msc_sch_wb.atp_debug('Get_Atf_Date : p_organization_id = ' || p_organization_id);
8568: msc_sch_wb.atp_debug('Get_Atf_Date : p_plan_id = ' || p_plan_id);
8569: END IF;
8562: BEGIN
8563: IF PG_DEBUG in ('Y', 'C') THEN
8564: msc_sch_wb.atp_debug('Begin Get_Atf_Date');
8565: msc_sch_wb.atp_debug('Get_Atf_Date : p_instance_id = ' || p_instance_id);
8566: msc_sch_wb.atp_debug('Get_Atf_Date : p_inventory_item_id = ' || p_inventory_item_id);
8567: msc_sch_wb.atp_debug('Get_Atf_Date : p_organization_id = ' || p_organization_id);
8568: msc_sch_wb.atp_debug('Get_Atf_Date : p_plan_id = ' || p_plan_id);
8569: END IF;
8570:
8563: IF PG_DEBUG in ('Y', 'C') THEN
8564: msc_sch_wb.atp_debug('Begin Get_Atf_Date');
8565: msc_sch_wb.atp_debug('Get_Atf_Date : p_instance_id = ' || p_instance_id);
8566: msc_sch_wb.atp_debug('Get_Atf_Date : p_inventory_item_id = ' || p_inventory_item_id);
8567: msc_sch_wb.atp_debug('Get_Atf_Date : p_organization_id = ' || p_organization_id);
8568: msc_sch_wb.atp_debug('Get_Atf_Date : p_plan_id = ' || p_plan_id);
8569: END IF;
8570:
8571: SELECT i.aggregate_time_fence_date
8564: msc_sch_wb.atp_debug('Begin Get_Atf_Date');
8565: msc_sch_wb.atp_debug('Get_Atf_Date : p_instance_id = ' || p_instance_id);
8566: msc_sch_wb.atp_debug('Get_Atf_Date : p_inventory_item_id = ' || p_inventory_item_id);
8567: msc_sch_wb.atp_debug('Get_Atf_Date : p_organization_id = ' || p_organization_id);
8568: msc_sch_wb.atp_debug('Get_Atf_Date : p_plan_id = ' || p_plan_id);
8569: END IF;
8570:
8571: SELECT i.aggregate_time_fence_date
8572: INTO l_atf_date
8576: AND i.organization_id = p_organization_id
8577: AND i.sr_inventory_item_id = p_inventory_item_id;
8578:
8579: IF PG_DEBUG in ('Y', 'C') THEN
8580: msc_sch_wb.atp_debug('Get_Atf_Date : ATF Date = ' || l_atf_date);
8581: END IF;
8582:
8583: return l_atf_date;
8584:
8602: l_atf_days NUMBER;
8603:
8604: BEGIN
8605: IF PG_DEBUG in ('Y', 'C') THEN
8606: msc_sch_wb.atp_debug('Begin Get_Atf_Days');
8607: msc_sch_wb.atp_debug('Get_Atf_Days : p_instance_id = ' || p_instance_id);
8608: msc_sch_wb.atp_debug('Get_Atf_Days : p_inventory_item_id = ' || p_inventory_item_id);
8609: msc_sch_wb.atp_debug('Get_Atf_Days : p_organization_id = ' || p_organization_id);
8610: END IF;
8603:
8604: BEGIN
8605: IF PG_DEBUG in ('Y', 'C') THEN
8606: msc_sch_wb.atp_debug('Begin Get_Atf_Days');
8607: msc_sch_wb.atp_debug('Get_Atf_Days : p_instance_id = ' || p_instance_id);
8608: msc_sch_wb.atp_debug('Get_Atf_Days : p_inventory_item_id = ' || p_inventory_item_id);
8609: msc_sch_wb.atp_debug('Get_Atf_Days : p_organization_id = ' || p_organization_id);
8610: END IF;
8611:
8604: BEGIN
8605: IF PG_DEBUG in ('Y', 'C') THEN
8606: msc_sch_wb.atp_debug('Begin Get_Atf_Days');
8607: msc_sch_wb.atp_debug('Get_Atf_Days : p_instance_id = ' || p_instance_id);
8608: msc_sch_wb.atp_debug('Get_Atf_Days : p_inventory_item_id = ' || p_inventory_item_id);
8609: msc_sch_wb.atp_debug('Get_Atf_Days : p_organization_id = ' || p_organization_id);
8610: END IF;
8611:
8612: SELECT DECODE(r.aggregate_time_fence_code,
8605: IF PG_DEBUG in ('Y', 'C') THEN
8606: msc_sch_wb.atp_debug('Begin Get_Atf_Days');
8607: msc_sch_wb.atp_debug('Get_Atf_Days : p_instance_id = ' || p_instance_id);
8608: msc_sch_wb.atp_debug('Get_Atf_Days : p_inventory_item_id = ' || p_inventory_item_id);
8609: msc_sch_wb.atp_debug('Get_Atf_Days : p_organization_id = ' || p_organization_id);
8610: END IF;
8611:
8612: SELECT DECODE(r.aggregate_time_fence_code,
8613: 1, NULL,
8637: AND r.sr_instance_id = tp.sr_instance_id
8638: AND r.rule_id = NVL(i2.atp_rule_id, tp.default_atp_rule_id);
8639:
8640: IF PG_DEBUG in ('Y', 'C') THEN
8641: msc_sch_wb.atp_debug('Get_Atf_Days : ATF Days = ' || l_atf_days);
8642: END IF;
8643:
8644: return l_atf_days;
8645:
8645:
8646: EXCEPTION
8647: WHEN NO_DATA_FOUND THEN
8648: IF PG_DEBUG in ('Y', 'C') THEN
8649: msc_sch_wb.atp_debug('Get_Atf_Days : ATF Days = ' || l_atf_days);
8650: END IF;
8651: return null;
8652:
8653: END Get_Atf_Days;
8672:
8673:
8674: BEGIN
8675: IF PG_DEBUG in ('Y', 'C') THEN
8676: msc_sch_wb.atp_debug('*********Begin procedure Get_Family_Item_Info ********');
8677: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8678: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8679: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8680: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8673:
8674: BEGIN
8675: IF PG_DEBUG in ('Y', 'C') THEN
8676: msc_sch_wb.atp_debug('*********Begin procedure Get_Family_Item_Info ********');
8677: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8678: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8679: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8680: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8681: END IF;
8674: BEGIN
8675: IF PG_DEBUG in ('Y', 'C') THEN
8676: msc_sch_wb.atp_debug('*********Begin procedure Get_Family_Item_Info ********');
8677: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8678: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8679: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8680: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8681: END IF;
8682:
8675: IF PG_DEBUG in ('Y', 'C') THEN
8676: msc_sch_wb.atp_debug('*********Begin procedure Get_Family_Item_Info ********');
8677: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8678: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8679: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8680: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8681: END IF;
8682:
8683: -- Initializing API return code
8676: msc_sch_wb.atp_debug('*********Begin procedure Get_Family_Item_Info ********');
8677: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_instance_id = ' ||to_char(p_instance_id));
8678: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_plan_id = ' ||to_char(p_plan_id));
8679: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_inventory_item_id = ' ||to_char(p_inventory_item_id));
8680: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'p_organization_id = ' ||to_char(p_organization_id));
8681: END IF;
8682:
8683: -- Initializing API return code
8684: x_return_status := FND_API.G_RET_STS_SUCCESS;
8715: AND i2.sr_instance_id = i1.sr_instance_id
8716: AND i2.plan_id = i1.plan_id;
8717:
8718: IF PG_DEBUG in ('Y', 'C') THEN
8719: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
8720: msc_sch_wb.atp_debug('*********End procedure Get_Family_Item_Info ********');
8721: END IF;
8722:
8723: EXCEPTION
8716: AND i2.plan_id = i1.plan_id;
8717:
8718: IF PG_DEBUG in ('Y', 'C') THEN
8719: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'ATF Date = ' ||to_char(p_atf_date));
8720: msc_sch_wb.atp_debug('*********End procedure Get_Family_Item_Info ********');
8721: END IF;
8722:
8723: EXCEPTION
8724:
8738: AND i1.plan_id = p_plan_id
8739: AND i1.sr_instance_id = p_instance_id;
8740:
8741: IF PG_DEBUG in ('Y', 'C') THEN
8742: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'Passing back the values originally sent to API');
8743: END IF;
8744:
8745:
8746: WHEN OTHERS THEN
8744:
8745:
8746: WHEN OTHERS THEN
8747: IF PG_DEBUG in ('Y', 'C') THEN
8748: msc_sch_wb.atp_debug('Get_Family_Item_Info: ' || 'Error occurred: ' || to_char(sqlcode) || ':' || SQLERRM);
8749: END IF;
8750: x_return_status := FND_API.G_RET_STS_ERROR;
8751:
8752: END Get_Family_Item_Info;
8771:
8772:
8773: BEGIN
8774: IF PG_DEBUG in ('Y', 'C') THEN
8775: msc_sch_wb.atp_debug('*********Begin procedure Get_PF_Plan_Info ********');
8776: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
8777: msc_sch_wb.atp_debug('p_member_item_id := ' || p_member_item_id);
8778: msc_sch_wb.atp_debug('p_family_item_id := ' || p_family_item_id);
8779: msc_sch_wb.atp_debug('p_org_id := ' || p_org_id);
8772:
8773: BEGIN
8774: IF PG_DEBUG in ('Y', 'C') THEN
8775: msc_sch_wb.atp_debug('*********Begin procedure Get_PF_Plan_Info ********');
8776: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
8777: msc_sch_wb.atp_debug('p_member_item_id := ' || p_member_item_id);
8778: msc_sch_wb.atp_debug('p_family_item_id := ' || p_family_item_id);
8779: msc_sch_wb.atp_debug('p_org_id := ' || p_org_id);
8780: msc_sch_wb.atp_debug('p_demand_class := ' || p_demand_class);
8773: BEGIN
8774: IF PG_DEBUG in ('Y', 'C') THEN
8775: msc_sch_wb.atp_debug('*********Begin procedure Get_PF_Plan_Info ********');
8776: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
8777: msc_sch_wb.atp_debug('p_member_item_id := ' || p_member_item_id);
8778: msc_sch_wb.atp_debug('p_family_item_id := ' || p_family_item_id);
8779: msc_sch_wb.atp_debug('p_org_id := ' || p_org_id);
8780: msc_sch_wb.atp_debug('p_demand_class := ' || p_demand_class);
8781:
8774: IF PG_DEBUG in ('Y', 'C') THEN
8775: msc_sch_wb.atp_debug('*********Begin procedure Get_PF_Plan_Info ********');
8776: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
8777: msc_sch_wb.atp_debug('p_member_item_id := ' || p_member_item_id);
8778: msc_sch_wb.atp_debug('p_family_item_id := ' || p_family_item_id);
8779: msc_sch_wb.atp_debug('p_org_id := ' || p_org_id);
8780: msc_sch_wb.atp_debug('p_demand_class := ' || p_demand_class);
8781:
8782: END IF;
8775: msc_sch_wb.atp_debug('*********Begin procedure Get_PF_Plan_Info ********');
8776: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
8777: msc_sch_wb.atp_debug('p_member_item_id := ' || p_member_item_id);
8778: msc_sch_wb.atp_debug('p_family_item_id := ' || p_family_item_id);
8779: msc_sch_wb.atp_debug('p_org_id := ' || p_org_id);
8780: msc_sch_wb.atp_debug('p_demand_class := ' || p_demand_class);
8781:
8782: END IF;
8783:
8776: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
8777: msc_sch_wb.atp_debug('p_member_item_id := ' || p_member_item_id);
8778: msc_sch_wb.atp_debug('p_family_item_id := ' || p_family_item_id);
8779: msc_sch_wb.atp_debug('p_org_id := ' || p_org_id);
8780: msc_sch_wb.atp_debug('p_demand_class := ' || p_demand_class);
8781:
8782: END IF;
8783:
8784: -- initialize API return status to success
8794: );
8795:
8796: IF (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id = -300) THEN
8797: IF PG_DEBUG in ('Y', 'C') THEN
8798: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'ATP Downtime');
8799: END IF;
8800:
8801: x_return_status := FND_API.G_RET_STS_ERROR;
8802: MSC_ATP_PVT.G_DOWNTIME_HIT := 'Y';
8804: RAISE NO_DATA_FOUND;
8805: END IF;
8806:
8807: IF PG_DEBUG in ('Y', 'C') THEN
8808: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id = '||MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
8809: END IF;
8810:
8811: -- ATP4drp begin
8812: IF NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type, 1) = 5 THEN
8810:
8811: -- ATP4drp begin
8812: IF NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type, 1) = 5 THEN
8813: IF PG_DEBUG in ('Y', 'C') THEN
8814: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8815: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'PF and Allocated ATP not applicable for DRP plans');
8816: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'ATF date will not be obtained.');
8817: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8818: END IF;
8811: -- ATP4drp begin
8812: IF NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type, 1) = 5 THEN
8813: IF PG_DEBUG in ('Y', 'C') THEN
8814: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8815: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'PF and Allocated ATP not applicable for DRP plans');
8816: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'ATF date will not be obtained.');
8817: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8818: END IF;
8819: ELSIF (p_family_item_id <> p_member_item_id) THEN
8812: IF NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type, 1) = 5 THEN
8813: IF PG_DEBUG in ('Y', 'C') THEN
8814: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8815: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'PF and Allocated ATP not applicable for DRP plans');
8816: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'ATF date will not be obtained.');
8817: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8818: END IF;
8819: ELSIF (p_family_item_id <> p_member_item_id) THEN
8820: -- plan is not a DRP plan
8813: IF PG_DEBUG in ('Y', 'C') THEN
8814: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8815: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'PF and Allocated ATP not applicable for DRP plans');
8816: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'ATF date will not be obtained.');
8817: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
8818: END IF;
8819: ELSIF (p_family_item_id <> p_member_item_id) THEN
8820: -- plan is not a DRP plan
8821: -- ATP4drp end
8827: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id
8828: );
8829:
8830: IF PG_DEBUG in ('Y', 'C') THEN
8831: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'ATF Date = '||p_atf_date);
8832: END IF;
8833:
8834: /* check if it is time phased atp scenario, if yes then we are done
8835: else look for family item's plan*/
8834: /* check if it is time phased atp scenario, if yes then we are done
8835: else look for family item's plan*/
8836: IF p_atf_date is not null THEN
8837: IF PG_DEBUG in ('Y', 'C') THEN
8838: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || '*** Time Phased ATP Scenario *** ');
8839: END IF;
8840: ELSE
8841: IF PG_DEBUG in ('Y', 'C') THEN
8842: msc_sch_wb.atp_debug('Schedule: ' || '*** Product Family(non-time phased) ATP Scenario *** ');
8838: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || '*** Time Phased ATP Scenario *** ');
8839: END IF;
8840: ELSE
8841: IF PG_DEBUG in ('Y', 'C') THEN
8842: msc_sch_wb.atp_debug('Schedule: ' || '*** Product Family(non-time phased) ATP Scenario *** ');
8843: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'Now trying to find old plan for family item...');
8844: END IF;
8845:
8846: MSC_ATP_PROC.get_global_plan_info(
8839: END IF;
8840: ELSE
8841: IF PG_DEBUG in ('Y', 'C') THEN
8842: msc_sch_wb.atp_debug('Schedule: ' || '*** Product Family(non-time phased) ATP Scenario *** ');
8843: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'Now trying to find old plan for family item...');
8844: END IF;
8845:
8846: MSC_ATP_PROC.get_global_plan_info(
8847: p_instance_id,
8852: );
8853:
8854: IF (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id = -300) THEN
8855: IF PG_DEBUG in ('Y', 'C') THEN
8856: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'ATP Downtime');
8857: END IF;
8858:
8859: x_return_status := FND_API.G_RET_STS_ERROR;
8860: MSC_ATP_PVT.G_DOWNTIME_HIT := 'Y';
8863: END IF;
8864: END IF;
8865: ELSE
8866: IF PG_DEBUG in ('Y', 'C') THEN
8867: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || '*** Regular PDS ATP Scenario *** ');
8868: END IF;
8869: END IF;
8870:
8871: IF PG_DEBUG in ('Y', 'C') THEN
8868: END IF;
8869: END IF;
8870:
8871: IF PG_DEBUG in ('Y', 'C') THEN
8872: msc_sch_wb.atp_debug('*********End of procedure Get_PF_Plan_Info ********');
8873: END IF;
8874:
8875: EXCEPTION
8876: WHEN OTHERS THEN
8874:
8875: EXCEPTION
8876: WHEN OTHERS THEN
8877: IF PG_DEBUG in ('Y', 'C') THEN
8878: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'Exception: ' || sqlerrm);
8879: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'Error code:' || to_char(sqlcode));
8880: END IF;
8881: x_return_status := FND_API.G_RET_STS_ERROR;
8882:
8875: EXCEPTION
8876: WHEN OTHERS THEN
8877: IF PG_DEBUG in ('Y', 'C') THEN
8878: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'Exception: ' || sqlerrm);
8879: msc_sch_wb.atp_debug('Get_PF_Plan_Info: ' || 'Error code:' || to_char(sqlcode));
8880: END IF;
8881: x_return_status := FND_API.G_RET_STS_ERROR;
8882:
8883: END Get_PF_Plan_Info;
12244:
12245: BEGIN
12246:
12247: IF PG_DEBUG in ('Y', 'C') THEN
12248: msc_sch_wb.atp_debug('***** Begin Create_PF_DP_Alloc_Reliefs Procedure *****');
12249: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12250: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12251: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12252: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12245: BEGIN
12246:
12247: IF PG_DEBUG in ('Y', 'C') THEN
12248: msc_sch_wb.atp_debug('***** Begin Create_PF_DP_Alloc_Reliefs Procedure *****');
12249: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12250: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12251: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12252: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12253: END IF;
12246:
12247: IF PG_DEBUG in ('Y', 'C') THEN
12248: msc_sch_wb.atp_debug('***** Begin Create_PF_DP_Alloc_Reliefs Procedure *****');
12249: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12250: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12251: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12252: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12253: END IF;
12254:
12247: IF PG_DEBUG in ('Y', 'C') THEN
12248: msc_sch_wb.atp_debug('***** Begin Create_PF_DP_Alloc_Reliefs Procedure *****');
12249: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12250: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12251: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12252: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12253: END IF;
12254:
12255: x_return_status := FND_API.G_RET_STS_SUCCESS;
12248: msc_sch_wb.atp_debug('***** Begin Create_PF_DP_Alloc_Reliefs Procedure *****');
12249: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12250: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12251: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12252: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12253: END IF;
12254:
12255: x_return_status := FND_API.G_RET_STS_SUCCESS;
12256:
12254:
12255: x_return_status := FND_API.G_RET_STS_SUCCESS;
12256:
12257: IF PG_DEBUG in ('Y', 'C') THEN
12258: msc_sch_wb.atp_debug(' Inserting Demands');
12259: END IF;
12260:
12261: l_sql_stmt_1 := 'INSERT INTO ' || p_insert_table ||
12262: '(reference_item_id,
12399: AND peg_v.demand_class = mv.demand_class (+)
12400: AND mv.level_id (+) = -1';
12401:
12402: IF PG_DEBUG in ('Y', 'C') THEN
12403: msc_sch_wb.atp_debug('SQL statement to be executed ' || length(l_sql_stmt_1) || ':' || l_sql_stmt_1);
12404: END IF;
12405: EXECUTE IMMEDIATE l_sql_stmt_1 USING
12406: l_def_dmd_class,
12407: p_user_id, p_sysdate, p_user_id, p_sysdate,
12407: p_user_id, p_sysdate, p_user_id, p_sysdate,
12408: l_def_dmd_class,p_plan_id;
12409:
12410: IF PG_DEBUG in ('Y', 'C') THEN
12411: msc_sch_wb.atp_debug('Create_PF_DP_Alloc_Reliefs: Number of Demand rows inserted '||
12412: SQL%ROWCOUNT);
12413: END IF;
12414:
12415: IF PG_DEBUG in ('Y', 'C') THEN
12412: SQL%ROWCOUNT);
12413: END IF;
12414:
12415: IF PG_DEBUG in ('Y', 'C') THEN
12416: msc_sch_wb.atp_debug(' Inserting Supplies');
12417: END IF;
12418:
12419: l_sql_stmt_1 := 'INSERT INTO ' || p_insert_table ||
12420: '(reference_item_id,
12497: l_def_dmd_class,
12498: p_user_id, p_sysdate, p_user_id, p_sysdate, p_plan_id;
12499:
12500: IF PG_DEBUG in ('Y', 'C') THEN
12501: msc_sch_wb.atp_debug('Create_PF_DP_Alloc_Reliefs: Number of Supply rows inserted '||
12502: SQL%ROWCOUNT);
12503: END IF;
12504:
12505: EXCEPTION
12504:
12505: EXCEPTION
12506: WHEN OTHERS THEN
12507: IF PG_DEBUG in ('Y', 'C') THEN
12508: msc_sch_wb.atp_debug('Inside main exception of Create_PF_DP_Alloc_Reliefs');
12509: msc_sch_wb.atp_debug ('Create_PF_DP_Alloc_Reliefs. Error : ' || sqlcode || ': '|| sqlerrm);
12510: END IF;
12511: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12512:
12505: EXCEPTION
12506: WHEN OTHERS THEN
12507: IF PG_DEBUG in ('Y', 'C') THEN
12508: msc_sch_wb.atp_debug('Inside main exception of Create_PF_DP_Alloc_Reliefs');
12509: msc_sch_wb.atp_debug ('Create_PF_DP_Alloc_Reliefs. Error : ' || sqlcode || ': '|| sqlerrm);
12510: END IF;
12511: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12512:
12513: END Create_PF_DP_Alloc_Reliefs;
12529: l_sql_stmt_1 VARCHAR2(5000);
12530: BEGIN
12531:
12532: IF PG_DEBUG in ('Y', 'C') THEN
12533: msc_sch_wb.atp_debug('***** Begin Create_PF_Allocation_Reliefs Procedure *****');
12534: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12535: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12536: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12537: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12530: BEGIN
12531:
12532: IF PG_DEBUG in ('Y', 'C') THEN
12533: msc_sch_wb.atp_debug('***** Begin Create_PF_Allocation_Reliefs Procedure *****');
12534: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12535: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12536: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12537: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12538: END IF;
12531:
12532: IF PG_DEBUG in ('Y', 'C') THEN
12533: msc_sch_wb.atp_debug('***** Begin Create_PF_Allocation_Reliefs Procedure *****');
12534: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12535: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12536: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12537: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12538: END IF;
12539:
12532: IF PG_DEBUG in ('Y', 'C') THEN
12533: msc_sch_wb.atp_debug('***** Begin Create_PF_Allocation_Reliefs Procedure *****');
12534: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12535: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12536: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12537: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12538: END IF;
12539:
12540: x_return_status := FND_API.G_RET_STS_SUCCESS;
12533: msc_sch_wb.atp_debug('***** Begin Create_PF_Allocation_Reliefs Procedure *****');
12534: msc_sch_wb.atp_debug(' Plan Id : ' || p_plan_id );
12535: msc_sch_wb.atp_debug(' Insert Table parameter : ' || p_insert_table );
12536: msc_sch_wb.atp_debug(' User Id Paramenter : ' || p_user_id );
12537: msc_sch_wb.atp_debug(' Date Parameter : ' || p_sysdate );
12538: END IF;
12539:
12540: x_return_status := FND_API.G_RET_STS_SUCCESS;
12541:
12539:
12540: x_return_status := FND_API.G_RET_STS_SUCCESS;
12541:
12542: IF PG_DEBUG in ('Y', 'C') THEN
12543: msc_sch_wb.atp_debug(' Inserting Demands');
12544: END IF;
12545:
12546:
12547: l_sql_stmt_1 := 'INSERT INTO ' || p_insert_table || -- actually the insert table parameter.
12628: AND s.plan_id = mapt.plan_id
12629: AND s.transaction_id = mapt.supply_id';
12630:
12631: IF PG_DEBUG in ('Y', 'C') THEN
12632: msc_sch_wb.atp_debug('SQL statement to be executed ' || length(l_sql_stmt_1) || ':' || l_sql_stmt_1);
12633: END IF;
12634: EXECUTE IMMEDIATE l_sql_stmt_1 USING
12635: p_user_id, p_sysdate, p_user_id, p_sysdate, p_plan_id;
12636:
12634: EXECUTE IMMEDIATE l_sql_stmt_1 USING
12635: p_user_id, p_sysdate, p_user_id, p_sysdate, p_plan_id;
12636:
12637: IF PG_DEBUG in ('Y', 'C') THEN
12638: msc_sch_wb.atp_debug('Create_PF_Allocation_Reliefs: Number of Demand rows inserted '||
12639: SQL%ROWCOUNT);
12640: END IF;
12641:
12642: EXCEPTION
12641:
12642: EXCEPTION
12643: WHEN OTHERS THEN
12644: IF PG_DEBUG in ('Y', 'C') THEN
12645: msc_sch_wb.atp_debug('Inside main exception of Create_PF_Allocation_Reliefs');
12646: msc_sch_wb.atp_debug ('Create_PF_Allocation_Reliefs. Error : ' || sqlcode || ': '|| sqlerrm);
12647: END IF;
12648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12649:
12642: EXCEPTION
12643: WHEN OTHERS THEN
12644: IF PG_DEBUG in ('Y', 'C') THEN
12645: msc_sch_wb.atp_debug('Inside main exception of Create_PF_Allocation_Reliefs');
12646: msc_sch_wb.atp_debug ('Create_PF_Allocation_Reliefs. Error : ' || sqlcode || ': '|| sqlerrm);
12647: END IF;
12648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12649:
12650: END Create_PF_Allocation_Reliefs;