1: PACKAGE BODY PJI_MT_ROWSET_DET_PKG AS
2: /* $Header: PJIMTRDB.pls 120.1 2005/05/31 08:01:34 appldev $ */
3:
4: g_module_name VARCHAR2(100) := 'pa.plsql.pji_mt_rowset_det_pkg';
5: g_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
6:
7: /*==================================================================
8: This api locks the row in pji_mt_rowset_det before updating
9: ==================================================================*/
94: x_msg_count := 0;
95: x_return_status := FND_API.G_RET_STS_SUCCESS;
96:
97: IF g_debug_mode = 'Y' THEN
98: pa_debug.set_curr_function( p_function => 'validate',
99: p_debug_mode => g_debug_mode );
100: END IF;
101:
102: IF g_debug_mode = 'Y' THEN
99: p_debug_mode => g_debug_mode );
100: END IF;
101:
102: IF g_debug_mode = 'Y' THEN
103: pa_debug.g_err_stage:= 'Inserting record in pji_mt_rowset_det, measure_code= '||X_measure_set_code||', rowset_code= '||x_rowset_code;
104: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
105: pa_fp_constants_pkg.g_debug_level3);
106: END IF;
107:
100: END IF;
101:
102: IF g_debug_mode = 'Y' THEN
103: pa_debug.g_err_stage:= 'Inserting record in pji_mt_rowset_det, measure_code= '||X_measure_set_code||', rowset_code= '||x_rowset_code;
104: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
105: pa_fp_constants_pkg.g_debug_level3);
106: END IF;
107:
108: INSERT INTO pji_mt_rowset_det
129: , X_Last_Update_Login
130: );
131:
132: IF g_debug_mode = 'Y' THEN
133: pa_debug.g_err_stage:= 'Inserting record in pji_mt_rowset_det '||X_measure_set_code;
134: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage, pa_fp_constants_pkg.g_debug_level3);
135: END IF;
136:
137: OPEN C;
130: );
131:
132: IF g_debug_mode = 'Y' THEN
133: pa_debug.g_err_stage:= 'Inserting record in pji_mt_rowset_det '||X_measure_set_code;
134: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage, pa_fp_constants_pkg.g_debug_level3);
135: END IF;
136:
137: OPEN C;
138: FETCH C INTO X_ROWID;
139: IF (C%NOTFOUND) THEN
140:
141: CLOSE C;
142: IF g_debug_mode = 'Y' THEN
143: pa_debug.g_err_stage:= 'Rowid could not be fetched after Inserting for '||X_measure_set_code;
144: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage, pa_fp_constants_pkg.g_debug_level5);
145: END IF;
146: RAISE NO_DATA_FOUND;
147:
140:
141: CLOSE C;
142: IF g_debug_mode = 'Y' THEN
143: pa_debug.g_err_stage:= 'Rowid could not be fetched after Inserting for '||X_measure_set_code;
144: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage, pa_fp_constants_pkg.g_debug_level5);
145: END IF;
146: RAISE NO_DATA_FOUND;
147:
148: END IF;
168: x_msg_count := l_msg_count;
169: END IF;
170:
171: IF g_debug_mode = 'Y' THEN
172: pa_debug.reset_curr_function;
173: END IF;
174:
175: RETURN;
176:
185: ,p_procedure_name => 'Insert Row'
186: ,p_error_text => x_msg_data);
187:
188: IF g_debug_mode = 'Y' THEN
189: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
190: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
191: pa_fp_constants_pkg.g_debug_level5);
192: pa_debug.reset_curr_function;
193: END IF;
186: ,p_error_text => x_msg_data);
187:
188: IF g_debug_mode = 'Y' THEN
189: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
190: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
191: pa_fp_constants_pkg.g_debug_level5);
192: pa_debug.reset_curr_function;
193: END IF;
194:
188: IF g_debug_mode = 'Y' THEN
189: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
190: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
191: pa_fp_constants_pkg.g_debug_level5);
192: pa_debug.reset_curr_function;
193: END IF;
194:
195: RAISE;
196:
223: x_msg_count := 0;
224: x_return_status := FND_API.G_RET_STS_SUCCESS;
225:
226: IF g_debug_mode = 'Y' THEN
227: pa_debug.set_curr_function( p_function => 'validate',
228: p_debug_mode => g_debug_mode );
229: END IF;
230:
231: IF g_debug_mode = 'Y' THEN
228: p_debug_mode => g_debug_mode );
229: END IF;
230:
231: IF g_debug_mode = 'Y' THEN
232: pa_debug.g_err_stage:= 'Updating pji_mt_rowset_det for'||X_measure_set_code;
233: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,pa_fp_constants_pkg.g_debug_level3);
234: END IF;
235:
236: UPDATE pji_mt_rowset_det
229: END IF;
230:
231: IF g_debug_mode = 'Y' THEN
232: pa_debug.g_err_stage:= 'Updating pji_mt_rowset_det for'||X_measure_set_code;
233: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,pa_fp_constants_pkg.g_debug_level3);
234: END IF;
235:
236: UPDATE pji_mt_rowset_det
237: SET
244: AND rowset_code = X_rowset_code;
245:
246: IF (SQL%NOTFOUND) THEN
247: IF g_debug_mode = 'Y' THEN
248: pa_debug.g_err_stage:= 'NDF while updating pji_mt_rowset_det, measure_code= '||X_measure_set_code||', rowset_code= '||x_rowset_code;
249: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage, pa_fp_constants_pkg.g_debug_level5);
250: END IF;
251: RAISE NO_DATA_FOUND;
252: END IF;
245:
246: IF (SQL%NOTFOUND) THEN
247: IF g_debug_mode = 'Y' THEN
248: pa_debug.g_err_stage:= 'NDF while updating pji_mt_rowset_det, measure_code= '||X_measure_set_code||', rowset_code= '||x_rowset_code;
249: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage, pa_fp_constants_pkg.g_debug_level5);
250: END IF;
251: RAISE NO_DATA_FOUND;
252: END IF;
253:
251: RAISE NO_DATA_FOUND;
252: END IF;
253:
254: IF g_debug_mode = 'Y' THEN
255: pa_debug.g_err_stage:= 'Updating pji_mt_rowset_det for, measure_code= '||X_measure_set_code||', rowset_code= '||x_rowset_code;
256: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,pa_fp_constants_pkg.g_debug_level3);
257: END IF;
258:
259: EXCEPTION
252: END IF;
253:
254: IF g_debug_mode = 'Y' THEN
255: pa_debug.g_err_stage:= 'Updating pji_mt_rowset_det for, measure_code= '||X_measure_set_code||', rowset_code= '||x_rowset_code;
256: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,pa_fp_constants_pkg.g_debug_level3);
257: END IF;
258:
259: EXCEPTION
260: WHEN NO_DATA_FOUND THEN
276: x_msg_count := l_msg_count;
277: END IF;
278:
279: IF g_debug_mode = 'Y' THEN
280: pa_debug.reset_curr_function;
281: END IF;
282:
283: RAISE NO_DATA_FOUND;
284:
293: ,p_procedure_name => 'UPDATE_ROW'
294: ,p_error_text => x_msg_data);
295:
296: IF g_debug_mode = 'Y' THEN
297: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
298: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
299: pa_fp_constants_pkg.g_debug_level5);
300: pa_debug.reset_curr_function;
301: END IF;
294: ,p_error_text => x_msg_data);
295:
296: IF g_debug_mode = 'Y' THEN
297: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
298: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
299: pa_fp_constants_pkg.g_debug_level5);
300: pa_debug.reset_curr_function;
301: END IF;
302:
296: IF g_debug_mode = 'Y' THEN
297: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
298: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
299: pa_fp_constants_pkg.g_debug_level5);
300: pa_debug.reset_curr_function;
301: END IF;
302:
303: RAISE;
304: END Update_Row;
372: ,p_procedure_name => 'UPDATE_ROW'
373: ,p_error_text => l_msg_data);
374:
375: IF g_debug_mode = 'Y' THEN
376: pa_debug.g_err_stage:= 'Unexpected Error'||l_msg_data;
377: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
378: pa_fp_constants_pkg.g_debug_level5);
379: pa_debug.reset_curr_function;
380: END IF;
373: ,p_error_text => l_msg_data);
374:
375: IF g_debug_mode = 'Y' THEN
376: pa_debug.g_err_stage:= 'Unexpected Error'||l_msg_data;
377: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
378: pa_fp_constants_pkg.g_debug_level5);
379: pa_debug.reset_curr_function;
380: END IF;
381:
375: IF g_debug_mode = 'Y' THEN
376: pa_debug.g_err_stage:= 'Unexpected Error'||l_msg_data;
377: pa_debug.WRITE(g_module_name,pa_debug.g_err_stage,
378: pa_fp_constants_pkg.g_debug_level5);
379: pa_debug.reset_curr_function;
380: END IF;
381:
382: RAISE;
383: END Load_Row;