[Home] [Help]
1: PACKAGE BODY DPP_ITEMCOST_PVT AS
2: /* $Header: dppvcstb.pls 120.34 2011/05/21 00:17:45 hekkiral noship $ */
3: -- Package name : DPP_ITEMCOST_PVT
4: -- Purpose :
5: -- History :
1: PACKAGE BODY DPP_ITEMCOST_PVT AS
2: /* $Header: dppvcstb.pls 120.34 2011/05/21 00:17:45 hekkiral noship $ */
3: -- Package name : DPP_ITEMCOST_PVT
4: -- Purpose :
5: -- History :
6: -- NOTE :
7: -- End of Comments
5: -- History :
6: -- NOTE :
7: -- End of Comments
8:
9: G_PKG_NAME CONSTANT VARCHAR2(30) := 'DPP_ITEMCOST_PVT';
10: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
11: G_FILE_NAME CONSTANT VARCHAR2(14) := 'dppvcstb.pls';
12: ---------------------------------------------------------------------
13: -- PROCEDURE
78: exception
79: when others then
80: Fnd_Message.Set_Name('FND', 'CP-Generic oracle error');
81: Fnd_Message.Set_Token('ERROR', substr(SQLERRM, 1, 80), FALSE);
82: Fnd_Message.Set_Token('ROUTINE','DPP_ITEMCOST_PVT.wait_for_rec_processing', FALSE);
83: FND_MSG_PUB.add;
84: return FALSE;
85: end wait_for_rec_processing;
86:
157: l_correct_item VARCHAR2(1) := 'Y';
158: l_insert_xla_header VARCHAR2(1) := 'N';
159: --- End Added for A/c Generator W/f ---
160:
161: l_txn_hdr_rec DPP_ITEMCOST_PVT.dpp_cst_hdr_rec_type := p_txn_hdr_rec;
162: l_item_cost_tbl DPP_ITEMCOST_PVT.dpp_txn_line_tbl_type := p_item_cost_tbl;
163: l_inv_org_details_tbl DPP_ITEMCOST_PVT.inv_org_details_tbl_type;
164:
165: l_exe_update_rec DPP_ExecutionDetails_PVT.dpp_exe_update_rec_type;
158: l_insert_xla_header VARCHAR2(1) := 'N';
159: --- End Added for A/c Generator W/f ---
160:
161: l_txn_hdr_rec DPP_ITEMCOST_PVT.dpp_cst_hdr_rec_type := p_txn_hdr_rec;
162: l_item_cost_tbl DPP_ITEMCOST_PVT.dpp_txn_line_tbl_type := p_item_cost_tbl;
163: l_inv_org_details_tbl DPP_ITEMCOST_PVT.inv_org_details_tbl_type;
164:
165: l_exe_update_rec DPP_ExecutionDetails_PVT.dpp_exe_update_rec_type;
166: l_status_Update_tbl DPP_ExecutionDetails_PVT.dpp_status_Update_tbl_type;
159: --- End Added for A/c Generator W/f ---
160:
161: l_txn_hdr_rec DPP_ITEMCOST_PVT.dpp_cst_hdr_rec_type := p_txn_hdr_rec;
162: l_item_cost_tbl DPP_ITEMCOST_PVT.dpp_txn_line_tbl_type := p_item_cost_tbl;
163: l_inv_org_details_tbl DPP_ITEMCOST_PVT.inv_org_details_tbl_type;
164:
165: l_exe_update_rec DPP_ExecutionDetails_PVT.dpp_exe_update_rec_type;
166: l_status_Update_tbl DPP_ExecutionDetails_PVT.dpp_status_Update_tbl_type;
167: l_module CONSTANT VARCHAR2(100) := 'dpp.plsql.DPP_ITEMCOST_PVT.UPDATE_ITEMCOST';
163: l_inv_org_details_tbl DPP_ITEMCOST_PVT.inv_org_details_tbl_type;
164:
165: l_exe_update_rec DPP_ExecutionDetails_PVT.dpp_exe_update_rec_type;
166: l_status_Update_tbl DPP_ExecutionDetails_PVT.dpp_status_Update_tbl_type;
167: l_module CONSTANT VARCHAR2(100) := 'dpp.plsql.DPP_ITEMCOST_PVT.UPDATE_ITEMCOST';
168:
169: TYPE inventory_item_id_tbl IS TABLE OF mtl_system_items_b.inventory_item_id%TYPE
170: INDEX BY PLS_INTEGER;
171: TYPE error_explanation_tbl IS TABLE OF mtl_transactions_interface.error_explanation%TYPE
287: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Invalid User');
288: RAISE FND_API.G_EXC_ERROR;
289: WHEN OTHERS THEN
290: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
291: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
292: fnd_message.set_token('ERRNO', sqlcode);
293: fnd_message.set_token('REASON', sqlerrm);
294: FND_MSG_PUB.add;
295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: WHEN NO_DATA_FOUND THEN
365: l_responsibility_id := -1;
366: WHEN OTHERS THEN
367: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
368: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
369: fnd_message.set_token('ERRNO', sqlcode);
370: fnd_message.set_token('REASON', sqlerrm);
371: FND_MSG_PUB.add;
372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
373: END;
374: WHEN OTHERS THEN
375: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
376: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
377: fnd_message.set_token('ERRNO', sqlcode);
378: fnd_message.set_token('REASON', sqlerrm);
379: FND_MSG_PUB.add;
380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
449: WHEN NO_DATA_FOUND THEN
450: l_responsibility_id := -1;
451: WHEN OTHERS THEN
452: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
453: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
454: fnd_message.set_token('ERRNO', sqlcode);
455: fnd_message.set_token('REASON', sqlerrm);
456: FND_MSG_PUB.add;
457: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
458: END;
459: WHEN OTHERS THEN
460: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
461: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
462: fnd_message.set_token('ERRNO', sqlcode);
463: fnd_message.set_token('REASON', sqlerrm);
464: FND_MSG_PUB.add;
465: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
535: WHEN NO_DATA_FOUND THEN
536: l_responsibility_id := -1;
537: WHEN OTHERS THEN
538: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
539: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
540: fnd_message.set_token('ERRNO', sqlcode);
541: fnd_message.set_token('REASON', sqlerrm);
542: FND_MSG_PUB.add;
543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
544: END;
545: WHEN OTHERS THEN
546: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
547: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
548: fnd_message.set_token('ERRNO', sqlcode);
549: fnd_message.set_token('REASON', sqlerrm);
550: FND_MSG_PUB.add;
551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
622: WHEN NO_DATA_FOUND THEN
623: l_responsibility_id := -1;
624: WHEN OTHERS THEN
625: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
626: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
627: fnd_message.set_token('ERRNO', sqlcode);
628: fnd_message.set_token('REASON', sqlerrm);
629: FND_MSG_PUB.add;
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
631: END;
632: WHEN OTHERS THEN
633: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
634: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT');
635: fnd_message.set_token('ERRNO', sqlcode);
636: fnd_message.set_token('REASON', sqlerrm);
637: FND_MSG_PUB.add;
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1479: WHEN OTHERS THEN
1480: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1481: -- IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1482: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1483: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT.Update_ItemCost-SLA Tables Insertion');
1484: fnd_message.set_token('ERRNO', sqlcode);
1485: fnd_message.set_token('REASON', sqlerrm);
1486: FND_MSG_PUB.add;
1487: -- END IF;
1527: EXCEPTION
1528: WHEN OTHERS THEN
1529: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1530: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1531: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT.Update_ItemCost-XML Generation');
1532: fnd_message.set_token('ERRNO', sqlcode);
1533: fnd_message.set_token('REASON', sqlerrm);
1534: FND_MSG_PUB.add;
1535: END;
1619: WHEN OTHERS THEN
1620: ROLLBACK TO UPDATE_ITEMCOST_PVT;
1621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1622: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1623: fnd_message.set_token('ROUTINE', 'DPP_ITEMCOST_PVT.Update_ItemCost');
1624: fnd_message.set_token('ERRNO', sqlcode);
1625: fnd_message.set_token('REASON', sqlerrm);
1626: FND_MSG_PUB.add;
1627:
1637: END LOOP;
1638: END IF;
1639: END Update_ItemCost;
1640:
1641: END DPP_ITEMCOST_PVT;