[Home] [Help]
55: l_debug VARCHAR2(80);
56:
57: BEGIN
58:
59: -- Standard Start of API savepoint
60: SAVEPOINT Process_MatCost_PUB;
61: l_debug := fnd_profile.value('MRP_DEBUG');
62:
63:
60: SAVEPOINT Process_MatCost_PUB;
61: l_debug := fnd_profile.value('MRP_DEBUG');
62:
63:
64: -- Standard call to check for call compatibility
65: IF NOT FND_API.Compatible_API_Call (
66: l_api_version,
67: p_api_version,
68: l_api_name,
139: FND_MSG_pub.add;
140: RAISE FND_API.g_exc_error;
141: END IF;
142:
143: --- Standard check of p_commit
144: IF FND_API.to_Boolean(p_commit) THEN
145: COMMIT WORK;
146: END IF;
147:
144: IF FND_API.to_Boolean(p_commit) THEN
145: COMMIT WORK;
146: END IF;
147:
148: -- Standard Call to get message count and if count = 1, get message info
149: FND_MSG_PUB.Count_And_Get (
150: p_count => x_msg_count,
151: p_data => x_msg_data );
152:
267: AND we.entity_type in (6,7));
268:
269: BEGIN
270:
271: -- Standard Start of API savepoint
272: SAVEPOINT Process_ResCost_PUB;
273: l_debug := fnd_profile.value('MRP_DEBUG');
274:
275:
277: fnd_file.put_line(fnd_file.log, 'In process_resCost');
278: end if;
279:
280:
281: -- Standard call to check for call compatibility
282: IF NOT FND_API.Compatible_API_Call (
283: l_api_version,
284: p_api_version,
285: l_api_name,
356: END IF;
357:
358: END LOOP;
359:
360: --- Standard check of p_commit
361: IF FND_API.to_Boolean(p_commit) THEN
362: COMMIT WORK;
363: END IF;
364:
361: IF FND_API.to_Boolean(p_commit) THEN
362: COMMIT WORK;
363: END IF;
364:
365: -- Standard Call to get message count and if count = 1, get message info
366: FND_MSG_PUB.Count_And_Get (
367: p_count => x_msg_count,
368: p_data => x_msg_data );
369:
509: l_approved_date DATE;
510:
511: BEGIN
512:
513: -- Standard Start of API savepoint
514: SAVEPOINT Update_eamCost_PUB;
515: l_debug := fnd_profile.value('MRP_DEBUG');
516:
517: if (l_debug = 'Y') then
517: if (l_debug = 'Y') then
518: fnd_file.put_line(fnd_file.log, 'In Update_eamCost');
519: end if;
520:
521: -- Standard call to check for call compatibility
522: IF NOT FND_API.Compatible_API_Call (
523: l_api_version,
524: p_api_version,
525: l_api_name,
722: FND_MSG_pub.add;
723: RAISE FND_API.g_exc_error;
724: END IF;
725:
726: --- Standard check of p_commit
727: IF FND_API.to_Boolean(p_commit) THEN
728: COMMIT WORK;
729: END IF;
730:
727: IF FND_API.to_Boolean(p_commit) THEN
728: COMMIT WORK;
729: END IF;
730:
731: -- Standard Call to get message count and if count = 1, get message info
732: FND_MSG_PUB.Count_And_Get (
733: p_count => x_msg_count,
734: p_data => x_msg_data );
735:
905:
906: BEGIN
907:
908:
909: -- Standard Start of API savepoint
910: SAVEPOINT InsertUpdate_eamPerBal_PUB;
911: l_debug := fnd_profile.value('MRP_DEBUG');
912:
913: if (l_debug = 'Y') then
914: FND_FILE.PUT_LINE(fnd_file.log,'In InsertUpdate_eamPerBal');
915: FND_FILE.PUT_LINE(fnd_file.log,'p_asset_group_id: ' || to_char( p_asset_group_id ));
916: end if;
917:
918: -- Standard call to check for call compatibility
919: IF NOT FND_API.Compatible_API_Call (
920: l_api_version,
921: p_api_version,
922: l_api_name,
1329: if (l_debug = 'Y') then
1330: FND_FILE.PUT_LINE(fnd_file.log,'inserted into cst_eam_asset_per_balances' );
1331: end if;
1332:
1333: -- Standard check of p_commit
1334: IF FND_API.to_Boolean(p_commit) THEN
1335: COMMIT WORK;
1336: END IF;
1337:
1334: IF FND_API.to_Boolean(p_commit) THEN
1335: COMMIT WORK;
1336: END IF;
1337:
1338: -- Standard Call to get message count and if count = 1, get message info
1339: FND_MSG_PUB.Count_And_Get (
1340: p_count => x_msg_count,
1341: p_data => x_msg_data );
1342:
1472:
1473: l_debug VARCHAR2(1);
1474:
1475: BEGIN
1476: -- Standard Start of API savepoint
1477: SAVEPOINT InsertUpdate_assetPerBal_PUB;
1478: l_debug := fnd_profile.value('MRP_DEBUG');
1479:
1480: if (l_debug = 'Y') then
1481: FND_FILE.PUT_LINE(fnd_file.log,'In InsertUpdate_assetPerBal');
1482: FND_FILE.PUT_LINE(fnd_file.log,'p_asset_group_id: ' || to_char( p_asset_group_id ));
1483: end if;
1484:
1485: -- Standard call to check for call compatibility
1486: IF NOT FND_API.Compatible_API_Call (
1487: l_api_version,
1488: p_api_version,
1489: l_api_name,
1590: );
1591: END IF; -- end checking asset balance rowcount
1592:
1593:
1594: -- Standard check of p_commit
1595: IF FND_API.to_Boolean(p_commit) THEN
1596: COMMIT WORK;
1597: END IF;
1598:
1595: IF FND_API.to_Boolean(p_commit) THEN
1596: COMMIT WORK;
1597: END IF;
1598:
1599: -- Standard Call to get message count and if count = 1, get message info
1600: FND_MSG_PUB.Count_And_Get (
1601: p_count => x_msg_count,
1602: p_data => x_msg_data );
1603:
2020: maint_cost_category;
2021:
2022: BEGIN
2023:
2024: -- Standard Start of API savepoint
2025: SAVEPOINT Delete_eamPerBal_PUB;
2026:
2027: -- Standard call to check for call compatibility
2028: IF NOT FND_API.Compatible_API_Call (
2023:
2024: -- Standard Start of API savepoint
2025: SAVEPOINT Delete_eamPerBal_PUB;
2026:
2027: -- Standard call to check for call compatibility
2028: IF NOT FND_API.Compatible_API_Call (
2029: l_api_version,
2030: p_api_version,
2031: l_api_name,
2552: * decode(wor.basis_type,
2553: 1, l_lot_size,
2554: 2, 1,
2555: 1) usage_rate_or_amount,
2556: wor.standard_rate_flag standard_flag,
2557: wor.department_id department_id,
2558: br.functional_currency_flag functional_currency_flag,
2559: br.cost_element_id cost_element_id,
2560: br.resource_type resource_type
2903: l_mfg_cost_element_id Number;
2904:
2905: BEGIN
2906: -------------------------------------------------------------------------
2907: -- standard start of API savepoint
2908: -------------------------------------------------------------------------
2909: SAVEPOINT Compute_Job_Estimate;
2910:
2911: -------------------------------------------------------------------------
2908: -------------------------------------------------------------------------
2909: SAVEPOINT Compute_Job_Estimate;
2910:
2911: -------------------------------------------------------------------------
2912: -- standard call to check for call compatibility
2913: -------------------------------------------------------------------------
2914: IF NOT fnd_api.compatible_api_call (
2915: l_api_version,
2916: p_api_version,
4043: AND wro.department_id = c_wro_rec.department_id
4044: AND wro.operation_seq_num = c_wro_rec.operation_seq_num
4045: AND wdj.organization_id = wro.organization_id ;/* Bug 5230287 */
4046:
4047: /* NOTE: joining to ccicv.cost_group_id of 1 for standard costing org.
4048: for ccicv, using default cost group id for that org is not
4049: needed in the case of standard costing. */
4050:
4051: END LOOP;
4045: AND wdj.organization_id = wro.organization_id ;/* Bug 5230287 */
4046:
4047: /* NOTE: joining to ccicv.cost_group_id of 1 for standard costing org.
4048: for ccicv, using default cost group id for that org is not
4049: needed in the case of standard costing. */
4050:
4051: END LOOP;
4052:
4053: l_stmt_num := 130;
4967:
4968: END LOOP;
4969:
4970: ---------------------------------------------------------------------------
4971: -- Standard check of p_commit
4972: ---------------------------------------------------------------------------
4973:
4974: IF FND_API.to_Boolean(p_commit) THEN
4975: COMMIT WORK;
4975: COMMIT WORK;
4976: END IF;
4977:
4978: ---------------------------------------------------------------------------
4979: -- Standard Call to get message count and if count = 1, get message info
4980: ---------------------------------------------------------------------------
4981:
4982: FND_MSG_PUB.Count_And_Get (
4983: p_count => x_msg_count,
5079:
5080: l_maintenance_object_id NUMBER;
5081: BEGIN
5082: ---------------------------------------------
5083: -- Standard start of API savepoint
5084: ---------------------------------------------
5085: SAVEPOINT Rollup_Cost_PUB;
5086:
5087: ------------------------------------------------
5084: ---------------------------------------------
5085: SAVEPOINT Rollup_Cost_PUB;
5086:
5087: ------------------------------------------------
5088: -- Standard call to check for API compatibility
5089: ------------------------------------------------
5090: l_statement := 10;
5091: IF not fnd_api.compatible_api_call (
5092: l_api_version,
5410: RAISE fnd_api.g_exc_error;
5411: END IF;
5412:
5413: ---------------------------------------------------------------------------
5414: -- Standard check of p_commit
5415: ---------------------------------------------------------------------------
5416: l_statement := 110;
5417: IF FND_API.to_Boolean(p_commit) THEN
5418: COMMIT WORK;
5418: COMMIT WORK;
5419: END IF;
5420:
5421: ---------------------------------------------------------------------------
5422: -- Standard Call to get message count and if count = 1, get message info
5423: ---------------------------------------------------------------------------
5424: l_statement := 120;
5425: fnd_msg_pub.count_and_get (p_count => x_msg_count,
5426: p_data => x_msg_data );
5492: l_statement NUMBER := 0;
5493:
5494: BEGIN
5495: ---------------------------------------------
5496: -- Standard start of API savepoint
5497: ---------------------------------------------
5498: SAVEPOINT Purge_Rollup_Cost_PUB;
5499:
5500: ------------------------------------------------
5497: ---------------------------------------------
5498: SAVEPOINT Purge_Rollup_Cost_PUB;
5499:
5500: ------------------------------------------------
5501: -- Standard call to check for API compatibility
5502: ------------------------------------------------
5503: l_statement := 10;
5504: IF not fnd_api.compatible_api_call (
5505: l_api_version,
5537: DELETE cst_eam_rollup_temp
5538: WHERE group_id= p_group_id;
5539:
5540: ---------------------------------------------------------------------------
5541: -- Standard check of p_commit
5542: ---------------------------------------------------------------------------
5543: l_statement := 60;
5544: IF FND_API.to_Boolean(p_commit) THEN
5545: COMMIT WORK;
5545: COMMIT WORK;
5546: END IF;
5547:
5548: ---------------------------------------------------------------------------
5549: -- Standard Call to get message count and if count = 1, get message info
5550: ---------------------------------------------------------------------------
5551: l_statement := 70;
5552: fnd_msg_pub.count_and_get (p_count => x_msg_count,
5553: p_data => x_msg_data );
5630: l_interface_txn_id NUMBER;
5631:
5632: BEGIN
5633:
5634: -- Standard Start of API savepoint
5635: SAVEPOINT check_if_direct_item_PUB;
5636: l_debug := fnd_profile.value('MRP_DEBUG');
5637:
5638: if (l_debug = 'Y') then
5638: if (l_debug = 'Y') then
5639: FND_FILE.PUT_LINE(fnd_file.log,'Check if direct item');
5640: end if;
5641:
5642: -- Standard call to check for call compatibility
5643: IF NOT FND_API.Compatible_API_Call (
5644: l_api_version,
5645: p_api_version,
5646: l_api_name,
5760: if (l_debug = 'Y') then
5761: fnd_file.put_line(fnd_file.log,'Direct item flag : ' || to_char(x_direct_item_flag));
5762: end if;
5763:
5764: -- Standard check of p_commit
5765: IF FND_API.to_Boolean(p_commit) THEN
5766: COMMIT WORK;
5767: END IF;
5768:
5765: IF FND_API.to_Boolean(p_commit) THEN
5766: COMMIT WORK;
5767: END IF;
5768:
5769: -- Standard Call to get message count and if count = 1, get message info
5770: FND_MSG_PUB.Count_And_Get (
5771: p_count => x_msg_count,
5772: p_data => x_msg_data );
5773:
5886: l_po_order_type_lookup_code VARCHAR2(20);
5887:
5888: BEGIN
5889:
5890: -- Standard Start of API savepoint
5891: SAVEPOINT process_direct_item_txn_PUB;
5892:
5893: l_debug := fnd_profile.value('MRP_DEBUG');
5894:
5891: SAVEPOINT process_direct_item_txn_PUB;
5892:
5893: l_debug := fnd_profile.value('MRP_DEBUG');
5894:
5895: -- Standard call to check for call compatibility
5896: IF NOT FND_API.Compatible_API_Call (
5897: l_api_version,
5898: p_api_version,
5899: l_api_name,
6044: l_directItem_rec.program_update_date,
6045: l_directItem_rec.project_id,
6046: l_directItem_rec.reason_id,
6047: l_directItem_rec.reference,
6048: l_directItem_rec.standard_rate_flag,
6049: l_directItem_rec.task_id,
6050: l_directItem_rec.transaction_date,
6051: l_directItem_rec.transaction_quantity,
6052: l_directItem_rec.transaction_type,
6193: l_directItem_rec.program_update_date,
6194: l_directItem_rec.project_id,
6195: l_directItem_rec.reason_id,
6196: l_directItem_rec.reference,
6197: l_directItem_rec.standard_rate_flag,
6198: l_directItem_rec.task_id,
6199: l_directItem_rec.transaction_date,
6200: l_directItem_rec.transaction_quantity,
6201: l_directItem_rec.transaction_type,
6338: FND_MSG_pub.add;
6339: RAISE FND_API.g_exc_error;
6340: END IF;
6341:
6342: -- Standard check of p_commit
6343: IF FND_API.to_Boolean(p_commit) THEN
6344: COMMIT WORK;
6345: END IF;
6346:
6343: IF FND_API.to_Boolean(p_commit) THEN
6344: COMMIT WORK;
6345: END IF;
6346:
6347: -- Standard Call to get message count and if count = 1, get message info
6348: FND_MSG_PUB.Count_And_Get (
6349: p_count => x_msg_count,
6350: p_data => x_msg_data );
6351:
6471:
6472:
6473: BEGIN
6474:
6475: -- Standard Start of API savepoint
6476: SAVEPOINT cost_direct_item_txn_PUB;
6477:
6478: l_debug := fnd_profile.value('MRP_DEBUG');
6479:
6476: SAVEPOINT cost_direct_item_txn_PUB;
6477:
6478: l_debug := fnd_profile.value('MRP_DEBUG');
6479:
6480: -- Standard call to check for call compatibility
6481: IF NOT FND_API.Compatible_API_Call (
6482: l_api_version,
6483: p_api_version,
6484: l_api_name,
6508: l_stmt_num := 60;
6509: -- Obtain transaction value and line type
6510:
6511: /* Added the select statements in the IF clause for bug 4683371. The transaction value is
6512: first calculated and then rounded with standard precision of the functional currency*/
6513:
6514: /* Removed the select statement that fetched actual resource rate in functional
6515: currency for IPV xrf txns as actual resource rate is correctly populated in WCTI,
6516: no need to convert the value. Bug 5360723 */
6760: delete from wip_cost_txn_interface
6761: where group_id = p_group_id
6762: and process_status = 2;
6763:
6764: -- Standard check of p_commit
6765: IF FND_API.to_Boolean(p_commit) THEN
6766: COMMIT WORK;
6767: END IF;
6768:
6765: IF FND_API.to_Boolean(p_commit) THEN
6766: COMMIT WORK;
6767: END IF;
6768:
6769: -- Standard Call to get message count and if count = 1, get message info
6770: FND_MSG_PUB.Count_And_Get (
6771: p_count => x_msg_count,
6772: p_data => x_msg_data );
6773:
6873: l_debug VARCHAR2(80);
6874:
6875: BEGIN
6876:
6877: -- Standard Start of API savepoint
6878: SAVEPOINT insert_direct_item_distr_PUB;
6879:
6880: l_debug := fnd_profile.value('MRP_DEBUG');
6881:
6878: SAVEPOINT insert_direct_item_distr_PUB;
6879:
6880: l_debug := fnd_profile.value('MRP_DEBUG');
6881:
6882: -- Standard call to check for call compatibility
6883: IF NOT FND_API.Compatible_API_Call (
6884: l_api_version,
6885: p_api_version,
6886: l_api_name,
7047: sysdate
7048: FROM wip_cost_txn_interface wcti
7049: WHERE wcti.transaction_id = p_txn_id;
7050:
7051: -- Standard check of p_commit
7052: IF FND_API.to_Boolean(p_commit) THEN
7053: COMMIT WORK;
7054: END IF;
7055:
7052: IF FND_API.to_Boolean(p_commit) THEN
7053: COMMIT WORK;
7054: END IF;
7055:
7056: -- Standard Call to get message count and if count = 1, get message info
7057: FND_MSG_PUB.Count_And_Get (
7058: p_count => x_msg_count,
7059: p_data => x_msg_data );
7060:
7148: l_update_stmt VARCHAR2(2000) := NULL;
7149:
7150: BEGIN
7151: ---------------------------------------------
7152: -- Standard start of API savepoint
7153: ---------------------------------------------
7154: SAVEPOINT update_wip_period_balances_PUB;
7155:
7156: l_debug := fnd_profile.value('MRP_DEBUG');
7155:
7156: l_debug := fnd_profile.value('MRP_DEBUG');
7157:
7158: ------------------------------------------------
7159: -- Standard call to check for API compatibility
7160: ------------------------------------------------
7161: l_statement := 10;
7162: IF not fnd_api.compatible_api_call (
7163: l_api_version,
7232: end if;
7233:
7234: /* Bug 4321505 - Modified the dynamic update query to remove literals
7235: in the SQL and use bind variables instead. This is to make the SQL
7236: comply with PL/SQL Standards */
7237:
7238: if l_cost_element = 1 then
7239: l_update_stmt := 'UPDATE wip_period_balances ' ||
7240: 'SET pl_material_in = nvl( pl_material_in, 0) + :l_txn_value , ' ||
7285: EXECUTE IMMEDIATE l_update_stmt USING
7286: l_txn_value, p_user_id, p_login_id, p_request_id, p_prg_appl_id, p_prg_id,
7287: p_wip_entity_id, p_acct_period_id;
7288:
7289: -- Standard check of p_commit
7290: IF FND_API.to_Boolean(p_commit) THEN
7291: COMMIT WORK;
7292: END IF;
7293:
7290: IF FND_API.to_Boolean(p_commit) THEN
7291: COMMIT WORK;
7292: END IF;
7293:
7294: -- Standard Call to get message count and if count = 1, get message info
7295: FND_MSG_PUB.Count_And_Get (
7296: p_count => x_msg_count,
7297: p_data => x_msg_data );
7298:
7371: l_debug VARCHAR2(80);
7372:
7373: BEGIN
7374:
7375: -- Standard Start of API savepoint
7376: SAVEPOINT insert_direct_item_txn_PUB;
7377:
7378: l_debug := fnd_profile.value('MRP_DEBUG');
7379:
7376: SAVEPOINT insert_direct_item_txn_PUB;
7377:
7378: l_debug := fnd_profile.value('MRP_DEBUG');
7379:
7380: -- Standard call to check for call compatibility
7381: IF NOT FND_API.Compatible_API_Call (
7382: l_api_version,
7383: p_api_version,
7384: l_api_name,
7420: line_id,
7421: source_code,
7422: source_line_id,
7423: operation_seq_num,
7424: standard_rate_flag,
7425: usage_rate_or_amount,
7426: basis_type,
7427: transaction_quantity,
7428: transaction_uom,
7461: wcti.line_id,
7462: wcti.source_code,
7463: wcti.source_line_id,
7464: wcti.operation_seq_num,
7465: wcti.standard_rate_flag,
7466: wcti.usage_rate_or_amount,
7467: wcti.basis_type,
7468: decode(wcti.source_code,'IPV',NULL,wcti.transaction_quantity),
7469: wcti.transaction_uom,
7489: from wip_cost_txn_interface wcti
7490: where group_id = p_group_id
7491: and process_status = 2;
7492:
7493: -- Standard check of p_commit
7494: IF FND_API.to_Boolean(p_commit) THEN
7495: COMMIT WORK;
7496: END IF;
7497:
7494: IF FND_API.to_Boolean(p_commit) THEN
7495: COMMIT WORK;
7496: END IF;
7497:
7498: -- Standard Call to get message count and if count = 1, get message info
7499: FND_MSG_PUB.Count_And_Get (
7500: p_count => x_msg_count,
7501: p_data => x_msg_data );
7502:
7595:
7596: BEGIN
7597:
7598: ---------------------------------------------
7599: -- Standard start of API savepoint
7600: ---------------------------------------------
7601: SAVEPOINT get_Direct_Item_Charge_Acct;
7602:
7603: ------------------------------------------------
7600: ---------------------------------------------
7601: SAVEPOINT get_Direct_Item_Charge_Acct;
7602:
7603: ------------------------------------------------
7604: -- Standard call to check for API compatibility
7605: ------------------------------------------------
7606: l_statement := 10;
7607: IF not fnd_api.compatible_api_call (
7608: l_api_version,
7739: l_validate_flag NUMBER := 0;
7740: l_hook NUMBER := 0;
7741:
7742: BEGIN
7743: -- Standard start of API savepoint
7744: SAVEPOINT validate_for_reestimation_PUB;
7745:
7746: -- Standard call to check for call compatibility
7747: IF NOT FND_API.Compatible_API_Call (
7742: BEGIN
7743: -- Standard start of API savepoint
7744: SAVEPOINT validate_for_reestimation_PUB;
7745:
7746: -- Standard call to check for call compatibility
7747: IF NOT FND_API.Compatible_API_Call (
7748: l_api_version,
7749: p_api_version,
7750: l_api_name,
7801: else
7802: x_validate_flag := 0;
7803: end if;
7804:
7805: -- Standard check of p_commit
7806: IF FND_API.to_Boolean(p_commit) THEN
7807: COMMIT WORK;
7808: END IF;
7809:
7806: IF FND_API.to_Boolean(p_commit) THEN
7807: COMMIT WORK;
7808: END IF;
7809:
7810: -- Standard Call to get message count and if count = 1, get message info
7811: FND_MSG_PUB.Count_And_Get (
7812: p_count => x_msg_count,
7813: p_data => x_msg_data );
7814:
7983:
7984: BEGIN
7985:
7986: -------------------------------------------------------------------------
7987: -- standard start of API savepoint
7988: -------------------------------------------------------------------------
7989: SAVEPOINT Redistribute_WIP_Accounts;
7990:
7991: -------------------------------------------------------------------------
7988: -------------------------------------------------------------------------
7989: SAVEPOINT Redistribute_WIP_Accounts;
7990:
7991: -------------------------------------------------------------------------
7992: -- standard call to check for call compatibility
7993: -------------------------------------------------------------------------
7994: IF NOT fnd_api.compatible_api_call (
7995: l_api_version,
7996: p_api_version,
8309: END LOOP; --for route jobs
8310:
8311: l_stmt_num := 75;
8312: ---------------------------------------------------------------------------
8313: -- Standard check of p_commit
8314: ---------------------------------------------------------------------------
8315:
8316: IF FND_API.to_Boolean(p_commit) THEN
8317: COMMIT WORK;
8317: COMMIT WORK;
8318: END IF;
8319:
8320: ---------------------------------------------------------------------------
8321: -- Standard Call to get message count and if count = 1, get message info
8322: ---------------------------------------------------------------------------
8323:
8324: FND_MSG_PUB.Count_And_Get (
8325: p_count => x_msg_count,
8413: l_maint_object_id wip_discrete_jobs.maintenance_object_source%TYPE;
8414: l_inventory_item_id csi_item_instances.inventory_item_id%TYPE;
8415: l_serial_number csi_item_instances.serial_number%TYPE;
8416: BEGIN
8417: -- Standard call to check for call compatibility
8418: IF NOT FND_API.Compatible_API_Call(l_api_version,p_api_version,l_api_name,G_PKG_NAME) THEN
8419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8420: END IF;
8421:
8489: x_serial_number := NULL;
8490: x_maintenance_object_id := NULL;
8491: END IF;
8492:
8493: -- Standard Call to get message count and if count = 1, get message info
8494: l_stmt_num := 30;
8495: FND_MSG_PUB.Count_And_Get(
8496: p_count => x_msg_count,
8497: p_data => x_msg_data);
8574: l_rcv_txn_id NUMBER;
8575:
8576: BEGIN
8577: -----------------------------------
8578: -- Standard start of API savepoint
8579: -----------------------------------
8580: SAVEPOINT get_CostEle_for_DirectItem_PVT;
8581:
8582: l_debug := fnd_profile.value('MRP_DEBUG');
8584: fnd_file.put_line(fnd_file.log, 'In get_CostEle_for_DirectItem');
8585: end if;
8586:
8587: ------------------------------------------------
8588: -- Standard call to check for API compatibility
8589: ------------------------------------------------
8590: l_statement := 10;
8591: IF not fnd_api.compatible_api_call( l_api_version,
8592: p_api_version,
8783: end if;
8784:
8785: x_cost_element_id := l_cost_element_id;
8786:
8787: -- Standard Call to get message count and if count = 1, get message info
8788: FND_MSG_PUB.Count_And_Get (
8789: p_count => x_msg_count,
8790: p_data => x_msg_data );
8791:
8857: l_expenditure_type VARCHAR2(30);
8858:
8859: BEGIN
8860: -----------------------------------
8861: -- Standard start of API savepoint
8862: -----------------------------------
8863: SAVEPOINT get_ExpType_for_DirectItem_PVT;
8864:
8865: l_debug := fnd_profile.value('MRP_DEBUG');
8867: fnd_file.put_line(fnd_file.log, 'In get_ExpType_for_DirectItem');
8868: end if;
8869:
8870: ------------------------------------------------
8871: -- Standard call to check for API compatibility
8872: ------------------------------------------------
8873: l_statement := 10;
8874: IF not fnd_api.compatible_api_call( l_api_version,
8875: p_api_version,
8994: end if;
8995:
8996: x_expenditure_type := l_expenditure_type;
8997:
8998: -- Standard Call to get message count and if count = 1, get message info
8999: FND_MSG_PUB.Count_And_Get (
9000: p_count => x_msg_count,
9001: p_data => x_msg_data );
9002:
9048: l_stmt_num NUMBER := 0;
9049: l_object_type_count NUMBER;
9050: l_object_type_exc EXCEPTION;
9051: BEGIN
9052: -- Standard Start of API savepoint
9053: SAVEPOINT Rollup_WorkOrderCost_PUB;
9054:
9055: -- Initialize message list if p_init_msg_list is set to TRUE
9056: IF FND_API.to_Boolean(p_init_msg_list) THEN
9298: l_api_version CONSTANT NUMBER := 1.0;
9299: l_msg_level_threshold NUMBER;
9300: l_stmt_num NUMBER := 0;
9301: BEGIN
9302: -- Standard Start of API savepoint
9303: SAVEPOINT Purge_RollupCost_PUB;
9304:
9305: -- Initialize message list if p_init_msg_list is set to TRUE
9306: IF FND_API.to_Boolean(p_init_msg_list) THEN
9456: l_cnt_cebba NUMBER;
9457: l_stmt_num NUMBER;
9458:
9459: BEGIN
9460: -- Standard Start of API savepoint
9461: SAVEPOINT Insert_eamBalAcct_PUB;
9462:
9463: if( l_pLog ) then
9464: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
9480: 'p_value=' || p_value ||',' ||
9481: ')');
9482: end if;
9483:
9484: -- Standard call to check for call compatibility.
9485: IF NOT FND_API.Compatible_API_Call ( l_api_version,
9486: p_api_version,
9487: l_api_name ,
9488: 'CST_eamCost_PUB')
9574: p_login_id
9575: );
9576:
9577:
9578: -- Standard check of p_commit.
9579: IF FND_API.To_Boolean( p_commit ) THEN
9580: COMMIT WORK;
9581: END IF;
9582:
9589: 'End of ' || l_full_name
9590: );
9591: END IF;
9592:
9593: -- Standard call to get message count and if count is 1, get message info.
9594: FND_MSG_PUB.Count_And_Get
9595: ( p_count => x_msg_count ,
9596: p_data => x_msg_data
9597: );
9673: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
9674:
9675: l_stmt_num NUMBER;
9676: BEGIN
9677: -- Standard Start of API savepoint
9678: SAVEPOINT Delete_eamBalAcct_PUB;
9679: -- Standard call to check for call compatibility.
9680: IF NOT FND_API.Compatible_API_Call ( l_api_version,
9681: p_api_version,
9675: l_stmt_num NUMBER;
9676: BEGIN
9677: -- Standard Start of API savepoint
9678: SAVEPOINT Delete_eamBalAcct_PUB;
9679: -- Standard call to check for call compatibility.
9680: IF NOT FND_API.Compatible_API_Call ( l_api_version,
9681: p_api_version,
9682: l_api_name ,
9683: 'CST_eamCost_PUB')
9705: Delete from CST_EAM_BALANCE_BY_ACCOUNTS
9706: where wip_entity_id = p_entity_id_tab(l_index)
9707: and organization_id=p_org_id;
9708:
9709: -- Standard check of p_commit.
9710: IF FND_API.To_Boolean( p_commit ) THEN
9711: COMMIT WORK;
9712: END IF;
9713:
9719: 'End of ' || l_full_name
9720: );
9721: END IF;
9722:
9723: -- Standard call to get message count and if count is 1, get message info.
9724: FND_MSG_PUB.Count_And_Get
9725: ( p_count => x_msg_count ,
9726: p_data => x_msg_data
9727: );
9827: FOR UPDATE;
9828:
9829: BEGIN
9830:
9831: -- Standard Start of API savepoint
9832: SAVEPOINT Insert_tempEstimateDetails_PUB;
9833:
9834: -- Standard call to check for call compatibility.
9835: IF NOT FND_API.Compatible_API_Call (l_api_version,
9830:
9831: -- Standard Start of API savepoint
9832: SAVEPOINT Insert_tempEstimateDetails_PUB;
9833:
9834: -- Standard call to check for call compatibility.
9835: IF NOT FND_API.Compatible_API_Call (l_api_version,
9836: p_api_version,
9837: l_api_name ,
9838: 'CST_eamCost_PUB') THEN
10222: End if;
10223:
10224: l_stmt_num := 40;
10225:
10226: -- Standard check of p_commit.
10227: IF FND_API.To_Boolean( p_commit ) THEN
10228: COMMIT WORK;
10229: END IF;
10230:
10236: 'End of ' || l_full_name
10237: );
10238: END IF;
10239:
10240: -- Standard call to get message count and if count is 1, get message info.
10241: FND_MSG_PUB.Count_And_Get
10242: ( p_count => x_msg_count,
10243: p_data => x_msg_data
10244: );