DBA Data[Home] [Help]

APPS.PA_ASSIGNMENT_UTILS dependencies on PA_DEBUG

Line 21: pa_debug.init_err_stack ('pa_assignment_utils.check_status_is_in_use');

17: ,x_in_use_flag OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
18: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
19: ,x_error_message_code OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
20: BEGIN
21: pa_debug.init_err_stack ('pa_assignment_utils.check_status_is_in_use');
22: x_error_message_code := NULL;
23: x_in_use_flag := 'N';
24: x_return_status := FND_API.G_RET_STS_SUCCESS;
25:

Line 89: pa_debug.reset_err_stack;

85: WHEN NO_DATA_FOUND THEN
86: null;
87: END;
88:
89: pa_debug.reset_err_stack;
90: EXCEPTION
91: WHEN NO_DATA_FOUND THEN
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93: x_in_use_flag := 'N';

Line 102: pa_debug.reset_err_stack;

98: x_error_message_code := NULL ;
99:
100: -- 4537865 : End
101:
102: pa_debug.reset_err_stack;
103: WHEN OTHERS THEN
104: -- 4537865 : RESET Out params to proper values
105: x_error_message_code := SQLCODE ;
106: x_in_use_flag := NULL ;

Line 111: p_procedure_name => pa_debug.g_err_stack );

107: -- 4537865 : End
108:
109: fnd_msg_pub.add_exc_msg
110: (p_pkg_name => 'PA_ASSIGNMENT_UTILS',
111: p_procedure_name => pa_debug.g_err_stack );
112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
113: RAISE;
114: END check_status_is_in_use;
115:

Line 140: pa_debug.init_err_stack ('pa_assignment_utils.Validate_Asgmt_Competency');

136: SELECT business_group_id FROM per_competences
137: WHERE competence_id = p_competence_id;
138:
139: BEGIN
140: pa_debug.init_err_stack ('pa_assignment_utils.Validate_Asgmt_Competency');
141: OPEN l_bg_csr;
142: FETCH l_bg_csr INTO l_comp_bg_id;
143: IF l_bg_csr%NOTFOUND THEN
144: x_return_status := FND_API.G_RET_STS_ERROR;

Line 147: pa_debug.reset_err_stack;

143: IF l_bg_csr%NOTFOUND THEN
144: x_return_status := FND_API.G_RET_STS_ERROR;
145: x_error_message_code := 'PA_COMPETENCY_INVALID_AMBIGOUS';
146: CLOSE l_bg_csr;
147: pa_debug.reset_err_stack;
148: RETURN;
149: ELSE
150: CLOSE l_bg_csr;
151: END IF;

Line 158: pa_debug.reset_err_stack;

154: IF ( l_comp_bg_id IS NOT NULL
155: AND l_comp_bg_id <> pa_project_utils2.Get_project_business_group ( p_project_id)) THEN
156: x_return_status := FND_API.G_RET_STS_ERROR;
157: x_error_message_code := 'PA_ASGMT_COMPETENCY_INVALID';
158: pa_debug.reset_err_stack;
159: RETURN;
160: END IF;
161: x_return_status := FND_API.G_RET_STS_SUCCESS;
162: pa_debug.reset_err_stack;

Line 162: pa_debug.reset_err_stack;

158: pa_debug.reset_err_stack;
159: RETURN;
160: END IF;
161: x_return_status := FND_API.G_RET_STS_SUCCESS;
162: pa_debug.reset_err_stack;
163: EXCEPTION
164: WHEN OTHERS THEN
165: -- 4537865 : RESET Out params to proper values
166: x_error_message_code := SQLCODE ;

Line 171: p_procedure_name => pa_debug.g_err_stack );

167: -- 4537865 : End
168:
169: fnd_msg_pub.add_exc_msg
170: (p_pkg_name => 'PA_ASSIGNMENT_UTILS',
171: p_procedure_name => pa_debug.g_err_stack );
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
173: RAISE;
174: END Validate_Asgmt_Competency;
175:

Line 189: pa_debug.init_err_stack ('pa_assignment_utils.Get_Def_Asgmt_Statuses');

185: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
186: x_error_message_code OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
187:
188: BEGIN
189: pa_debug.init_err_stack ('pa_assignment_utils.Get_Def_Asgmt_Statuses');
190: x_starting_oa_status := fnd_profile.value ('DEF_OA_STARTING_STATUS');
191: x_starting_sa_status := fnd_profile.value ('DEF_SA_STARTING_STATUS');
192: x_starting_fa_status := fnd_profile.value ('DEF_FA_STATUS');
193: -- While it is ok for the other two statuses to be not defined,

Line 204: pa_debug.reset_err_stack;

200: x_error_message_code := 'PA_NO_DEF_FA_STATUS';
201: ELSE
202: x_return_status := FND_API.G_RET_STS_SUCCESS;
203: END IF;
204: pa_debug.reset_err_stack;
205: EXCEPTION
206: WHEN OTHERS THEN
207:
208: -- 4537865 : RESET OUT params to proper values

Line 217: p_procedure_name => pa_debug.g_err_stack );

213: -- 4537865 :ENd
214:
215: fnd_msg_pub.add_exc_msg
216: (p_pkg_name => 'PA_ASSIGNMENT_UTILS',
217: p_procedure_name => pa_debug.g_err_stack );
218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
219: RAISE;
220: END Get_Def_Asgmt_Statuses;
221:

Line 230: pa_debug.init_err_stack ('pa_assignment_utils.Get_Project_Id');

226: -- 17-JUL-2000 R. Krishnamurthy Created
227: FUNCTION Get_Project_Id (p_assignment_id IN NUMBER) RETURN NUMBER IS
228: l_project_id NUMBER ;
229: BEGIN
230: pa_debug.init_err_stack ('pa_assignment_utils.Get_Project_Id');
231: SELECT project_id
232: INTO l_project_id
233: FROM pa_project_assignments
234: WHERE assignment_id = p_assignment_id ;

Line 235: pa_debug.reset_err_stack;

231: SELECT project_id
232: INTO l_project_id
233: FROM pa_project_assignments
234: WHERE assignment_id = p_assignment_id ;
235: pa_debug.reset_err_stack;
236: RETURN l_project_id ;
237: EXCEPTION
238: WHEN NO_DATA_FOUND THEN
239: RETURN NULL;

Line 243: p_procedure_name => pa_debug.g_err_stack );

239: RETURN NULL;
240: WHEN OTHERS THEN
241: fnd_msg_pub.add_exc_msg
242: (p_pkg_name => 'PA_ASSIGNMENT_UTILS',
243: p_procedure_name => pa_debug.g_err_stack );
244: RAISE;
245: END Get_Project_Id;
246:
247: -- This function returns whether a given assignment status is

Line 377: pa_debug.init_err_stack ('pa_assignment_utils.Check_proj_Assignments_Exist');

373: ,x_assignments_exist_flag OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
374: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
375: ,x_error_message_code OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
376: BEGIN
377: pa_debug.init_err_stack ('pa_assignment_utils.Check_proj_Assignments_Exist');
378: x_assignments_exist_flag := 'N';
379: x_error_message_code := NULL;
380: x_return_status := FND_API.G_RET_STS_SUCCESS;
381:

Line 397: pa_debug.reset_err_stack;

393: FROM pa_project_assignments
394: WHERE project_id = p_project_id
395: AND rownum=1;
396:
397: pa_debug.reset_err_stack;
398: EXCEPTION
399: WHEN NO_DATA_FOUND THEN
400: x_return_status := FND_API.G_RET_STS_SUCCESS;
401: x_assignments_exist_flag := 'N';

Line 410: p_procedure_name => pa_debug.g_err_stack );

406: -- 4537865 : End
407:
408: fnd_msg_pub.add_exc_msg
409: (p_pkg_name => 'PA_ASSIGNMENT_UTILS',
410: p_procedure_name => pa_debug.g_err_stack );
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
412: RAISE;
413: END check_proj_assignments_exist;
414:

Line 430: pa_debug.init_err_stack ('pa_assignment_utils.check_assignment_number_or_id');

426: l_id_found_flag VARCHAR2(1);
427: l_current_id pa_project_assignments.assignment_id%TYPE;
428: l_num_ids NUMBER;
429: BEGIN
430: pa_debug.init_err_stack ('pa_assignment_utils.check_assignment_number_or_id');
431: IF p_assignment_id IS NOT NULL AND p_assignment_id <> FND_API.G_MISS_NUM THEN
432: IF p_check_id_flag = 'Y' THEN
433: SELECT assignment_id
434: INTO x_assignment_id

Line 481: pa_debug.reset_err_stack;

477: x_assignment_id := NULL;
478: END IF;
479: END IF;
480: x_return_status := FND_API.G_RET_STS_SUCCESS;
481: pa_debug.reset_err_stack;
482: EXCEPTION
483: WHEN NO_DATA_FOUND THEN
484: x_return_status := FND_API.G_RET_STS_ERROR;
485: x_error_message_code := 'PA_ASGN_NUMBER_INV_AMBIGOUS';

Line 498: p_procedure_name => pa_debug.g_err_stack );

494: -- 4537865 : End
495:
496: fnd_msg_pub.add_exc_msg
497: (p_pkg_name => 'PA_ASSIGNMENT_UTILS',
498: p_procedure_name => pa_debug.g_err_stack );
499: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
500: x_assignment_id := NULL;
501: RAISE;
502: END Check_Assignment_Number_Or_Id;

Line 511: pa_debug.init_err_stack ('pa_assignment_utils.Check_STF_PriorityName_Or_Code');

507: ,x_staffing_priority_code OUT NOCOPY pa_project_assignments.staffing_priority_code%TYPE --File.Sql.39 bug 4440895
508: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
509: ,x_error_message_code OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
510: BEGIN
511: pa_debug.init_err_stack ('pa_assignment_utils.Check_STF_PriorityName_Or_Code');
512:
513: IF p_staffing_priority_code IS NOT NULL AND p_staffing_priority_code<>FND_API.G_MISS_CHAR THEN
514: IF p_check_id_flag = 'Y' THEN
515: SELECT lookup_code

Line 815: ,p_procedure_name => PA_DEBUG.G_Err_Stack );

811: WHEN OTHERS THEN
812: --
813: -- Set the excetption Message and the stack
814: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_ASSIGNMENT_UTILS.is_asgmt_allow_stus_ctl_check'
815: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
816: --
817: RAISE; -- This is optional depending on the needs
818:
819: END is_asgmt_allow_stus_ctl_check;

Line 1346: l_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); -- 5345129

1342: and project_id = p_project_id
1343: and rownum = 1;
1344:
1345: l_team_role_exists VARCHAR2(1):= 'F';
1346: l_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); -- 5345129
1347:
1348: BEGIN
1349: IF l_debug_mode = 'Y' THEN -- 5345129
1350: pa_debug.write(x_module => 'pa.plsql.PA_ASSIGNMENT_UTILS.Associate_Planning_Resources'

Line 1350: pa_debug.write(x_module => 'pa.plsql.PA_ASSIGNMENT_UTILS.Associate_Planning_Resources'

1346: l_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); -- 5345129
1347:
1348: BEGIN
1349: IF l_debug_mode = 'Y' THEN -- 5345129
1350: pa_debug.write(x_module => 'pa.plsql.PA_ASSIGNMENT_UTILS.Associate_Planning_Resources'
1351: ,x_msg => 'old_pls_id='||p_old_resource_list_id||
1352: 'new_pls_id='||p_new_resource_list_id
1353: ,x_log_level => li_message_level);
1354: END IF;

Line 1388: pa_debug.write(x_module => 'pa.plsql.PA_ASSIGNMENT_UTILS.Associate_Planning_Resources'

1384: --dbms_output.put_line ('x_return_status ' || l_return_status);
1385: --dbms_output.put_line ('Assignment res format ' || l_asgmt_res_format_id);
1386: --dbms_output.put_line ('Requirement res format ' || l_req_res_format_id);
1387: IF l_debug_mode = 'Y' THEN -- 5345129
1388: pa_debug.write(x_module => 'pa.plsql.PA_ASSIGNMENT_UTILS.Associate_Planning_Resources'
1389: ,x_msg => 'asgmt_format_id='||l_asgmt_res_format_id||
1390: 'req_format_id='||l_req_res_format_id
1391: ,x_log_level => li_message_level);
1392: END IF;