50: l_project_id NUMBER := 0;
51: l_role_id NUMBER := 0;
52: l_effective_date_from DATE;
53: l_file_val VARCHAR2(100);
54: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
55:
56: BEGIN
57:
58: IF l_enable_log = 'Y' THEN
55:
56: BEGIN
57:
58: IF l_enable_log = 'Y' THEN
59: pa_debug.init_err_stack ('PA_COMP_PROFILE_PUB.add_competence_element');
60: END IF;
61:
62: SAVEPOINT COMPETENCE_PUB_ADD_COMP_ELE;
63:
110: x_msg_count := PA_COMP_PROFILE_PVT.g_noof_errors;
111: END IF;
112:
113: IF l_enable_log = 'Y' THEN
114: pa_debug.reset_err_stack;
115: END IF;
116:
117: RETURN;
118: END IF;
145: x_msg_count := pa_comp_profile_pvt.g_noof_errors;
146: END IF;
147:
148: IF l_enable_log = 'Y' THEN
149: pa_debug.reset_err_stack;
150: END IF;
151: RETURN;
152: ELSE
153: x_return_status:= FND_API.G_RET_STS_SUCCESS;
157: COMMIT;
158: END IF;
159:
160: IF l_enable_log = 'Y' THEN
161: pa_debug.reset_err_stack;
162: END IF;
163:
164: EXCEPTION
165: WHEN OTHERS THEN
168: END IF;
169:
170: fnd_msg_pub.add_exc_msg
171: (p_pkg_name => 'PA_COMP_PROFILE_PUB',
172: p_procedure_name => pa_debug.g_err_stack );
173:
174: x_msg_count := 1;
175:
176: IF x_msg_count = 1 THEN
223: l_mandatory_flag VARCHAR2(1);
224: l_err VARCHAR2(2000);
225: l_effective_date_from DATE;
226: l_file_val VARCHAR2(100);
227: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
228: BEGIN
229:
230: -- dbms_output.put_line('Person ID : ' || p_person_id);
231: -- dbms_output.put_line('Entering PUB Update_competence_element');
231: -- dbms_output.put_line('Entering PUB Update_competence_element');
232: -- dbms_output.put_line('Effective Date From ' || p_effective_date_from);
233:
234: IF l_enable_log = 'Y' THEN
235: pa_debug.init_err_stack ('PA_COMP_PROFILE_PUB.update_competence_element');
236: END IF;
237:
238: SAVEPOINT COMPETENCE_PUB_UPD_COMP_ELE;
239: x_return_status := FND_API.G_RET_STS_SUCCESS;
284: ELSE
285: x_msg_count := PA_COMP_PROFILE_PVT.g_noof_errors;
286: END IF;
287: IF l_enable_log = 'Y' THEN
288: pa_debug.reset_err_stack;
289: END IF;
290: RETURN;
291: END IF;
292:
320: x_msg_count := pa_comp_profile_pvt.g_noof_errors;
321: END IF;
322:
323: IF l_enable_log = 'Y' THEN
324: pa_debug.reset_err_stack;
325: END IF;
326: RETURN;
327: ELSE
328: x_return_status:= FND_API.G_RET_STS_SUCCESS;
332: COMMIT;
333: END IF;
334:
335: IF l_enable_log = 'Y' THEN
336: pa_debug.reset_err_stack;
337: END IF;
338:
339: EXCEPTION
340: WHEN OTHERS THEN
346: END IF;
347:
348: fnd_msg_pub.add_exc_msg
349: (p_pkg_name => 'PA_COMP_PROFILE_PUB',
350: p_procedure_name => pa_debug.g_err_stack );
351:
352: x_msg_count := 1;
353:
354: IF x_msg_count = 1 THEN
384: l_data VARCHAR2(500);
385: l_msg_data VARCHAR2(500);
386: l_msg_count NUMBER;
387: l_msg_index_out NUMBER := 0;
388: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
389: BEGIN
390: PA_COMP_PROFILE_PVT.delete_competence_element
391: ( p_person_id => p_person_id,
392: p_competence_id => p_competence_id,
471: l_old_competence_id NUMBER;
472: l_old_comp_name VARCHAR2(240);
473: l_old_comp_alias VARCHAR2(30);
474: l_exists VARCHAR2(1);
475: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
476: BEGIN
477:
478: IF l_enable_log = 'Y' THEN
479: pa_debug.init_err_stack ('PA_COMP_PROFILE_PUB.standard_pub_checks');
475: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
476: BEGIN
477:
478: IF l_enable_log = 'Y' THEN
479: pa_debug.init_err_stack ('PA_COMP_PROFILE_PUB.standard_pub_checks');
480: END IF;
481: x_return_status:= FND_API.G_RET_STS_SUCCESS;
482:
483: -- Check whether competence alias or id is passed and call competence utils
561:
562: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
563: x_return_status:= FND_API.G_RET_STS_ERROR;
564: IF l_enable_log = 'Y' THEN
565: pa_debug.reset_err_stack;
566: END IF;
567: RETURN;
568: END IF;
569:
589:
590: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
591: x_return_status:= FND_API.G_RET_STS_ERROR;
592: IF l_enable_log = 'Y' THEN
593: pa_debug.reset_err_stack;
594: END IF;
595: RETURN;
596: END IF;
597:
648:
649: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
650: x_return_status:= FND_API.G_RET_STS_ERROR;
651: IF l_enable_log = 'Y' THEN
652: pa_debug.reset_err_stack;
653: END IF;
654: RETURN;
655: END IF;
656:
662:
663: IF (l_in_rating_level_id IS NULL AND l_in_rating_level_value
664: IS NULL ) THEN
665: IF l_enable_log = 'Y' THEN
666: pa_debug.reset_err_stack;
667: END IF;
668: RETURN;
669: END IF;
670:
690: ELSE
691: x_return_status:= FND_API.G_RET_STS_SUCCESS;
692: END IF;
693: IF l_enable_log = 'Y' THEN
694: pa_debug.reset_err_stack;
695: END IF;
696: x_rating_level_id := l_rating_level_id;
697:
698:
732: IS
733: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
734: l_msg_count NUMBER;
735: l_msg_data VARCHAR2(2000);
736: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
737: BEGIN
738: --
739: -- RUN mode - normal process execution
740: --
775: IS
776: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
777: l_msg_count NUMBER;
778: l_msg_data VARCHAR2(2000);
779: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
780: BEGIN
781: --
782: -- RUN mode - normal process execution
783: --