83: l_debug_level4 CONSTANT NUMBER := 4;
84: l_debug_level5 CONSTANT NUMBER := 5;
85: BEGIN
86:
87: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
88:
89: IF l_debug_mode = 'Y' THEN
90: pa_debug.set_curr_function( p_function => 'PERF_THRESHOLDS',
91: p_debug_mode => l_debug_mode );
86:
87: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
88:
89: IF l_debug_mode = 'Y' THEN
90: pa_debug.set_curr_function( p_function => 'PERF_THRESHOLDS',
91: p_debug_mode => l_debug_mode );
92: END IF;
93:
94:
92: END IF;
93:
94:
95: IF l_debug_mode = 'Y' THEN
96: pa_debug.g_err_stage:= 'Validating input parameters';
97: pa_debug.write(g_module_name,pa_debug.g_err_stage,
98: l_debug_level3);
99: END IF;
100:
93:
94:
95: IF l_debug_mode = 'Y' THEN
96: pa_debug.g_err_stage:= 'Validating input parameters';
97: pa_debug.write(g_module_name,pa_debug.g_err_stage,
98: l_debug_level3);
99: END IF;
100:
101: IF l_debug_mode = 'Y' THEN
98: l_debug_level3);
99: END IF;
100:
101: IF l_debug_mode = 'Y' THEN
102: pa_debug.g_err_stage:= 'X_THRESHOLD_ID = '|| X_THRESHOLD_ID;
103: pa_debug.write(g_module_name,pa_debug.g_err_stage,
104: l_debug_level5);
105: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
106: pa_debug.write(g_module_name,pa_debug.g_err_stage,
99: END IF;
100:
101: IF l_debug_mode = 'Y' THEN
102: pa_debug.g_err_stage:= 'X_THRESHOLD_ID = '|| X_THRESHOLD_ID;
103: pa_debug.write(g_module_name,pa_debug.g_err_stage,
104: l_debug_level5);
105: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
106: pa_debug.write(g_module_name,pa_debug.g_err_stage,
107: l_debug_level5);
101: IF l_debug_mode = 'Y' THEN
102: pa_debug.g_err_stage:= 'X_THRESHOLD_ID = '|| X_THRESHOLD_ID;
103: pa_debug.write(g_module_name,pa_debug.g_err_stage,
104: l_debug_level5);
105: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
106: pa_debug.write(g_module_name,pa_debug.g_err_stage,
107: l_debug_level5);
108:
109: END IF;
102: pa_debug.g_err_stage:= 'X_THRESHOLD_ID = '|| X_THRESHOLD_ID;
103: pa_debug.write(g_module_name,pa_debug.g_err_stage,
104: l_debug_level5);
105: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
106: pa_debug.write(g_module_name,pa_debug.g_err_stage,
107: l_debug_level5);
108:
109: END IF;
110:
108:
109: END IF;
110:
111: IF l_debug_mode = 'Y' THEN
112: pa_debug.g_err_stage:= 'in lock row method,ABOUT TO EXECUTE QUERY';
113: pa_debug.write(g_module_name,pa_debug.g_err_stage,l_debug_level3);
114: pa_debug.reset_curr_function;
115: END IF;
116:
109: END IF;
110:
111: IF l_debug_mode = 'Y' THEN
112: pa_debug.g_err_stage:= 'in lock row method,ABOUT TO EXECUTE QUERY';
113: pa_debug.write(g_module_name,pa_debug.g_err_stage,l_debug_level3);
114: pa_debug.reset_curr_function;
115: END IF;
116:
117: select record_version_number into l_rec_ver_no
110:
111: IF l_debug_mode = 'Y' THEN
112: pa_debug.g_err_stage:= 'in lock row method,ABOUT TO EXECUTE QUERY';
113: pa_debug.write(g_module_name,pa_debug.g_err_stage,l_debug_level3);
114: pa_debug.reset_curr_function;
115: END IF;
116:
117: select record_version_number into l_rec_ver_no
118: from pa_perf_thresholds
123: raise Invalid_Rec_Change;
124: end if;
125:
126: IF l_debug_mode = 'Y' THEN
127: pa_debug.g_err_stage:= 'in lock row method,query executed';
128: pa_debug.write(g_module_name,pa_debug.g_err_stage,l_debug_level3);
129: pa_debug.reset_curr_function;
130: END IF;
131: EXCEPTION
124: end if;
125:
126: IF l_debug_mode = 'Y' THEN
127: pa_debug.g_err_stage:= 'in lock row method,query executed';
128: pa_debug.write(g_module_name,pa_debug.g_err_stage,l_debug_level3);
129: pa_debug.reset_curr_function;
130: END IF;
131: EXCEPTION
132: when NO_DATA_FOUND then
125:
126: IF l_debug_mode = 'Y' THEN
127: pa_debug.g_err_stage:= 'in lock row method,query executed';
128: pa_debug.write(g_module_name,pa_debug.g_err_stage,l_debug_level3);
129: pa_debug.reset_curr_function;
130: END IF;
131: EXCEPTION
132: when NO_DATA_FOUND then
133: PA_UTILS.ADD_MESSAGE