58:
59: BEGIN
60:
61: -- Initialize the Error Stack
62: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PVT.Create_Subteam');
63:
64: -- Initialize the error flag
65: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
66:
192: COMMIT;
193: END IF;
194:
195: -- Reset the error stack when returning to the calling program
196: PA_DEBUG.Reset_Err_Stack;
197:
198: -- If g_error_exists is TRUE then set the x_return_status to 'E'
199:
200: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
212: END IF;
213: --
214: -- Set the excetption Message and the stack
215: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PVT.Create_Subteam'
216: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
217: --
218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
219: RAISE; -- This is optional depending on the needs
220:
280:
281: BEGIN
282:
283: -- Initialize the Error Stack
284: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PVT.Update_Subteam');
285:
286:
287: -- Initialize the error flag
288: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
426: COMMIT;
427: END IF;
428:
429: -- Reset the error stack when returning to the calling program
430: PA_DEBUG.Reset_Err_Stack;
431:
432: -- If g_error_exists is TRUE then set the x_return_status to 'E'
433:
434: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
443: END IF;
444: --
445: -- Set the excetption Message and the stack
446: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PVT.Update_Subteam'
447: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
448: --
449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
450: RAISE; -- This is optional depending on the needs
451:
495: WHERE project_subteam_id = p_subteam_id ;
496:
497: BEGIN
498: -- Initialize the Error Stack
499: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PVT.Delete_Subteam');
500:
501: -- Initialize the error flag
502: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
503:
567:
568: END IF;
569:
570: -- Reset the error stack when returning to the calling program
571: PA_DEBUG.Reset_Err_Stack;
572:
573: -- If g_error_exists is TRUE then set the x_return_status to 'E'
574:
575: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
586: END IF;
587: --
588: -- Set the exception Message and the stack
589: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PVT.Delete_Subteam'
590: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
591: --
592: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
593: RAISE; -- This is optional depending on the needs
594: