[Home] [Help]
6:
7: BEGIN
8: If p_debug_flag = 'Y' Then
9: --r_debug.r_msg('Log:'||p_msg);
10: pa_debug.write_file('LOG',p_msg);
11: End If;
12:
13: END PRINT_MSG;
14:
175: l_debug_mode varchar2(100) := 'N';
176:
177: BEGIN
178: --Initialize the error stack
179: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.get_CWK_RLMI');
180:
181: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
182: l_debug_mode := NVL(l_debug_mode, 'N');
183:
177: BEGIN
178: --Initialize the error stack
179: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.get_CWK_RLMI');
180:
181: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
182: l_debug_mode := NVL(l_debug_mode, 'N');
183:
184: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'
185: ,x_write_file => 'LOG'
180:
181: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
182: l_debug_mode := NVL(l_debug_mode, 'N');
183:
184: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'
185: ,x_write_file => 'LOG'
186: ,x_debug_mode => l_debug_mode
187: );
188:
205: CLOSE cur_com_cwk_rlmi;
206:
207: END IF;
208:
209: pa_debug.reset_curr_function; /* 4129612 */
210: Return l_cwk_rlmi;
211:
212: EXCEPTION
213: WHEN OTHERS THEN
211:
212: EXCEPTION
213: WHEN OTHERS THEN
214: print_msg(l_debug_mode,l_debug_stage);
215: pa_debug.reset_err_stack;
216: RAISE;
217: END get_CWK_RLMI;
218:
219: /* This Function returns the Baseline Budget version OR Draft budget version
351: AND NVL(pt.burden_amt_display_method,'N') = 'D';
352:
353: BEGIN
354:
355: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.checkCWKbdCostCodes');
356:
357: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
358: l_debug_mode := NVL(l_debug_mode, 'N');
359:
353: BEGIN
354:
355: PA_DEBUG.set_curr_function('PA_FUNDS_CONTROL_UTILS2.checkCWKbdCostCodes');
356:
357: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
358: l_debug_mode := NVL(l_debug_mode, 'N');
359:
360: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'
361: ,x_write_file => 'LOG'
356:
357: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
358: l_debug_mode := NVL(l_debug_mode, 'N');
359:
360: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'
361: ,x_write_file => 'LOG'
362: ,x_debug_mode => l_debug_mode
363: );
364:
501: x_result_code := l_result_code;
502:
503:
504: --Reset Error stack;
505: pa_debug.reset_err_stack;
506:
507:
508: EXCEPTION
509:
510: when l_no_costplus_structure Then
511: x_return_status := 'E';
512: x_status_code := 'T';
513: x_result_code := 'F100';
514: pa_debug.reset_err_stack;
515: RAISE;
516:
517: when others then
518: x_return_status := 'U';
520: x_result_code := 'F100';
521: pa_funds_control_utils2.g_bd_cache_status_code := NULL;
522: pa_funds_control_utils2.g_bd_cache_result_code := NULL;
523: pa_funds_control_utils2.g_bd_cache_exp_string := NULL;
524: pa_debug.reset_err_stack;
525: RAISE;
526:
527: END checkCWKbdCostCodes;
528: