72: l_debug_level4 CONSTANT NUMBER := 4;
73: l_debug_level5 CONSTANT NUMBER := 5;
74: BEGIN
75:
76: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
77:
78: IF l_debug_mode = 'Y' THEN
79: pa_debug.set_curr_function( p_function => 'STATUS_LISTS',
80: p_debug_mode => l_debug_mode );
75:
76: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
77:
78: IF l_debug_mode = 'Y' THEN
79: pa_debug.set_curr_function( p_function => 'STATUS_LISTS',
80: p_debug_mode => l_debug_mode );
81: END IF;
82:
83:
81: END IF;
82:
83:
84: IF l_debug_mode = 'Y' THEN
85: pa_debug.g_err_stage:= 'Validating input parameters';
86: pa_debug.write(g_module_name,pa_debug.g_err_stage,
87: l_debug_level3);
88: END IF;
89:
82:
83:
84: IF l_debug_mode = 'Y' THEN
85: pa_debug.g_err_stage:= 'Validating input parameters';
86: pa_debug.write(g_module_name,pa_debug.g_err_stage,
87: l_debug_level3);
88: END IF;
89:
90: IF l_debug_mode = 'Y' THEN
87: l_debug_level3);
88: END IF;
89:
90: IF l_debug_mode = 'Y' THEN
91: pa_debug.g_err_stage:= 'X_STATUS_LIST_ID = '|| X_STATUS_LIST_ID;
92: pa_debug.write(g_module_name,pa_debug.g_err_stage,
93: l_debug_level5);
94: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
95: pa_debug.write(g_module_name,pa_debug.g_err_stage,
88: END IF;
89:
90: IF l_debug_mode = 'Y' THEN
91: pa_debug.g_err_stage:= 'X_STATUS_LIST_ID = '|| X_STATUS_LIST_ID;
92: pa_debug.write(g_module_name,pa_debug.g_err_stage,
93: l_debug_level5);
94: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
95: pa_debug.write(g_module_name,pa_debug.g_err_stage,
96: l_debug_level5);
90: IF l_debug_mode = 'Y' THEN
91: pa_debug.g_err_stage:= 'X_STATUS_LIST_ID = '|| X_STATUS_LIST_ID;
92: pa_debug.write(g_module_name,pa_debug.g_err_stage,
93: l_debug_level5);
94: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
95: pa_debug.write(g_module_name,pa_debug.g_err_stage,
96: l_debug_level5);
97:
98: END IF;
91: pa_debug.g_err_stage:= 'X_STATUS_LIST_ID = '|| X_STATUS_LIST_ID;
92: pa_debug.write(g_module_name,pa_debug.g_err_stage,
93: l_debug_level5);
94: pa_debug.g_err_stage:= 'X_RECORD_VERSION_NUMBER = '|| X_RECORD_VERSION_NUMBER;
95: pa_debug.write(g_module_name,pa_debug.g_err_stage,
96: l_debug_level5);
97:
98: END IF;
99: IF l_debug_mode = 'Y' THEN
96: l_debug_level5);
97:
98: END IF;
99: IF l_debug_mode = 'Y' THEN
100: pa_debug.g_err_stage:= 'in lock row method,ABOUT TO EXECUTE QUERY';
101: pa_debug.write(g_module_name,pa_debug.g_err_stage,
102: l_debug_level3);
103: pa_debug.reset_curr_function;
104: END IF;
97:
98: END IF;
99: IF l_debug_mode = 'Y' THEN
100: pa_debug.g_err_stage:= 'in lock row method,ABOUT TO EXECUTE QUERY';
101: pa_debug.write(g_module_name,pa_debug.g_err_stage,
102: l_debug_level3);
103: pa_debug.reset_curr_function;
104: END IF;
105: select record_version_number into l_rec_ver_no
99: IF l_debug_mode = 'Y' THEN
100: pa_debug.g_err_stage:= 'in lock row method,ABOUT TO EXECUTE QUERY';
101: pa_debug.write(g_module_name,pa_debug.g_err_stage,
102: l_debug_level3);
103: pa_debug.reset_curr_function;
104: END IF;
105: select record_version_number into l_rec_ver_no
106: from pa_status_lists
107: where status_list_id = X_STATUS_LIST_ID
109: if(X_RECORD_VERSION_NUMBER <> l_rec_ver_no) then
110: raise Invalid_Rec_Change;
111: end if;
112: IF l_debug_mode = 'Y' THEN
113: pa_debug.g_err_stage:= 'in lock row method,query executed';
114: pa_debug.write(g_module_name,pa_debug.g_err_stage,
115: l_debug_level3);
116: pa_debug.reset_curr_function;
117: END IF;
110: raise Invalid_Rec_Change;
111: end if;
112: IF l_debug_mode = 'Y' THEN
113: pa_debug.g_err_stage:= 'in lock row method,query executed';
114: pa_debug.write(g_module_name,pa_debug.g_err_stage,
115: l_debug_level3);
116: pa_debug.reset_curr_function;
117: END IF;
118: EXCEPTION
112: IF l_debug_mode = 'Y' THEN
113: pa_debug.g_err_stage:= 'in lock row method,query executed';
114: pa_debug.write(g_module_name,pa_debug.g_err_stage,
115: l_debug_level3);
116: pa_debug.reset_curr_function;
117: END IF;
118: EXCEPTION
119: when NO_DATA_FOUND then
120: PA_UTILS.ADD_MESSAGE