1: PACKAGE BODY pa_team_templates_pub AS
2: /*$Header: PARTPUBB.pls 120.2 2005/08/23 04:31:40 sunkalya noship $*/
3: --
4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5: PROCEDURE Execute_Apply_Team_Template
26:
27: BEGIN
28:
29: -- Initialize the Error Stack
30: PA_DEBUG.init_err_stack('PA_TEAM_TEMPLATES_PUB.Execute_Apply_Team_Template');
31:
32: -- Initialize the return status to success
33: x_return_status := FND_API.G_RET_STS_SUCCESS;
34:
43: END IF;
44:
45: --Log Message
46: IF (P_DEBUG_MODE = 'Y') THEN
47: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.execute_apply_team_template'
48: ,x_msg => 'Beginning of Execute_Apply_Team_Template'
49: ,x_log_level => 5);
50: END IF;
51:
60: IF p_apply = 'Y' THEN
61:
62: --Log Message
63: IF (P_DEBUG_MODE = 'Y') THEN
64: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.execute_apply_team_template'
65: ,x_msg => 'Calling Apply_Team_Template'
66: ,x_log_level => 5);
67: END IF;
68:
65: ,x_msg => 'Calling Apply_Team_Template'
66: ,x_log_level => 5);
67: END IF;
68:
69: PA_TEAM_TEMPLATES_PUB.Apply_Team_Template(
70: p_team_template_id_tbl => g_team_template_id_tbl
71: ,p_project_id => p_project_id
72: ,p_project_start_date => p_project_start_date
73: ,p_team_start_date => p_team_start_date
97: ROLLBACK TO ASG_PUB_EXEC_APPLY_TEAM_TEMP;
98: END IF;
99:
100: -- Set the excetption Message and the stack
101: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TEAM_TEMPLATES_PUB.Execute_Apply_Team_Template'
102: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
103: --
104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
105: RAISE;
140:
141: BEGIN
142:
143: -- Initialize the Error Stack
144: PA_DEBUG.init_err_stack('PA_TEAM_TEMPLATES_PUB.Apply_Team_Template');
145:
146: -- Initialize the return status to success
147: x_return_status := FND_API.G_RET_STS_SUCCESS;
148:
162: pa_assignment_utils.g_team_role_name_token := NULL;
163:
164: --Log Message
165: IF (P_DEBUG_MODE = 'Y') THEN
166: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.apply_team_template'
167: ,x_msg => 'Beginning of Apply_Team_Template'
168: ,x_log_level => 5);
169: END IF;
170:
169: END IF;
170:
171: --call private API to apply the team template
172: IF (P_DEBUG_MODE = 'Y') THEN
173: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.apply_team_template'
174: ,x_msg => 'calling PA_TEAM_TEMPLATES_PVT.Apply_Team_Template'
175: ,x_log_level => 5);
176: END IF;
177:
282: ROLLBACK TO ASG_PUB_APPLY_TEAM_TEMPLATE;
283: END IF;
284:
285: -- Set the excetption Message and the stack
286: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TEAM_TEMPLATES_PUB.Apply_Team_Template'
287: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
288: --
289: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
290: RAISE;
336:
337: BEGIN
338:
339: -- Initialize the Error Stack
340: PA_DEBUG.init_err_stack('PA_TEAM_TEMPLATES_PUB.Execute_Create_Team_Template');
341:
342: -- Initialize the return status to success
343: x_return_status := FND_API.G_RET_STS_SUCCESS;
344:
353: END IF;
354:
355: --Log Message
356: IF (P_DEBUG_MODE = 'Y') THEN
357: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.execute_create_team_template.begin'
358: ,x_msg => 'Beginning of Execute_Create_Team_Template'
359: ,x_log_level => 5);
360: END IF;
361:
388: l_team_template_rec.attribute15 := p_attribute15;
389:
390: --Log Message
391: IF (P_DEBUG_MODE = 'Y') THEN
392: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.execute_create_team_template.begin'
393: ,x_msg => 'Calling Create_Team_Template'
394: ,x_log_level => 5);
395: END IF;
396:
394: ,x_log_level => 5);
395: END IF;
396:
397:
398: PA_TEAM_TEMPLATES_PUB.Create_Team_Template
399: (p_team_template_rec => l_team_template_rec
400: ,p_calendar_name => p_calendar_name
401: ,p_work_type_name => p_work_type_name
402: ,p_role_list_name => p_role_list_name
419: ROLLBACK TO ASG_PUB_EXEC_CREATE_TEAM_TEMP;
420: END IF;
421:
422: -- Set the excetption Message and the stack
423: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TEAM_TEMPLATES_PUB.Execute_Create_Team_Template'
424: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
425: --
426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
427: RAISE;
457:
458: BEGIN
459:
460: -- Initialize the Error Stack
461: PA_DEBUG.init_err_stack('PA_TEAM_TEMPLATES_PUB.Create_Team_Template');
462:
463: -- Initialize the return status to success
464: x_return_status := FND_API.G_RET_STS_SUCCESS;
465:
474: END IF;
475:
476: --Log Message
477: IF (P_DEBUG_MODE = 'Y') THEN
478: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.Create_Team_Template.begin'
479: ,x_msg => 'Beginning of Create_Team_Template'
480: ,x_log_level => 5);
481: END IF;
482:
593: IF p_commit = FND_API.G_TRUE THEN
594: ROLLBACK TO ASG_PUB_CREATE_TEAM_TEMPLATE;
595: END IF;
596: -- Set the excetption Message and the stack
597: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_TEAM_TEMPLATES_PUB.Create_Team_Template'
598: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
599: --
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
601: RAISE;
651:
652: BEGIN
653:
654: -- Initialize the Error Stack
655: PA_DEBUG.init_err_stack('PA_TEAM_TEMPLATES_PUB.Execute_Update_Team_Template');
656:
657: -- Initialize the return status to success
658: x_return_status := FND_API.G_RET_STS_SUCCESS;
659:
668: END IF;
669:
670: --Log Message
671: IF (P_DEBUG_MODE = 'Y') THEN
672: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.execute_update_team_template.begin'
673: ,x_msg => 'Beginning of Execute_Update_Team_Template'
674: ,x_log_level => 5);
675: END IF;
676:
706: l_team_template_rec.attribute15 := p_attribute15;
707:
708: --Log Message
709: IF (P_DEBUG_MODE = 'Y') THEN
710: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TEAM_TEMPLATES_PUB.execute_create_team_template.before_calling_update_team_template'
711: ,x_msg => 'Calling Update_Team_Template'
712: ,x_log_level => 5);
713: END IF;
714:
712: ,x_log_level => 5);
713: END IF;
714:
715:
716: PA_TEAM_TEMPLATES_PUB.Update_Team_Template
717: (p_team_template_rec => l_team_template_rec
718: ,p_calendar_name => p_calendar_name
719: ,p_work_type_name => p_work_type_name
720: ,p_role_list_name => p_role_list_name
736: ROLLBACK TO ASG_PUB_EXEC_UPDATE_TEAM_TEMP;
737: END IF;
738:
739: -- Set the excetption Message and the stack
740: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TEAM_TEMPLATES_PUB.Execute_Update_Team_Template'
741: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
742: --
743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
744: RAISE;
782:
783: BEGIN
784:
785: -- Initialize the Error Stack
786: PA_DEBUG.init_err_stack('PA_TEAM_TEMPLATES_PUB.Update_Team_Templates');
787:
788: -- Initialize the return status to success
789: x_return_status := FND_API.G_RET_STS_SUCCESS;
790:
938: IF p_commit = FND_API.G_TRUE THEN
939: ROLLBACK TO ASG_PUB_UPDATE_TEAM_TEMPLATE;
940: END IF;
941: -- Set the excetption Message and the stack
942: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_TEAM_TEMPLATES_PUB.Update_Team_Template'
943: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
944: --
945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
946: RAISE;
974:
975: BEGIN
976:
977: -- Initialize the Error Stack
978: PA_DEBUG.init_err_stack('PA_TEAM_TEMPLATES_PUB.Delete_Team_Template');
979:
980: -- Initialize the return status to success
981: x_return_status := FND_API.G_RET_STS_SUCCESS;
982:
1066: IF p_commit = FND_API.G_TRUE THEN
1067: ROLLBACK TO ASG_PUB_DELETE_TEAM_TEMPLATE;
1068: END IF;
1069: -- Set the excetption Message and the stack
1070: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_TEAM_TEMPLATES_PUB.Delete_Assignment'
1071: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
1072: --
1073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1074: RAISE;
1074: RAISE;
1075: --
1076: END Delete_Team_Template;
1077:
1078: END pa_team_templates_pub;