1: PACKAGE BODY pa_fp_fin_plan_adj_lines_pkg as
2: /* $Header: PAFPALTB.pls 120.1 2005/08/19 16:23:57 mwasowic noship $ */
3: -- Start of Comments
4: -- Package name : PA_FP_FIN_PLAN_ADJ_LINES_PKG
5: -- Purpose :
1: PACKAGE BODY pa_fp_fin_plan_adj_lines_pkg as
2: /* $Header: PAFPALTB.pls 120.1 2005/08/19 16:23:57 mwasowic noship $ */
3: -- Start of Comments
4: -- Package name : PA_FP_FIN_PLAN_ADJ_LINES_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PA_FP_FIN_PLAN_ADJ_LINES_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'pafpaltb.pls';
13:
14: PROCEDURE Insert_Row
15: (px_fin_plan_adj_line_id IN OUT NOCOPY pa_fin_plan_adj_lines.fin_plan_adj_line_id%TYPE --File.Sql.39 bug 4440895
104: p_head_count_adjustment));
105: EXCEPTION
106: WHEN OTHERS THEN
107: FND_MSG_PUB.add_exc_msg( p_pkg_name
108: => 'PA_FP_FIN_PLAN_ADJ_LINES_PKG.Insert_Row'
109: ,p_procedure_name
110: => PA_DEBUG.G_Err_Stack);
111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
112: RAISE;
201: END IF;
202: EXCEPTION
203: WHEN OTHERS THEN
204: FND_MSG_PUB.add_exc_msg( p_pkg_name
205: => 'PA_FP_FIN_PLAN_ADJ_LINES_PKG.Update_Row'
206: ,p_procedure_name
207: => PA_DEBUG.G_Err_Stack);
208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
209: RAISE;
234: END IF;
235: EXCEPTION
236: WHEN OTHERS THEN
237: FND_MSG_PUB.add_exc_msg( p_pkg_name
238: => 'PA_FP_FIN_PLAN_ADJ_LINES_PKG.Lock_Row'
239: ,p_procedure_name
240: => PA_DEBUG.G_Err_Stack);
241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
242: RAISE;
269:
270: EXCEPTION
271: WHEN OTHERS THEN
272: FND_MSG_PUB.add_exc_msg( p_pkg_name
273: => 'PA_FP_FIN_PLAN_ADJ_LINES_PKG.Delete_Row'
274: ,p_procedure_name
275: => PA_DEBUG.G_Err_Stack);
276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
277: RAISE;
276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
277: RAISE;
278: END Delete_Row;
279:
280: END pa_fp_fin_plan_adj_lines_pkg;