DBA Data[Home] [Help]

APPS.PA_COMP_PROFILE_PVT dependencies on PA_DEBUG

Line 56: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

52: p_validate_only IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
54: x_return_status OUT NOCOPY VARCHAR2 ) IS -- 4537865 Added the nocopy hint
55:
56: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
57: l_data VARCHAR2(500);
58: l_msg_data VARCHAR2(500);
59: l_msg_index_out NUMBER := 0;
60: l_project_id NUMBER := 0;

Line 74: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.add_competence_element');

70: WHERE competence_id = p_competence_id;
71:
72: BEGIN
73: IF l_enable_log = 'Y' THEN
74: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.add_competence_element');
75: END IF;
76:
77: SAVEPOINT COMPETENCE_PVT_ADD_COMP_ELE;
78:

Line 112: pa_debug.reset_err_stack;

108: -- If there are errors, do not proceed to insert the data
109: IF g_noof_errors > 0 THEN
110: x_return_status := FND_API.G_RET_STS_ERROR;
111: IF l_enable_log = 'Y' THEN
112: pa_debug.reset_err_stack;
113: END IF;
114: RETURN;
115: END IF;
116:

Line 121: pa_debug.reset_err_stack;

117: -- If validate only = 'Y' then return at this point.
118: IF p_validate_only = 'Y' THEN
119: x_return_status := FND_API.G_RET_STS_SUCCESS;
120: IF l_enable_log = 'Y' THEN
121: pa_debug.reset_err_stack;
122: END IF;
123: RETURN;
124: END IF;
125:

Line 161: pa_debug.reset_err_stack;

157: ) ;
158:
159: x_return_status := FND_API.G_RET_STS_SUCCESS;
160: IF l_enable_log = 'Y' THEN
161: pa_debug.reset_err_stack;
162: END IF;
163: EXCEPTION
164: WHEN OTHERS THEN
165: IF p_commit = FND_API.G_TRUE THEN

Line 190: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

186: l_return_status VARCHAR2(30);
187: l_object_version_number NUMBER ;
188: l_error_message_code VARCHAR2(30);
189: l_approval_required BOOLEAN := TRUE;
190: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
191:
192: BEGIN
193: -- dbms_output.put_line('Entering Update_competence_element');
194: -- dbms_output.put_line('Effective Date From ' || p_effective_date_from);

Line 196: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.update_competence_element');

192: BEGIN
193: -- dbms_output.put_line('Entering Update_competence_element');
194: -- dbms_output.put_line('Effective Date From ' || p_effective_date_from);
195: IF l_enable_log = 'Y' THEN
196: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.update_competence_element');
197: END IF;
198: SAVEPOINT COMPETENCE_PVT_UPD_COMP_ELE;
199:
200: -- Initialize the message stack if necessary

Line 238: pa_debug.reset_err_stack;

234:
235: IF g_noof_errors > 0 THEN
236: x_return_status := FND_API.G_RET_STS_ERROR;
237: IF l_enable_log = 'Y' THEN
238: pa_debug.reset_err_stack;
239: END IF;
240: RETURN;
241: END IF;
242:

Line 247: pa_debug.reset_err_stack;

243: -- If validate only = 'Y' then return at this point.
244: IF p_validate_only = 'Y' THEN
245: x_return_status := FND_API.G_RET_STS_SUCCESS;
246: IF l_enable_log = 'Y' THEN
247: pa_debug.reset_err_stack;
248: END IF;
249: RETURN;
250: END IF;
251:

Line 274: pa_debug.reset_err_stack;

270: p_effective_date_from => p_effective_date_from);
271:
272: x_return_status := FND_API.G_RET_STS_SUCCESS;
273: IF l_enable_log = 'Y' THEN
274: pa_debug.reset_err_stack;
275: END IF;
276: EXCEPTION
277: WHEN OTHERS THEN
278: IF p_commit = FND_API.G_TRUE THEN

Line 338: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

334: x_effective_date_from OUT NOCOPY per_competence_elements.effective_date_from%TYPE , -- 4537865 Added the nocopy hint
335: x_return_status OUT NOCOPY VARCHAR2, -- 4537865 Added the nocopy hint
336: x_error_message_code OUT NOCOPY VARCHAR2) IS -- 4537865 Added the nocopy hint
337:
338: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
339:
340: CURSOR l_check_element_csr IS
341: SELECT object_name,
342: object_id,

Line 350: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.check_element_id');

346: WHERE competence_element_id = p_element_id;
347: l_check_element_rec l_check_element_csr%ROWTYPE;
348: BEGIN
349: IF l_enable_log = 'Y' THEN
350: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.check_element_id');
351: END IF;
352: x_return_status := FND_API.G_RET_STS_SUCCESS;
353: OPEN l_check_element_csr;
354: FETCH l_check_element_csr INTO l_check_element_rec;

Line 368: pa_debug.reset_err_stack;

364: END IF;
365: CLOSE l_check_element_csr;
366: x_effective_date_from := l_check_element_rec.effective_date_from;
367: IF l_enable_log = 'Y' THEN
368: pa_debug.reset_err_stack;
369: END IF;
370:
371: EXCEPTION
372: WHEN OTHERS THEN

Line 385: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

381: END Check_Element_id ;
382:
383: PROCEDURE Check_Error (p_return_status IN VARCHAR2,
384: p_error_message_code IN VARCHAR2) IS
385: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
386: BEGIN
387: IF l_enable_log = 'Y' THEN
388: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.check_error');
389: END IF;

Line 388: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.check_error');

384: p_error_message_code IN VARCHAR2) IS
385: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
386: BEGIN
387: IF l_enable_log = 'Y' THEN
388: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.check_error');
389: END IF;
390: IF p_return_status = FND_API.G_RET_STS_ERROR THEN
391: g_noof_errors := g_noof_errors + 1;
392: pa_utils.add_message (p_app_short_name => 'PA',

Line 396: pa_debug.reset_err_stack;

392: pa_utils.add_message (p_app_short_name => 'PA',
393: p_msg_name => p_error_message_code);
394: END IF;
395: IF l_enable_log = 'Y' THEN
396: pa_debug.reset_err_stack;
397: END IF;
398: EXCEPTION
399: WHEN OTHERS THEN
400: RAISE;

Line 409: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

405: p_object_version_number IN NUMBER,
406: x_return_status OUT NOCOPY VARCHAR2, -- 4537865 Added the nocopy hint
407: x_error_message_code OUT NOCOPY VARCHAR2) IS -- 4537865 Added the nocopy hint
408:
409: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
410:
411: CURSOR l_get_obj_vers_csr IS
412: SELECT object_version_number
413: FROM per_competence_elements

Line 419: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.check_object_version_number');

415: l_obj_version_number NUMBER := 0;
416:
417: BEGIN
418: IF l_enable_log = 'Y' THEN
419: pa_debug.set_err_stack ('PA_COMP_PROFILE_PVT.check_object_version_number');
420: END IF;
421: OPEN l_get_obj_vers_csr;
422: FETCH l_get_obj_vers_csr INTO l_obj_version_number;
423: -- dbms_output.put_line (' l obj is '||l_obj_version_number ||

Line 431: pa_debug.reset_err_stack;

427: x_error_message_code := 'PA_COMP_OBJ_VERSION_INVALID';
428: END IF;
429: CLOSE l_get_obj_vers_csr;
430: IF l_enable_log = 'Y' THEN
431: pa_debug.reset_err_stack;
432: END IF;
433:
434: EXCEPTION
435: WHEN OTHERS THEN

Line 807: pa_debug.write('PA_COMP_PROFILE_PVT.Start_Approval_Process',SUBSTRB( SQLERRM,1,1900),3); -- 4537865 Replaced substr with substrb

803: x_msg_count := 1 ;
804: -- 4537865 : End
805:
806: -- Bug 2697431 - Added debug to write proper error message
807: pa_debug.write('PA_COMP_PROFILE_PVT.Start_Approval_Process',SUBSTRB( SQLERRM,1,1900),3); -- 4537865 Replaced substr with substrb
808: x_msg_data:=SUBSTRB( SQLERRM,1,1900); -- 4537865 Replaced substr with substrb
809:
810: IF g_profile_id > 0 THEN
811: BEGIN

Line 838: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

834: x_msg_count OUT NOCOPY NUMBER, -- 4537865 Added the nocopy hint
835: x_msg_data OUT NOCOPY VARCHAR2) -- 4537865 Added the nocopy hint
836: IS
837: l_file_val VARCHAR2(100);
838: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
839:
840: cursor insert_profile IS
841: SELECT PERSON_ID,
842: OBJECT_VERSION_NUMBER,

Line 1036: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1032: p_competence_id IN NUMBER,
1033: x_return_status OUT NOCOPY VARCHAR2, -- Added the nocopy hint for 4537865
1034: x_error_message_code OUT NOCOPY VARCHAR2) IS -- Added the nocopy hint for 4537865
1035: l_comp_bg_id NUMBER := null;
1036: l_enable_log varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
1037: BEGIN
1038: BEGIN
1039: SELECT business_group_id
1040: INTO l_comp_bg_id

Line 1055: pa_debug.reset_err_stack;

1051: THEN
1052: x_return_status := FND_API.G_RET_STS_ERROR;
1053: x_error_message_code := 'PA_PRM_BG_COMP_INVALID';
1054: IF l_enable_log = 'Y' THEN
1055: pa_debug.reset_err_stack;
1056: END IF;
1057: RETURN;
1058: END IF;
1059: