[Home] [Help]
4291: -- Need to call get_infinite_time_fence_date procedure in case call is from View allocation
4292: -- as p_get_mat_in_rec will not be populated
4293: IF p_identifier = -1 THEN
4294: -- get the infinite time fence date if it exists
4295: l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(p_instance_id,
4296: p_inventory_item_id,p_organization_id, p_plan_id);
4297: ELSE
4298: ---diag_atp
4299: l_infinite_time_fence_date := p_get_mat_in_rec.infinite_time_fence_date;
5643:
5644: x_atp_info := l_current_atp;
5645: --diag_atp: we have already calculate this date.
5646: /*-- get the infinite time fence date if it exists
5647: l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(p_instance_id,
5648: p_inventory_item_id,p_organization_id, p_plan_id);
5649: */
5650:
5651: IF l_infinite_time_fence_date IS NOT NULL THEN
8557:
8558: x_atp_info := l_current_atp;
8559:
8560: -- get the infinite time fence date if it exists
8561: l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(null,
8562: null,null, p_plan_id);
8563:
8564:
8565: IF l_infinite_time_fence_date IS NOT NULL THEN
8991: l_current_atp.atp_period,
8992: l_current_atp.atp_qty
8993: FROM (
8994: SELECT GREATEST(cs.calendar_date,l_sys_next_date) l_date, --bug3333114
8995: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
8996: p_sup_atp_info_rec.instance_id, p_sup_atp_info_rec.plan_id,
8997: l_inv_item_id, p_sup_atp_info_rec.organization_id,
8998: p_sup_atp_info_rec.supplier_id, p_sup_atp_info_rec.supplier_site_id,
8999: cs.seq_num - p_sup_atp_info_rec.sysdate_seq_num),0))*
9151: l_current_atp.atp_period,
9152: l_current_atp.atp_qty
9153: FROM (
9154: SELECT GREATEST(cs.calendar_date,l_sys_next_date) l_date, --bug3333114
9155: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9156: p_sup_atp_info_rec.instance_id, p_sup_atp_info_rec.plan_id,
9157: p_sup_atp_info_rec.inventory_item_id, p_sup_atp_info_rec.organization_id,
9158: p_sup_atp_info_rec.supplier_id, p_sup_atp_info_rec.supplier_site_id,
9159: cs.seq_num - p_sup_atp_info_rec.sysdate_seq_num),0))*
9364: p_sup_atp_info_rec.instance_id col20,
9365: l_null_num col21,
9366: l_null_num col22,
9367: l_null_num col23,
9368: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9369: p_sup_atp_info_rec.instance_id,
9370: p_sup_atp_info_rec.plan_id,
9371: l_inv_item_id,
9372: p_sup_atp_info_rec.organization_id,
9395: G_USER_ID,
9396: G_USER_ID,
9397: -- ship_rec_cal changes end
9398: -- Unallocated_Quantity
9399: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9400: p_sup_atp_info_rec.instance_id,
9401: p_sup_atp_info_rec.plan_id,
9402: l_inv_item_id,
9403: p_sup_atp_info_rec.organization_id,
9649: p_sup_atp_info_rec.instance_id col20,
9650: l_null_num col21,
9651: l_null_num col22,
9652: l_null_num col23,
9653: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9654: p_sup_atp_info_rec.instance_id,
9655: p_sup_atp_info_rec.plan_id,
9656: p_sup_atp_info_rec.inventory_item_id,
9657: p_sup_atp_info_rec.organization_id,
9680: G_USER_ID,
9681: G_USER_ID,
9682: -- ship_rec_cal changes end
9683: -- Unallocated_Quantity
9684: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9685: p_sup_atp_info_rec.instance_id,
9686: p_sup_atp_info_rec.plan_id,
9687: p_sup_atp_info_rec.inventory_item_id,
9688: p_sup_atp_info_rec.organization_id,
10310: END IF;
10311:
10312: --4055719 , moved this code to MSC_ATP_REQ.get_supplier_atp_info
10313: -- get the infinite time fence date if it exists
10314: /*l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(null, --4055719
10315: null,null, p_sup_atp_info_rec.plan_id);
10316:
10317: IF l_infinite_time_fence_datee IS NOT NULL THEN
10318: -- add one more entry to indicate infinite time fence date
10791: (
10792: NULL, --partner_id
10793: NULL, --partner_site_id
10794: --p_inventory_item_id,
10795: MSC_ATP_FUNC.Get_inv_item_id(
10796: p_instance_id,
10797: p_inventory_item_id, -- src_inv_item
10798: null,
10799: p_organization_id ), -- Get Inv Item
11236: l_process_item_id,
11237: p_atp_record.organization_id,
11238: l_item_info_rec );
11239: l_inv_item_id := MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id;
11240: /*l_inv_item_id := MSC_ATP_FUNC.get_inv_item_id (p_atp_record.instance_id,
11241: p_atp_record.request_item_id,
11242: null,
11243: p_atp_record.organization_id);
11244: Modularize Item and Org Info */
11553: END IF;
11554: END IF;
11555:
11556: -- get family item's dest id
11557: l_pf_item_id := MSC_ATP_FUNC.get_inv_item_id (
11558: p_atp_record.instance_id,
11559: p_atp_record.inventory_item_id,
11560: null,
11561: p_atp_record.organization_id
11626: -- then populate the pegging tree with the values
11627:
11628: /* Modularize Item and Org Info */
11629: l_inv_item_name := MSC_ATP_PVT.G_ITEM_INFO_REC.item_name;
11630: /*l_inv_item_name := MSC_ATP_FUNC.get_inv_item_name(p_atp_record.instance_id,
11631: p_atp_record.inventory_item_id,
11632: p_atp_record.organization_id);
11633: Modularize Item and Org Info */
11634:
11638: l_org_code := MSC_ATP_PVT.G_ORG_INFO_REC.org_code;
11639: IF PG_DEBUG in ('Y', 'C') THEN
11640: msc_sch_wb.atp_debug('Stealing: ' || 'Modular Use Org_code : '||l_org_code);
11641: END IF;
11642: /*l_org_code := MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
11643: p_atp_record.organization_id);
11644: Modularize Item and Org Info */
11645:
11646: l_pegging_rec.session_id:= MSC_ATP_PVT.G_SESSION_ID;
11663: l_pegging_rec.inventory_item_id:= p_atp_record.request_item_id;
11664: l_pegging_rec.inventory_item_name := l_inv_item_name;
11665: ELSE
11666: l_pegging_rec.inventory_item_id:= p_atp_record.inventory_item_id;
11667: l_pegging_rec.inventory_item_name := MSC_ATP_FUNC.get_inv_item_name(
11668: p_atp_record.instance_id,
11669: p_atp_record.inventory_item_id,
11670: p_atp_record.organization_id
11671: );