1: PACKAGE BODY Pji_Cm_Util AS
2: /* $Header: PJIRX17B.pls 120.3 2007/10/24 04:07:28 paljain ship $ */
3: g_debug_mode VARCHAR2(1) :=NVL(Fnd_Profile.value('PA_DEBUG_MODE'), 'N');
4: PROCEDURE Generate_CM_Procedure(
5: x_return_status IN OUT NOCOPY VARCHAR2
6: , x_msg_count IN OUT NOCOPY NUMBER
7: , x_msg_data IN OUT NOCOPY VARCHAR2
183: WHERE Measure_Id = p_itd_measure_id
184: AND USERENV('Lang') IN (LANGUAGE, Source_Lang);
185: IF (SQL%NOTFOUND) THEN
186: IF g_debug_mode = 'Y' THEN
187: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_itd_measure_id);
188: Pa_Debug.WRITE('Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
189: END IF;
190: RAISE NO_DATA_FOUND;
191: END IF;
184: AND USERENV('Lang') IN (LANGUAGE, Source_Lang);
185: IF (SQL%NOTFOUND) THEN
186: IF g_debug_mode = 'Y' THEN
187: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_itd_measure_id);
188: Pa_Debug.WRITE('Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
189: END IF;
190: RAISE NO_DATA_FOUND;
191: END IF;
192:
239: AND USERENV('Lang') IN (LANGUAGE, Source_Lang);
240:
241: IF (SQL%NOTFOUND) THEN
242: IF g_debug_mode = 'Y' THEN
243: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_ptd_measure_id);
244: Pa_Debug.WRITE('pji_cm_util.Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
245: END IF;
246: RAISE NO_DATA_FOUND;
247: END IF;
240:
241: IF (SQL%NOTFOUND) THEN
242: IF g_debug_mode = 'Y' THEN
243: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_ptd_measure_id);
244: Pa_Debug.WRITE('pji_cm_util.Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
245: END IF;
246: RAISE NO_DATA_FOUND;
247: END IF;
248: ELSE
293: WHERE Measure_Id = p_qtd_measure_id
294: AND USERENV('Lang') IN (LANGUAGE, Source_Lang);
295: IF (SQL%NOTFOUND) THEN
296: IF g_debug_mode = 'Y' THEN
297: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_qtd_measure_id);
298: Pa_Debug.WRITE('Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
299: END IF;
300: RAISE NO_DATA_FOUND;
301: END IF;
294: AND USERENV('Lang') IN (LANGUAGE, Source_Lang);
295: IF (SQL%NOTFOUND) THEN
296: IF g_debug_mode = 'Y' THEN
297: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_qtd_measure_id);
298: Pa_Debug.WRITE('Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
299: END IF;
300: RAISE NO_DATA_FOUND;
301: END IF;
302:
341: WHERE Measure_Id = p_ytd_measure_id
342: AND USERENV('Lang') IN (LANGUAGE, Source_Lang);
343: IF (SQL%NOTFOUND) THEN
344: IF g_debug_mode = 'Y' THEN
345: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_ytd_measure_id);
346: Pa_Debug.WRITE('Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
347: END IF;
348: RAISE NO_DATA_FOUND;
349: END IF;
342: AND USERENV('Lang') IN (LANGUAGE, Source_Lang);
343: IF (SQL%NOTFOUND) THEN
344: IF g_debug_mode = 'Y' THEN
345: Pa_Debug.g_err_stage:= 'while updating pji_mt_measure_tl'||TO_CHAR(p_ytd_measure_id);
346: Pa_Debug.WRITE('Apply_changes',Pa_Debug.g_err_stage, Pa_Fp_Constants_Pkg.g_debug_level5);
347: END IF;
348: RAISE NO_DATA_FOUND;
349: END IF;
350:
397: x_msg_count := l_msg_count;
398: END IF;
399:
400: IF g_debug_mode = 'Y' THEN
401: Pa_Debug.reset_curr_function;
402: END IF;
403:
404: RAISE NO_DATA_FOUND;
405:
414: ,p_procedure_name => 'Apply_Measure'
415: ,p_error_text => x_msg_data);
416:
417: IF g_debug_mode = 'Y' THEN
418: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
419: Pa_Debug.WRITE('pji_cm_util.apply_changes',Pa_Debug.g_err_stage,
420: Pa_Fp_Constants_Pkg.g_debug_level5);
421: Pa_Debug.reset_curr_function;
422: END IF;
415: ,p_error_text => x_msg_data);
416:
417: IF g_debug_mode = 'Y' THEN
418: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
419: Pa_Debug.WRITE('pji_cm_util.apply_changes',Pa_Debug.g_err_stage,
420: Pa_Fp_Constants_Pkg.g_debug_level5);
421: Pa_Debug.reset_curr_function;
422: END IF;
423: END Apply_Measure;
417: IF g_debug_mode = 'Y' THEN
418: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
419: Pa_Debug.WRITE('pji_cm_util.apply_changes',Pa_Debug.g_err_stage,
420: Pa_Fp_Constants_Pkg.g_debug_level5);
421: Pa_Debug.reset_curr_function;
422: END IF;
423: END Apply_Measure;
424:
425: