1: PACKAGE BODY pa_fp_resource_assignments_pkg as
2: /* $Header: PAFPRATB.pls 120.1 2005/08/19 16:29:15 mwasowic noship $ */
3: -- Start of Comments
4: -- Package name : PA_FP_RESOURCE_ASSIGNMENTS_PKG
5: -- Purpose :
1: PACKAGE BODY pa_fp_resource_assignments_pkg as
2: /* $Header: PAFPRATB.pls 120.1 2005/08/19 16:29:15 mwasowic noship $ */
3: -- Start of Comments
4: -- Package name : PA_FP_RESOURCE_ASSIGNMENTS_PKG
5: -- Purpose :
6: -- History :
7: -- 31-OCT-02 rravipat Modified the insert row and update row
8: -- apis to include newly added columns for
10: -- NOTE :
11: -- End of Comments
12:
13:
14: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PA_FP_RESOURCE_ASSIGNMENTS_PKG';
15: G_FILE_NAME CONSTANT VARCHAR2(12) := 'pafpratb.pls';
16:
17: PROCEDURE Insert_Row
18: ( px_resource_assignment_id IN OUT NOCOPY pa_resource_assignments.resource_assignment_id%TYPE --File.Sql.39 bug 4440895
221:
222: EXCEPTION
223: WHEN OTHERS THEN
224: FND_MSG_PUB.add_exc_msg( p_pkg_name
225: => 'PA_FP_RESOURCE_ASSIGNMENTS_PKG.Insert_Row',
226: p_procedure_name
227: => PA_DEBUG.G_Err_Stack);
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: RAISE;
430:
431: EXCEPTION
432: WHEN OTHERS THEN
433: FND_MSG_PUB.add_exc_msg( p_pkg_name
434: => 'PA_FP_RESOURCE_ASSIGNMENTS_PKG.Update_Row',
435: p_procedure_name
436: => PA_DEBUG.G_Err_Stack);
437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
438: RAISE;
458:
459: EXCEPTION
460: WHEN OTHERS THEN
461: FND_MSG_PUB.add_exc_msg( p_pkg_name
462: => 'PA_FP_RESOURCE_ASSIGNMENTS_PKG.Lock_Row',
463: p_procedure_name
464: => PA_DEBUG.G_Err_Stack);
465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
466: RAISE;
491:
492: EXCEPTION
493: WHEN OTHERS THEN
494: FND_MSG_PUB.add_exc_msg( p_pkg_name
495: => 'PA_FP_RESOURCE_ASSIGNMENTS_PKG.Delete_Row',
496: p_procedure_name
497: => PA_DEBUG.G_Err_Stack);
498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
499: RAISE;
498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
499: RAISE;
500: END Delete_Row;
501:
502: END pa_fp_resource_assignments_pkg;