DBA Data[Home] [Help]

APPS.MSC_ATP_DB_UTILS dependencies on MSC_ATP_DB_UTILS

Line 1: PACKAGE BODY MSC_ATP_DB_UTILS AS

1: PACKAGE BODY MSC_ATP_DB_UTILS AS
2: /* $Header: MSCDATPB.pls 120.9.12010000.3 2008/09/22 10:00:37 sbnaik ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'MSC_ATP_DB_UTILS';
5:

Line 4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'MSC_ATP_DB_UTILS';

1: PACKAGE BODY MSC_ATP_DB_UTILS AS
2: /* $Header: MSCDATPB.pls 120.9.12010000.3 2008/09/22 10:00:37 sbnaik ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'MSC_ATP_DB_UTILS';
5:
6: -- dsting: 0 if Clear_SD_Details_temp has been called, 0 otherwise.
7: -- used to save 1 delete in sd performance enh
8: PG_CLEAR_SD_DETAILS_TEMP NUMBER := 0;

Line 623: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

619: IF PG_DEBUG in ('Y', 'C') THEN
620: msc_sch_wb.atp_debug('Add_Mat_Demand: ' || 'Couldnt find a rec in summ table. Insert new rec');
621: END IF;
622:
623: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
624: p_atp_rec.instance_id,
625: p_atp_rec.organization_id,
626: p_atp_rec.inventory_item_id,
627: p_atp_rec.requested_ship_date,

Line 956: l_supply_rec MSC_ATP_DB_UTILS.Supply_Rec_Typ;

952: l_time_phased_atp varchar2(1) := 'N';
953: l_insert_item_id number;
954: l_return_status varchar2(1);
955:
956: l_supply_rec MSC_ATP_DB_UTILS.Supply_Rec_Typ;
957:
958: BEGIN
959: IF PG_DEBUG in ('Y', 'C') THEN
960: msc_sch_wb.atp_debug('***** Begin Add_Planned_Order Procedure *****');

Line 1011: MSC_ATP_DB_UTILS.ADD_SUPPLIES(l_supply_rec);

1007: l_supply_rec.record_source := 2;
1008: l_supply_rec.supply_type := 5; --- planned order
1009: l_supply_rec.intransit_lead_time := p_intransit_lead_time; --4127630
1010:
1011: MSC_ATP_DB_UTILS.ADD_SUPPLIES(l_supply_rec);
1012:
1013: x_transaction_id := l_supply_rec.transaction_id;
1014: x_return_status := l_supply_rec.return_status;
1015:

Line 1329: MSC_ATP_DB_UTILS.DELETE_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id,p_demand_source_type);--cmro

1325:
1326: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' AND G_ORIG_INV_CTP = 5 THEN
1327: -- Condition for INV_CTP added for bug 3295831 because summary
1328: -- is not supported in PDS-ODS switch.
1329: MSC_ATP_DB_UTILS.DELETE_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id,p_demand_source_type);--cmro
1330: END IF;
1331:
1332: --3720018, commented the deletion of Sales orders.
1333: -- Bug 1723284, implicit conversion of datatype was forcing it

Line 1701: -- MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id);

1697: IF PG_DEBUG in ('Y', 'C') THEN
1698: msc_sch_wb.atp_debug('Delete_Row: ' || 'update Demands in summary mode');
1699: END IF;
1700: -- Bug 2738280. Change the input parameters of procedure call.
1701: -- MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id);
1702: MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(x_inv_item_id, l_old_demand_date, l_old_demand_quantity,
1703: l_organization_id, p_plan_id, p_instance_id);
1704: END IF;
1705: **/

Line 1702: MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(x_inv_item_id, l_old_demand_date, l_old_demand_quantity,

1698: msc_sch_wb.atp_debug('Delete_Row: ' || 'update Demands in summary mode');
1699: END IF;
1700: -- Bug 2738280. Change the input parameters of procedure call.
1701: -- MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id);
1702: MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(x_inv_item_id, l_old_demand_date, l_old_demand_quantity,
1703: l_organization_id, p_plan_id, p_instance_id);
1704: END IF;
1705: **/
1706:

Line 2179: MSC_ATP_DB_UTILS.Delete_Pegging(c1.pegging_id);

2175: l_organization_id := null;
2176:
2177: IF p_mode = MSC_ATP_PVT.INVALID or (p_mode=MSC_ATP_PVT.UNDO and p_instance_id is null) THEN
2178:
2179: MSC_ATP_DB_UTILS.Delete_Pegging(c1.pegging_id);
2180:
2181: IF PG_DEBUG in ('Y', 'C') THEN
2182: msc_sch_wb.atp_debug('Remove_Invalid_SD_Rec: ' || 'delete this pegging_id '||c1.pegging_id);
2183: END IF;

Line 2734: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

2730: END IF;
2731: --diag_ATP: Do not remove the planned order in diagnostic mode even if the quantity is zero
2732: IF NVL(p_quantity, -1) = 0 AND (MSC_ATP_PVT.G_DIAGNOSTIC_ATP <> 1 or p_mode = MSC_ATP_PVT.INVALID) THEN
2733:
2734: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
2735: p_pegging_id,
2736: null,
2737: p_plan_id,
2738: MSC_ATP_PVT.UNDO,

Line 2761: MSC_ATP_DB_UTILS.Update_Pegging(p_pegging_id, p_date, p_quantity);

2757: ELSE
2758:
2759: -- dsting diag_atp.
2760: IF p_mode <> 3 THEN
2761: MSC_ATP_DB_UTILS.Update_Pegging(p_pegging_id, p_date, p_quantity);
2762: END IF;
2763:
2764: IF PG_DEBUG in ('Y', 'C') THEN
2765: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'after first update to mrp_atp_details_temp');

Line 2982: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

2978: IF PG_DEBUG in ('Y', 'C') THEN
2979: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'insert qty on new date');
2980: END IF;
2981:
2982: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
2983: l_instance_id,
2984: l_organization_id,
2985: l_inventory_item_id,
2986: p_date,

Line 3058: MSC_ATP_DB_UTILS.update_pegging(l_child_pegging_id, null, l_prim_uom_dmd_qty);

3054: END IF;
3055:
3056: -- dsting 2754446. do i really want to do this
3057: IF l_prim_uom_dmd_qty <> l_sd_qty THEN
3058: MSC_ATP_DB_UTILS.update_pegging(l_child_pegging_id, null, l_prim_uom_dmd_qty);
3059: END IF;
3060:
3061: -- time_phased_atp
3062: IF ((p_mem_item_id <> p_pf_item_id) and (l_atf_date is not null)) THEN

Line 3142: MSC_ATP_DB_UTILS.UPDATE_PEGGING(l_child_pegging_id, null, l_prim_uom_dmd_qty);

3138: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'l_demand_id := '|| l_demand_id);
3139: END IF;
3140: l_prim_uom_dmd_qty := p_quantity * nvl(p_uom_conv_rate, 1);
3141: IF l_prim_uom_dmd_qty <> l_sd_qty THEN
3142: MSC_ATP_DB_UTILS.UPDATE_PEGGING(l_child_pegging_id, null, l_prim_uom_dmd_qty);
3143: END IF;
3144: END IF;
3145:
3146: END IF;

Line 3620: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

3616: IF PG_DEBUG in ('Y', 'C') THEN
3617: msc_sch_wb.atp_debug('Update_SD_Date: ' || 'insert qty on new date');
3618: END IF;
3619:
3620: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
3621: p_instance_id,
3622: l_org_id,
3623: l_inventory_item_id,
3624: p_supply_demand_date,

Line 3737: MSC_ATP_DB_UTILS.UNDO_DELETE_SUMMARY_ROW(p_identifiers(m),

3733: msc_sch_wb.atp_debug('Inside summary mode set to yes');
3734: msc_sch_wb.atp_debug('p_identifiers.count := ' || p_identifiers.count);
3735: END IF;
3736: FOR m in 1..p_identifiers.count LOOP
3737: MSC_ATP_DB_UTILS.UNDO_DELETE_SUMMARY_ROW(p_identifiers(m),
3738: p_instance_id,
3739: p_del_ods_demand_src_type(m));
3740: END LOOP;
3741: END IF;

Line 3824: -- MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(p_identifiers, p_plan_ids, p_instance_id);

3820:
3821: -- rajjain 11/05/2002 Now we pass reference to p_identifiers and p_plan_ids array
3822: -- and do bulk update in Undo_Plan_Summary_Row
3823: -- Bug 2738280. Complete change of the spec and body of this procedure.
3824: -- MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(p_identifiers, p_plan_ids, p_instance_id);
3825: MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(l_inventory_item_id,
3826: l_using_assembly_demand_date,
3827: l_using_requirement_quantity,
3828: l_organization_id,

Line 3825: MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(l_inventory_item_id,

3821: -- rajjain 11/05/2002 Now we pass reference to p_identifiers and p_plan_ids array
3822: -- and do bulk update in Undo_Plan_Summary_Row
3823: -- Bug 2738280. Complete change of the spec and body of this procedure.
3824: -- MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(p_identifiers, p_plan_ids, p_instance_id);
3825: MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(l_inventory_item_id,
3826: l_using_assembly_demand_date,
3827: l_using_requirement_quantity,
3828: l_organization_id,
3829: l_plan_id,

Line 4483: MSC_ATP_DB_UTILS.Delete_Pegging(c1.pegging_id);

4479: msc_sch_wb.atp_debug('Remove_Invalid_Future_SD: ' || 'identifier3 = '||c1.identifier3);
4480: msc_sch_wb.atp_debug('Remove_Invalid_Future_SD: ' || 'delete pegging_id '||c1.pegging_id);
4481: END IF;
4482:
4483: MSC_ATP_DB_UTILS.Delete_Pegging(c1.pegging_id);
4484:
4485: DELETE MSC_ALLOC_SUPPLIES
4486: WHERE parent_transaction_id = c1.identifier3
4487: AND plan_id = c1.identifier2

Line 4805: PROCEDURE Add_Supplies ( p_supply_rec_type IN OUT NOCOPY MSC_ATP_DB_UTILS.supply_rec_typ)

4801:
4802: END Flush_Data_In_Ods;
4803:
4804: --bug 3766179: add new procedure to add supplies irrespective of supply type
4805: PROCEDURE Add_Supplies ( p_supply_rec_type IN OUT NOCOPY MSC_ATP_DB_UTILS.supply_rec_typ)
4806:
4807: IS
4808: temp_sd_qty number;
4809:

Line 5054: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_supply_rec_type.plan_id,

5050: IF PG_DEBUG in ('Y', 'C') THEN
5051: msc_sch_wb.atp_debug('Add_Planned_Order: ' || 'Couldnt update try to insert');
5052: END IF;
5053:
5054: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_supply_rec_type.plan_id,
5055: p_supply_rec_type.instance_id,
5056: p_supply_rec_type.organization_id,
5057: p_supply_rec_type.inventory_item_id,
5058: p_supply_rec_type.schedule_date,

Line 5325: MSC_ATP_DB_UTILS.Delete_Row(

5321: IF l_time_phased_set <> 'Y' and l_time_phased_atp = 'Y' THEN
5322: l_time_phased_set := 'Y';
5323: END IF;
5324:
5325: MSC_ATP_DB_UTILS.Delete_Row(
5326: -- CTO re-arch Changes to deal with "across-plan" cases
5327: p_atp_table.Identifier(m),
5328: p_atp_table.Config_item_line_id(m),
5329: -- CTO re-arch

Line 5722: END MSC_ATP_DB_UTILS;

5718: END LOOP;
5719:
5720: END UNDO_DELETE_SUMMARY_ROW;
5721: --5357370 ends
5722: END MSC_ATP_DB_UTILS;