[Home] [Help]
4067: -- Need to call get_infinite_time_fence_date procedure in case call is from View allocation
4068: -- as p_get_mat_in_rec will not be populated
4069: IF p_identifier = -1 THEN
4070: -- get the infinite time fence date if it exists
4071: l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(p_instance_id,
4072: p_inventory_item_id,p_organization_id, p_plan_id);
4073: ELSE
4074: ---diag_atp
4075: l_infinite_time_fence_date := p_get_mat_in_rec.infinite_time_fence_date;
5413:
5414: x_atp_info := l_current_atp;
5415: --diag_atp: we have already calculate this date.
5416: /*-- get the infinite time fence date if it exists
5417: l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(p_instance_id,
5418: p_inventory_item_id,p_organization_id, p_plan_id);
5419: */
5420:
5421: IF l_infinite_time_fence_date IS NOT NULL THEN
8327:
8328: x_atp_info := l_current_atp;
8329:
8330: -- get the infinite time fence date if it exists
8331: l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(null,
8332: null,null, p_plan_id);
8333:
8334:
8335: IF l_infinite_time_fence_date IS NOT NULL THEN
8760: l_current_atp.atp_period,
8761: l_current_atp.atp_qty
8762: FROM (
8763: SELECT GREATEST(cs.calendar_date,l_sys_next_date) l_date, --bug3333114
8764: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
8765: p_sup_atp_info_rec.instance_id, p_sup_atp_info_rec.plan_id,
8766: l_inv_item_id, p_sup_atp_info_rec.organization_id,
8767: p_sup_atp_info_rec.supplier_id, p_sup_atp_info_rec.supplier_site_id,
8768: cs.seq_num - p_sup_atp_info_rec.sysdate_seq_num),0))*
8920: l_current_atp.atp_period,
8921: l_current_atp.atp_qty
8922: FROM (
8923: SELECT GREATEST(cs.calendar_date,l_sys_next_date) l_date, --bug3333114
8924: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
8925: p_sup_atp_info_rec.instance_id, p_sup_atp_info_rec.plan_id,
8926: p_sup_atp_info_rec.inventory_item_id, p_sup_atp_info_rec.organization_id,
8927: p_sup_atp_info_rec.supplier_id, p_sup_atp_info_rec.supplier_site_id,
8928: cs.seq_num - p_sup_atp_info_rec.sysdate_seq_num),0))*
9133: p_sup_atp_info_rec.instance_id col20,
9134: l_null_num col21,
9135: l_null_num col22,
9136: l_null_num col23,
9137: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9138: p_sup_atp_info_rec.instance_id,
9139: p_sup_atp_info_rec.plan_id,
9140: l_inv_item_id,
9141: p_sup_atp_info_rec.organization_id,
9164: G_USER_ID,
9165: G_USER_ID,
9166: -- ship_rec_cal changes end
9167: -- Unallocated_Quantity
9168: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9169: p_sup_atp_info_rec.instance_id,
9170: p_sup_atp_info_rec.plan_id,
9171: l_inv_item_id,
9172: p_sup_atp_info_rec.organization_id,
9418: p_sup_atp_info_rec.instance_id col20,
9419: l_null_num col21,
9420: l_null_num col22,
9421: l_null_num col23,
9422: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9423: p_sup_atp_info_rec.instance_id,
9424: p_sup_atp_info_rec.plan_id,
9425: p_sup_atp_info_rec.inventory_item_id,
9426: p_sup_atp_info_rec.organization_id,
9449: G_USER_ID,
9450: G_USER_ID,
9451: -- ship_rec_cal changes end
9452: -- Unallocated_Quantity
9453: cs.capacity*(1+NVL(MSC_ATP_FUNC.get_tolerance_percentage(
9454: p_sup_atp_info_rec.instance_id,
9455: p_sup_atp_info_rec.plan_id,
9456: p_sup_atp_info_rec.inventory_item_id,
9457: p_sup_atp_info_rec.organization_id,
10079: END IF;
10080:
10081: --4055719 , moved this code to MSC_ATP_REQ.get_supplier_atp_info
10082: -- get the infinite time fence date if it exists
10083: /*l_infinite_time_fence_date := MSC_ATP_FUNC.get_infinite_time_fence_date(null, --4055719
10084: null,null, p_sup_atp_info_rec.plan_id);
10085:
10086: IF l_infinite_time_fence_datee IS NOT NULL THEN
10087: -- add one more entry to indicate infinite time fence date
10560: (
10561: NULL, --partner_id
10562: NULL, --partner_site_id
10563: --p_inventory_item_id,
10564: MSC_ATP_FUNC.Get_inv_item_id(
10565: p_instance_id,
10566: p_inventory_item_id, -- src_inv_item
10567: null,
10568: p_organization_id ), -- Get Inv Item
11005: l_process_item_id,
11006: p_atp_record.organization_id,
11007: l_item_info_rec );
11008: l_inv_item_id := MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id;
11009: /*l_inv_item_id := MSC_ATP_FUNC.get_inv_item_id (p_atp_record.instance_id,
11010: p_atp_record.request_item_id,
11011: null,
11012: p_atp_record.organization_id);
11013: Modularize Item and Org Info */
11322: END IF;
11323: END IF;
11324:
11325: -- get family item's dest id
11326: l_pf_item_id := MSC_ATP_FUNC.get_inv_item_id (
11327: p_atp_record.instance_id,
11328: p_atp_record.inventory_item_id,
11329: null,
11330: p_atp_record.organization_id
11395: -- then populate the pegging tree with the values
11396:
11397: /* Modularize Item and Org Info */
11398: l_inv_item_name := MSC_ATP_PVT.G_ITEM_INFO_REC.item_name;
11399: /*l_inv_item_name := MSC_ATP_FUNC.get_inv_item_name(p_atp_record.instance_id,
11400: p_atp_record.inventory_item_id,
11401: p_atp_record.organization_id);
11402: Modularize Item and Org Info */
11403:
11407: l_org_code := MSC_ATP_PVT.G_ORG_INFO_REC.org_code;
11408: IF PG_DEBUG in ('Y', 'C') THEN
11409: msc_sch_wb.atp_debug('Stealing: ' || 'Modular Use Org_code : '||l_org_code);
11410: END IF;
11411: /*l_org_code := MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
11412: p_atp_record.organization_id);
11413: Modularize Item and Org Info */
11414:
11415: l_pegging_rec.session_id:= MSC_ATP_PVT.G_SESSION_ID;
11432: l_pegging_rec.inventory_item_id:= p_atp_record.request_item_id;
11433: l_pegging_rec.inventory_item_name := l_inv_item_name;
11434: ELSE
11435: l_pegging_rec.inventory_item_id:= p_atp_record.inventory_item_id;
11436: l_pegging_rec.inventory_item_name := MSC_ATP_FUNC.get_inv_item_name(
11437: p_atp_record.instance_id,
11438: p_atp_record.inventory_item_id,
11439: p_atp_record.organization_id
11440: );