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.25 2011/12/23 07:19:51 vjuluri 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.25 2011/12/23 07:19:51 vjuluri 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 776: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

772: IF PG_DEBUG in ('Y', 'C') THEN
773: msc_sch_wb.atp_debug('Add_Mat_Demand: ' || 'Couldnt find a rec in summ table. Insert new rec');
774: END IF;
775:
776: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
777: p_atp_rec.instance_id,
778: p_atp_rec.organization_id,
779: p_atp_rec.inventory_item_id,
780: p_atp_rec.requested_ship_date,

Line 1109: l_supply_rec MSC_ATP_DB_UTILS.Supply_Rec_Typ;

1105: l_time_phased_atp varchar2(1) := 'N';
1106: l_insert_item_id number;
1107: l_return_status varchar2(1);
1108:
1109: l_supply_rec MSC_ATP_DB_UTILS.Supply_Rec_Typ;
1110:
1111: BEGIN
1112: IF PG_DEBUG in ('Y', 'C') THEN
1113: msc_sch_wb.atp_debug('***** Begin Add_Planned_Order Procedure *****');

Line 1164: MSC_ATP_DB_UTILS.ADD_SUPPLIES(l_supply_rec);

1160: l_supply_rec.record_source := 2;
1161: l_supply_rec.supply_type := 5; --- planned order
1162: l_supply_rec.intransit_lead_time := p_intransit_lead_time; --4127630
1163:
1164: MSC_ATP_DB_UTILS.ADD_SUPPLIES(l_supply_rec);
1165:
1166: x_transaction_id := l_supply_rec.transaction_id;
1167: x_return_status := l_supply_rec.return_status;
1168:

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

1478:
1479: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' AND G_ORIG_INV_CTP = 5 THEN
1480: -- Condition for INV_CTP added for bug 3295831 because summary
1481: -- is not supported in PDS-ODS switch.
1482: MSC_ATP_DB_UTILS.DELETE_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id,p_demand_source_type);--cmro
1483: END IF;
1484:
1485: --3720018, commented the deletion of Sales orders.
1486: -- Bug 1723284, implicit conversion of datatype was forcing it

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

1850: IF PG_DEBUG in ('Y', 'C') THEN
1851: msc_sch_wb.atp_debug('Delete_Row: ' || 'update Demands in summary mode');
1852: END IF;
1853: -- Bug 2738280. Change the input parameters of procedure call.
1854: -- MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id);
1855: MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(x_inv_item_id, l_old_demand_date, l_old_demand_quantity,
1856: l_organization_id, p_plan_id, p_instance_id);
1857: END IF;
1858: **/

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

1851: msc_sch_wb.atp_debug('Delete_Row: ' || 'update Demands in summary mode');
1852: END IF;
1853: -- Bug 2738280. Change the input parameters of procedure call.
1854: -- MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(p_identifier, p_plan_id, p_instance_id);
1855: MSC_ATP_DB_UTILS.UPDATE_PLAN_SUMMARY_ROW(x_inv_item_id, l_old_demand_date, l_old_demand_quantity,
1856: l_organization_id, p_plan_id, p_instance_id);
1857: END IF;
1858: **/
1859:

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

2332: l_organization_id := null;
2333:
2334: IF p_mode = MSC_ATP_PVT.INVALID or (p_mode=MSC_ATP_PVT.UNDO and p_instance_id is null) THEN
2335:
2336: MSC_ATP_DB_UTILS.Delete_Pegging(c1.pegging_id);
2337:
2338: IF PG_DEBUG in ('Y', 'C') THEN
2339: msc_sch_wb.atp_debug('Remove_Invalid_SD_Rec: ' || 'delete this pegging_id '||c1.pegging_id);
2340: END IF;

Line 2896: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

2892: END IF;
2893: --diag_ATP: Do not remove the planned order in diagnostic mode even if the quantity is zero
2894: IF NVL(p_quantity, -1) = 0 AND (MSC_ATP_PVT.G_DIAGNOSTIC_ATP <> 1 or p_mode = MSC_ATP_PVT.INVALID) THEN
2895:
2896: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
2897: p_pegging_id,
2898: null,
2899: p_plan_id,
2900: MSC_ATP_PVT.UNDO,

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

2919: ELSE
2920:
2921: -- dsting diag_atp.
2922: IF p_mode <> 3 THEN
2923: MSC_ATP_DB_UTILS.Update_Pegging(p_pegging_id, p_date, p_quantity);
2924: END IF;
2925:
2926: IF PG_DEBUG in ('Y', 'C') THEN
2927: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'after first update to mrp_atp_details_temp');

Line 3144: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

3140: IF PG_DEBUG in ('Y', 'C') THEN
3141: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'insert qty on new date');
3142: END IF;
3143:
3144: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
3145: l_instance_id,
3146: l_organization_id,
3147: l_inventory_item_id,
3148: p_date,

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

3216: END IF;
3217:
3218: -- dsting 2754446. do i really want to do this
3219: IF l_prim_uom_dmd_qty <> l_sd_qty THEN
3220: MSC_ATP_DB_UTILS.update_pegging(l_child_pegging_id, null, l_prim_uom_dmd_qty);
3221: END IF;
3222:
3223: -- time_phased_atp
3224: IF ((p_mem_item_id <> p_pf_item_id) and (l_atf_date is not null)) THEN

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

3300: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'l_demand_id := '|| l_demand_id);
3301: END IF;
3302: l_prim_uom_dmd_qty := p_quantity * nvl(p_uom_conv_rate, 1);
3303: IF l_prim_uom_dmd_qty <> l_sd_qty THEN
3304: MSC_ATP_DB_UTILS.UPDATE_PEGGING(l_child_pegging_id, null, l_prim_uom_dmd_qty);
3305: END IF;
3306: END IF;
3307:
3308: END IF;

Line 3787: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

3783: IF PG_DEBUG in ('Y', 'C') THEN
3784: msc_sch_wb.atp_debug('Update_SD_Date: ' || 'insert qty on new date');
3785: END IF;
3786:
3787: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
3788: p_instance_id,
3789: l_org_id,
3790: l_inventory_item_id,
3791: p_supply_demand_date,

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

3908: msc_sch_wb.atp_debug('Inside summary mode set to yes');
3909: msc_sch_wb.atp_debug('p_identifiers.count := ' || p_identifiers.count);
3910: END IF;
3911: FOR m in 1..p_identifiers.count LOOP
3912: MSC_ATP_DB_UTILS.UNDO_DELETE_SUMMARY_ROW(p_identifiers(m),
3913: p_instance_id,
3914: p_del_ods_demand_src_type(m));
3915: END LOOP;
3916: END IF;

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

3995:
3996: -- rajjain 11/05/2002 Now we pass reference to p_identifiers and p_plan_ids array
3997: -- and do bulk update in Undo_Plan_Summary_Row
3998: -- Bug 2738280. Complete change of the spec and body of this procedure.
3999: -- MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(p_identifiers, p_plan_ids, p_instance_id);
4000: MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(l_inventory_item_id,
4001: l_using_assembly_demand_date,
4002: l_using_requirement_quantity,
4003: l_organization_id,

Line 4000: MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(l_inventory_item_id,

3996: -- rajjain 11/05/2002 Now we pass reference to p_identifiers and p_plan_ids array
3997: -- and do bulk update in Undo_Plan_Summary_Row
3998: -- Bug 2738280. Complete change of the spec and body of this procedure.
3999: -- MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(p_identifiers, p_plan_ids, p_instance_id);
4000: MSC_ATP_DB_UTILS.UNDO_PLAN_SUMMARY_ROW(l_inventory_item_id,
4001: l_using_assembly_demand_date,
4002: l_using_requirement_quantity,
4003: l_organization_id,
4004: l_plan_id,

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

4661: msc_sch_wb.atp_debug('Remove_Invalid_Future_SD: ' || 'identifier3 = '||c1.identifier3);
4662: msc_sch_wb.atp_debug('Remove_Invalid_Future_SD: ' || 'delete pegging_id '||c1.pegging_id);
4663: END IF;
4664:
4665: MSC_ATP_DB_UTILS.Delete_Pegging(c1.pegging_id);
4666:
4667: DELETE MSC_ALLOC_SUPPLIES
4668: WHERE parent_transaction_id = c1.identifier3
4669: AND plan_id = c1.identifier2

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

4983:
4984: END Flush_Data_In_Ods;
4985:
4986: --bug 3766179: add new procedure to add supplies irrespective of supply type
4987: PROCEDURE Add_Supplies ( p_supply_rec_type IN OUT NOCOPY MSC_ATP_DB_UTILS.supply_rec_typ)
4988:
4989: IS
4990: temp_sd_qty number;
4991:

Line 5236: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_supply_rec_type.plan_id,

5232: IF PG_DEBUG in ('Y', 'C') THEN
5233: msc_sch_wb.atp_debug('Add_Planned_Order: ' || 'Couldnt update try to insert');
5234: END IF;
5235:
5236: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_supply_rec_type.plan_id,
5237: p_supply_rec_type.instance_id,
5238: p_supply_rec_type.organization_id,
5239: p_supply_rec_type.inventory_item_id,
5240: p_supply_rec_type.schedule_date,

Line 5525: MSC_ATP_DB_UTILS.Delete_Row(

5521: msc_sch_wb.atp_debug('Call_delete_row: ' || 'MSC_ATP_PVT.G_ALLOCATED_ATP = '||MSC_ATP_PVT.G_ALLOCATED_ATP);
5522: END IF;
5523: END IF;
5524:
5525: MSC_ATP_DB_UTILS.Delete_Row(
5526: -- CTO re-arch Changes to deal with "across-plan" cases
5527: p_atp_table.Identifier(m),
5528: p_atp_table.Config_item_line_id(m),
5529: -- CTO re-arch

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

6166: msc_sch_wb.atp_debug('Delete_SD_Rec: ' || 'resource_id := ' || c1.resource_id);
6167: msc_sch_wb.atp_debug('Delete_SD_Rec: ' || 'aggregate_time_fence_date := ' || c1.aggregate_time_fence_date);
6168: END IF;
6169:
6170: MSC_ATP_DB_UTILS.Delete_Pegging(c1.pegging_id);
6171:
6172: IF c1.supply_demand_type = 2 THEN
6173: IF NVL(c1.inventory_item_id, -1) > 0 THEN
6174:

Line 6452: END MSC_ATP_DB_UTILS;

6448: END IF;
6449: x_return_status := FND_API.G_RET_STS_ERROR;
6450: END Restore_SD_Rec;
6451:
6452: END MSC_ATP_DB_UTILS;