15: /* description : procedure used to get total estimated costs */
16:
17: /* */
18:
19: /* p_api_version Standard IN param */
20:
21: /* p_commit Standard IN param */
22:
23: /* p_init_msg_list Standard IN param */
17: /* */
18:
19: /* p_api_version Standard IN param */
20:
21: /* p_commit Standard IN param */
22:
23: /* p_init_msg_list Standard IN param */
24:
25: /* p_validation_level Standard IN param */
19: /* p_api_version Standard IN param */
20:
21: /* p_commit Standard IN param */
22:
23: /* p_init_msg_list Standard IN param */
24:
25: /* p_validation_level Standard IN param */
26:
27: /* p_repair_estimate_id Required Estimate ID to get */
21: /* p_commit Standard IN param */
22:
23: /* p_init_msg_list Standard IN param */
24:
25: /* p_validation_level Standard IN param */
26:
27: /* p_repair_estimate_id Required Estimate ID to get */
28: /* est costs */
29:
32: /* p_ro_currency_code Required Repair Order Currency Code*/
33:
34: /* x_costs Total MLE costs for repair line */
35:
36: /* x_return_status Standard OUT param */
37:
38: /* x_msg_count Standard OUT param */
39:
40: /* x_msg_data Standard OUT param */
34: /* x_costs Total MLE costs for repair line */
35:
36: /* x_return_status Standard OUT param */
37:
38: /* x_msg_count Standard OUT param */
39:
40: /* x_msg_data Standard OUT param */
41:
42: /* */
36: /* x_return_status Standard OUT param */
37:
38: /* x_msg_count Standard OUT param */
39:
40: /* x_msg_data Standard OUT param */
41:
42: /* */
43:
44: /*----------------------------------------------------------------*/
104: l_mod_name varchar2(2000) := 'csd.plsql.csd_cost_analysis_pvt.get_totalestcosts';
105:
106: BEGIN
107:
108: -- Standard Start of API savepoint
109: -- No need to create savepoints because no updates/inserts are being done.
110: -- SAVEPOINT Get_TotalEstCosts_Pvt;
111:
112: -- Standard call to check for call compatibility.
108: -- Standard Start of API savepoint
109: -- No need to create savepoints because no updates/inserts are being done.
110: -- SAVEPOINT Get_TotalEstCosts_Pvt;
111:
112: -- Standard call to check for call compatibility.
113:
114: IF NOT FND_API.Compatible_API_Call(l_api_version,
115: p_api_version,
116: l_api_name,
242: --
243: -- End API Body
244: --
245:
246: -- Standard check of p_commit.
247:
248: IF FND_API.To_Boolean(p_commit)
249: THEN
250: COMMIT WORK;
249: THEN
250: COMMIT WORK;
251: END IF;
252:
253: -- Standard call to get message count and IF count is get message info.
254:
255: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
256: EXCEPTION
257: WHEN FND_API.G_EXC_ERROR THEN
314: /* description : procedure used to get total estimated charges */
315:
316: /* */
317:
318: /* p_api_version Standard IN param */
319:
320: /* p_commit Standard IN param */
321:
322: /* p_init_msg_list Standard IN param */
316: /* */
317:
318: /* p_api_version Standard IN param */
319:
320: /* p_commit Standard IN param */
321:
322: /* p_init_msg_list Standard IN param */
323:
324: /* p_validation_level Standard IN param */
318: /* p_api_version Standard IN param */
319:
320: /* p_commit Standard IN param */
321:
322: /* p_init_msg_list Standard IN param */
323:
324: /* p_validation_level Standard IN param */
325:
326: /* p_repair_estimate_id Required Estimate ID to get est charges */
320: /* p_commit Standard IN param */
321:
322: /* p_init_msg_list Standard IN param */
323:
324: /* p_validation_level Standard IN param */
325:
326: /* p_repair_estimate_id Required Estimate ID to get est charges */
327:
328: /* p_ro_currency_code Required Repair Order Currency Code*/
328: /* p_ro_currency_code Required Repair Order Currency Code*/
329:
330: /* x_charges Total MLE charges for repair line */
331:
332: /* x_return_status Standard OUT param */
333:
334: /* x_msg_count Standard OUT param */
335:
336: /* x_msg_data Standard OUT param */
330: /* x_charges Total MLE charges for repair line */
331:
332: /* x_return_status Standard OUT param */
333:
334: /* x_msg_count Standard OUT param */
335:
336: /* x_msg_data Standard OUT param */
337:
338: /* */
332: /* x_return_status Standard OUT param */
333:
334: /* x_msg_count Standard OUT param */
335:
336: /* x_msg_data Standard OUT param */
337:
338: /* */
339:
340: /*----------------------------------------------------------------*/
386: l_mod_name varchar2(2000) := 'csd.plsql.csd_cost_analysis_pvt.get_totalestcharges';
387:
388: BEGIN
389:
390: -- Standard Start of API savepoint
391: --SAVEPOINT Get_TotalEstCharges_Pvt;
392:
393: -- Standard call to check for call compatibility.
394:
389:
390: -- Standard Start of API savepoint
391: --SAVEPOINT Get_TotalEstCharges_Pvt;
392:
393: -- Standard call to check for call compatibility.
394:
395: IF NOT FND_API.Compatible_API_Call(l_api_version,
396: p_api_version,
397: l_api_name,
483: --
484: -- End API Body
485: --
486:
487: -- Standard check of p_commit.
488:
489: IF FND_API.To_Boolean(p_commit)
490: THEN
491: COMMIT WORK;
490: THEN
491: COMMIT WORK;
492: END IF;
493:
494: -- Standard call to get message count and IF count is get message info.
495:
496: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
497: EXCEPTION
498: WHEN FND_API.G_EXC_ERROR THEN
557: /* estimated costs */
558:
559: /* */
560:
561: /* p_api_version Standard IN param */
562:
563: /* p_commit Standard IN param */
564:
565: /* p_init_msg_list Standard IN param */
559: /* */
560:
561: /* p_api_version Standard IN param */
562:
563: /* p_commit Standard IN param */
564:
565: /* p_init_msg_list Standard IN param */
566:
567: /* p_validation_level Standard IN param */
561: /* p_api_version Standard IN param */
562:
563: /* p_commit Standard IN param */
564:
565: /* p_init_msg_list Standard IN param */
566:
567: /* p_validation_level Standard IN param */
568:
569: /* p_repair_estimate_id Required Estimate ID to get est charges */
563: /* p_commit Standard IN param */
564:
565: /* p_init_msg_list Standard IN param */
566:
567: /* p_validation_level Standard IN param */
568:
569: /* p_repair_estimate_id Required Estimate ID to get est charges */
570:
571: /* p_organization_id Required Organization Id */
579: /* x_profit MLE Profit */
580:
581: /* x_profit_margin MLE Profit Margin (%) */
582:
583: /* x_return_status Standard OUT param */
584:
585: /* x_msg_count Standard OUT param */
586:
587: /* x_msg_data Standard OUT param */
581: /* x_profit_margin MLE Profit Margin (%) */
582:
583: /* x_return_status Standard OUT param */
584:
585: /* x_msg_count Standard OUT param */
586:
587: /* x_msg_data Standard OUT param */
588:
589: /* */
583: /* x_return_status Standard OUT param */
584:
585: /* x_msg_count Standard OUT param */
586:
587: /* x_msg_data Standard OUT param */
588:
589: /* */
590:
591: /*----------------------------------------------------------------*/
619: l_mod_name varchar2(2000) := 'csd.plsql.csd_cost_analysis_pvt.Compare_EstChargesAndCosts';
620:
621: BEGIN
622:
623: -- Standard Start of API savepoint to the database
624: --- No need to have savepoint because no update
625:
626: -- SAVEPOINT Compare_EstChargesAndCosts_Pvt;
627:
624: --- No need to have savepoint because no update
625:
626: -- SAVEPOINT Compare_EstChargesAndCosts_Pvt;
627:
628: -- Standard call to check for call compatibility.
629:
630: IF NOT FND_API.Compatible_API_Call(l_api_version,
631: p_api_version,
632: l_api_name,
746: --
747: -- End API Body
748: --
749:
750: -- Standard check of p_commit.
751:
752: IF FND_API.To_Boolean(p_commit)
753: THEN
754: COMMIT WORK;
753: THEN
754: COMMIT WORK;
755: END IF;
756:
757: -- Standard call to get message count and IF count is get message info.
758:
759: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
760: EXCEPTION
761: WHEN FND_API.G_EXC_ERROR THEN
823: /* */
824:
825: /* */
826:
827: /* p_api_version Standard IN param */
828:
829: /* p_commit Standard IN param */
830:
831: /* p_init_msg_list Standard IN param */
825: /* */
826:
827: /* p_api_version Standard IN param */
828:
829: /* p_commit Standard IN param */
830:
831: /* p_init_msg_list Standard IN param */
832:
833: /* p_validation_level Standard IN param */
827: /* p_api_version Standard IN param */
828:
829: /* p_commit Standard IN param */
830:
831: /* p_init_msg_list Standard IN param */
832:
833: /* p_validation_level Standard IN param */
834:
835: /* p_inventory_item_id Inventory Item ID */
829: /* p_commit Standard IN param */
830:
831: /* p_init_msg_list Standard IN param */
832:
833: /* p_validation_level Standard IN param */
834:
835: /* p_inventory_item_id Inventory Item ID */
836:
837: /* p_quantity Quantity of Inventory Items */
843: /* p_currency_code Currency of Charge Amt */
844:
845: /* x_item_cost Item cost of Inv Item */
846:
847: /* x_return_status Standard OUT param */
848:
849: /* x_msg_count Standard OUT param */
850:
851: /* x_msg_data Standard OUT param */
845: /* x_item_cost Item cost of Inv Item */
846:
847: /* x_return_status Standard OUT param */
848:
849: /* x_msg_count Standard OUT param */
850:
851: /* x_msg_data Standard OUT param */
852:
853: /* */
847: /* x_return_status Standard OUT param */
848:
849: /* x_msg_count Standard OUT param */
850:
851: /* x_msg_data Standard OUT param */
852:
853: /* */
854:
855: /*----------------------------------------------------------------*/
867: p_chg_line_uom_code IN VARCHAR2, --
868: x_item_cost OUT NOCOPY NUMBER
869: )
870: IS
871: --Curcor to get item cost for an item. We only cosider standard/frozen costing type.
872: CURSOR cur_getItemCost(p_inventory_item_id NUMBER,
873: p_organization_id NUMBER)
874: IS
875: SELECT CIC.item_cost
875: SELECT CIC.item_cost
876: FROM CST_ITEM_COSTS CIC
877: WHERE CIC.inventory_item_id = p_inventory_item_id
878: AND CIC.organization_id = p_organization_id
879: AND CIC.cost_type_id = 1; -- standard/frozen cost
880:
881: --Cursor to get primary_uom_code (item cost uom) for a given item
882: CURSOR cur_getPrimaryUomCode(p_inventory_item_id NUMBER,
883: p_organization_id NUMBER)
906: l_mod_name varchar2(2000) := 'csd.plsql.csd_cost_analysis_pvt.Get_InvItemCost';
907:
908: BEGIN
909:
910: -- Standard Start of API savepoint
911:
912: SAVEPOINT Get_InvItemCostAnalysis_Pvt;
913:
914: -- Standard call to check for call compatibility.
910: -- Standard Start of API savepoint
911:
912: SAVEPOINT Get_InvItemCostAnalysis_Pvt;
913:
914: -- Standard call to check for call compatibility.
915:
916: IF NOT FND_API.Compatible_API_Call(l_api_version,
917: p_api_version,
918: l_api_name,
1041: --
1042: -- End API Body
1043: --
1044:
1045: -- Standard check of p_commit.
1046:
1047: IF FND_API.To_Boolean(p_commit)
1048: THEN
1049: COMMIT WORK;
1048: THEN
1049: COMMIT WORK;
1050: END IF;
1051:
1052: -- Standard call to get message count and IF count is get message info.
1053:
1054: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1055: EXCEPTION
1056: WHEN FND_API.G_EXC_ERROR THEN
1117:
1118: /* This is a new API. During code review it was suggested that */
1119:
1120: /* since it will never be called independently, there is no need */
1121: /* to use standard input parameters. Hence I am removing them in */
1122: /* the new API. */
1123:
1124: /* x_return_status Standard OUT param */
1125:
1120: /* since it will never be called independently, there is no need */
1121: /* to use standard input parameters. Hence I am removing them in */
1122: /* the new API. */
1123:
1124: /* x_return_status Standard OUT param */
1125:
1126: /* x_msg_count Standard OUT param */
1127:
1128: /* x_msg_data Standard OUT param */
1122: /* the new API. */
1123:
1124: /* x_return_status Standard OUT param */
1125:
1126: /* x_msg_count Standard OUT param */
1127:
1128: /* x_msg_data Standard OUT param */
1129:
1130: /* p_inventory_item_id Inventory item id for the labor item */
1124: /* x_return_status Standard OUT param */
1125:
1126: /* x_msg_count Standard OUT param */
1127:
1128: /* x_msg_data Standard OUT param */
1129:
1130: /* p_inventory_item_id Inventory item id for the labor item */
1131: /* p_organization_id Inventory Organization ID (Service validation org) */
1132:
1156: p_chg_line_uom_code IN VARCHAR2,
1157: x_item_cost OUT NOCOPY NUMBER
1158: )
1159: IS
1160: --Cursor to get item cost for an item. We only cosider standard/frozen costing type.
1161: CURSOR cur_getItemCost(p_inventory_item_id NUMBER,
1162: p_organization_id NUMBER)
1163: IS
1164: SELECT CIC.item_cost
1164: SELECT CIC.item_cost
1165: FROM CST_ITEM_COSTS CIC
1166: WHERE CIC.inventory_item_id = p_inventory_item_id
1167: AND CIC.organization_id = p_organization_id
1168: AND CIC.cost_type_id = 1; -- standard/frozen cost
1169:
1170: --Cursor to get resource cost for a resource id. We only consider standard/frozen costing type.
1171: CURSOR cur_getResCost(p_bom_resorce_id NUMBER,
1172: p_organization_id NUMBER)
1166: WHERE CIC.inventory_item_id = p_inventory_item_id
1167: AND CIC.organization_id = p_organization_id
1168: AND CIC.cost_type_id = 1; -- standard/frozen cost
1169:
1170: --Cursor to get resource cost for a resource id. We only consider standard/frozen costing type.
1171: CURSOR cur_getResCost(p_bom_resorce_id NUMBER,
1172: p_organization_id NUMBER)
1173: IS
1174: SELECT CRC.resource_rate
1174: SELECT CRC.resource_rate
1175: FROM cst_resource_costs CRC
1176: WHERE CRC.resource_id = p_bom_resource_id
1177: AND CRC.organization_id = p_organization_id
1178: AND CRC.cost_type_id = 1; -- standard/frozen cost
1179:
1180: --Cursor to get resource UOM code for the given resource id
1181: CURSOR cur_getResUOMCode (p_bom_resource_id NUMBER)
1182: IS
1332: --
1333: -- End API Body
1334: --
1335:
1336: -- Standard call to get message count and IF count is get message info.
1337:
1338: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1339: EXCEPTION
1340: WHEN FND_API.G_EXC_ERROR THEN