DBA Data[Home] [Help]

APPS.PA_RLMI_RBS_MAP_PUB dependencies on PA_DEBUG

Line 107: --IF P_PA_DEBUG_MODE = 'Y' Then

103:
104: pragma autonomous_transaction ;
105: BEGIN
106: --dbms_output.put_line(p_msg);
107: --IF P_PA_DEBUG_MODE = 'Y' Then
108: NULL;
109: INSERT INTO PA_FP_CALCULATE_LOG
110: (SESSIONID
111: ,SEQ_NUMBER

Line 132: PA_DEBUG.WRITE(x_module => 'PA_RLMI_RBS_MAP_PUB.map_rlmi_rbs'

128: BEGIN
129: --calc_log(p_msg);
130: /* Bug fix:4403327 Enclose the Push_RBS_Version calls inside the debug flag */
131: If p_debug_flag = 'Y' Then
132: PA_DEBUG.WRITE(x_module => 'PA_RLMI_RBS_MAP_PUB.map_rlmi_rbs'
133: ,x_msg => p_msg
134: ,x_log_level => 3 );
135:
136: If p_proc_name = 'Push_RBS_Version' Then

Line 137: PA_DEBUG.write_file('LOG',p_msg);

133: ,x_msg => p_msg
134: ,x_log_level => 3 );
135:
136: If p_proc_name = 'Push_RBS_Version' Then
137: PA_DEBUG.write_file('LOG',p_msg);
138: PA_DEBUG.log_message(p_msg);
139: End If;
140: End If;
141: END print_msg;

Line 138: PA_DEBUG.log_message(p_msg);

134: ,x_log_level => 3 );
135:
136: If p_proc_name = 'Push_RBS_Version' Then
137: PA_DEBUG.write_file('LOG',p_msg);
138: PA_DEBUG.log_message(p_msg);
139: End If;
140: End If;
141: END print_msg;
142:

Line 1661: * 3.If the p_calling_context is 'SELF_SERVICE' then debug msg will write to PA_DEBUG.WRITE_LOG();

1657: * NOTES
1658: * 1.p_txn_source_id_tab must be populated with UNIQUE value
1659: * 2.If the p_calling_mode is 'BUDGET_VERSION' then values passed in plsql and system table params
1660: * will be ignored
1661: * 3.If the p_calling_context is 'SELF_SERVICE' then debug msg will write to PA_DEBUG.WRITE_LOG();
1662: * 4.If the p_calling_context is 'PLSQL' then debug msg will write to PA_DEBUG.WRITE_FILE();
1663: */
1664: PROCEDURE Map_Rlmi_Rbs
1665: ( p_budget_version_id IN Number

Line 1662: * 4.If the p_calling_context is 'PLSQL' then debug msg will write to PA_DEBUG.WRITE_FILE();

1658: * 1.p_txn_source_id_tab must be populated with UNIQUE value
1659: * 2.If the p_calling_mode is 'BUDGET_VERSION' then values passed in plsql and system table params
1660: * will be ignored
1661: * 3.If the p_calling_context is 'SELF_SERVICE' then debug msg will write to PA_DEBUG.WRITE_LOG();
1662: * 4.If the p_calling_context is 'PLSQL' then debug msg will write to PA_DEBUG.WRITE_FILE();
1663: */
1664: PROCEDURE Map_Rlmi_Rbs
1665: ( p_budget_version_id IN Number
1666: ,p_project_id IN Number Default NULL

Line 1736: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs');

1732: --x_rbs_map_reject_code_tab.delete;
1733: g_debug_context := p_calling_context;
1734:
1735: --- Initialize the error statck
1736: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs');
1737:
1738: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);
1739: g_debug_flag := NVL(g_debug_flag, 'N');
1740:

Line 1738: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);

1734:
1735: --- Initialize the error statck
1736: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs');
1737:
1738: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);
1739: g_debug_flag := NVL(g_debug_flag, 'N');
1740:
1741: /* Bug fix: 4345057 */
1742: If NVL(g_debug_flag,'N') = 'Y' Then

Line 1743: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'

1739: g_debug_flag := NVL(g_debug_flag, 'N');
1740:
1741: /* Bug fix: 4345057 */
1742: If NVL(g_debug_flag,'N') = 'Y' Then
1743: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'
1744: ,x_write_file => 'LOG'
1745: ,x_debug_mode => g_debug_flag
1746: );
1747: End If;

Line 1814: PA_DEBUG.reset_err_stack;

1810: IF l_tab_count = 0 THEN
1811: --No records to process. Return
1812: l_stage := 'The Source Id tab is Null. No record to process Return';
1813: print_msg(g_debug_flag,l_stage);
1814: PA_DEBUG.reset_err_stack;
1815: RETURN;
1816: ELSIF l_tab_count > 0 Then
1817: l_stage := ' Loop through plsql tables and check any of the index not exists';
1818: print_msg(g_debug_flag,l_stage);

Line 2202: PA_DEBUG.reset_err_stack;

2198:
2199: l_stage := 'End Of PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs API';
2200: print_msg(g_debug_flag,l_stage);
2201: /* Reset the error Stack */
2202: PA_DEBUG.reset_err_stack;
2203:
2204: EXCEPTION
2205: WHEN OTHERS THEN
2206: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM);

Line 2208: PA_DEBUG.WRITE_FILE('LOG',l_stage);

2204: EXCEPTION
2205: WHEN OTHERS THEN
2206: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM);
2207: If g_debug_context = 'PLSQL' Then
2208: PA_DEBUG.WRITE_FILE('LOG',l_stage);
2209: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
2210: Elsif g_debug_context = 'SELF_SERVICE' Then
2211: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'
2212: ,x_msg => l_stage||':'||SQLCODE||SQLERRM

Line 2209: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);

2205: WHEN OTHERS THEN
2206: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM);
2207: If g_debug_context = 'PLSQL' Then
2208: PA_DEBUG.WRITE_FILE('LOG',l_stage);
2209: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
2210: Elsif g_debug_context = 'SELF_SERVICE' Then
2211: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'
2212: ,x_msg => l_stage||':'||SQLCODE||SQLERRM
2213: ,x_log_level => 5 );

Line 2211: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'

2207: If g_debug_context = 'PLSQL' Then
2208: PA_DEBUG.WRITE_FILE('LOG',l_stage);
2209: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
2210: Elsif g_debug_context = 'SELF_SERVICE' Then
2211: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'
2212: ,x_msg => l_stage||':'||SQLCODE||SQLERRM
2213: ,x_log_level => 5 );
2214: End If;
2215: FND_MSG_PUB.add_exc_msg

Line 2219: PA_DEBUG.reset_err_stack;

2215: FND_MSG_PUB.add_exc_msg
2216: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
2217: ,p_procedure_name => 'Map_Rlmi_Rbs');
2218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2219: PA_DEBUG.reset_err_stack;
2220: RAISE;
2221:
2222: END Map_Rlmi_Rbs;
2223:

Line 2294: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs');

2290: x_return_status := 'S';
2291: x_msg_data := Null;
2292: x_msg_count := Null;
2293: --- Initialize the error statck
2294: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs');
2295:
2296: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);
2297: g_debug_flag := NVL(g_debug_flag, 'N');
2298:

Line 2296: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);

2292: x_msg_count := Null;
2293: --- Initialize the error statck
2294: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs');
2295:
2296: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);
2297: g_debug_flag := NVL(g_debug_flag, 'N');
2298:
2299: /* Bug fix: 4345057 */
2300: If NVL(g_debug_flag,'N') = 'Y' Then

Line 2301: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'

2297: g_debug_flag := NVL(g_debug_flag, 'N');
2298:
2299: /* Bug fix: 4345057 */
2300: If NVL(g_debug_flag,'N') = 'Y' Then
2301: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'
2302: ,x_write_file => 'LOG'
2303: ,x_debug_mode => g_debug_flag
2304: );
2305: End If;

Line 2382: PA_DEBUG.reset_err_stack;

2378: IF l_tab_count = 0 THEN
2379: --No records to process. Return
2380: l_stage := 'The Source Id tab is Null. No record to process so Return';
2381: print_msg(g_debug_flag,l_stage);
2382: PA_DEBUG.reset_err_stack;
2383: RETURN;
2384: ELSIF l_tab_count > 0 Then
2385: l_stage := 'Checking the Table count and Extending the elements if not found';
2386: print_msg(g_debug_flag,l_stage);

Line 2815: PA_DEBUG.reset_err_stack;

2811:
2812: l_stage := 'End Of PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs API';
2813: print_msg(g_debug_flag,l_stage);
2814: /* Reset the error Stack */
2815: PA_DEBUG.reset_err_stack;
2816:
2817: EXCEPTION
2818: WHEN OTHERS THEN
2819: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM);

Line 2821: PA_DEBUG.WRITE_FILE('LOG',l_stage);

2817: EXCEPTION
2818: WHEN OTHERS THEN
2819: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM);
2820: If g_debug_context = 'PLSQL' Then
2821: PA_DEBUG.WRITE_FILE('LOG',l_stage);
2822: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
2823: Elsif g_debug_context = 'SELF_SERVICE' Then
2824: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'
2825: ,x_msg => l_stage||':'||SQLCODE||SQLERRM

Line 2822: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);

2818: WHEN OTHERS THEN
2819: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM);
2820: If g_debug_context = 'PLSQL' Then
2821: PA_DEBUG.WRITE_FILE('LOG',l_stage);
2822: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
2823: Elsif g_debug_context = 'SELF_SERVICE' Then
2824: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'
2825: ,x_msg => l_stage||':'||SQLCODE||SQLERRM
2826: ,x_log_level => 5 );

Line 2824: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'

2820: If g_debug_context = 'PLSQL' Then
2821: PA_DEBUG.WRITE_FILE('LOG',l_stage);
2822: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
2823: Elsif g_debug_context = 'SELF_SERVICE' Then
2824: PA_DEBUG.WRITE_LOG(x_module => 'pa.plsql.pa_rlmi_rbs_pub.map_rlmi_rbs'
2825: ,x_msg => l_stage||':'||SQLCODE||SQLERRM
2826: ,x_log_level => 5 );
2827: End If;
2828: FND_MSG_PUB.add_exc_msg

Line 2832: PA_DEBUG.reset_err_stack;

2828: FND_MSG_PUB.add_exc_msg
2829: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
2830: ,p_procedure_name => 'Map_Rlmi_Rbs');
2831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2832: PA_DEBUG.reset_err_stack;
2833: RAISE;
2834: END Map_Rlmi_Rbs;
2835:
2836: /* This API updates the new frozen RBS version on all affected projects.

Line 2951: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Push_RBS_Version');

2947: x_msg_data := Null;
2948: x_msg_count := Null;
2949:
2950: --- Initialize the error statck
2951: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Push_RBS_Version');
2952:
2953: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);
2954: g_debug_flag := NVL(g_debug_flag, 'N');
2955:

Line 2953: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);

2949:
2950: --- Initialize the error statck
2951: PA_DEBUG.init_err_stack ('PA_RLMI_RBS_MAP_PUB.Push_RBS_Version');
2952:
2953: fnd_profile.get('PA_DEBUG_MODE',g_debug_flag);
2954: g_debug_flag := NVL(g_debug_flag, 'N');
2955:
2956: /* Initialize the msg stack */
2957: FND_MSG_PUB.initialize;

Line 2961: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'

2957: FND_MSG_PUB.initialize;
2958:
2959: /* Bug fix: 4345057 */
2960: If NVL(g_debug_flag,'N') = 'Y' Then
2961: PA_DEBUG.SET_PROCESS( x_process => 'PLSQL'
2962: ,x_write_file => 'LOG'
2963: ,x_debug_mode => g_debug_flag
2964: );
2965: End If;

Line 3065: pa_debug.write_file('LOG',l_stage);

3061: l_stage := 'End of Map_Rlmi_Rbs RetSts['||l_return_status||']MsgData['||l_msg_data||']txnSrcTabCount['||l_txn_source_id_tab.count||']';
3062: l_stage := l_stage||'RlmiTabCount['||l_res_list_member_id_tab.count||']RbsEleTabCount['||l_rbs_element_id_tab.count||']';
3063: l_stage := l_stage||'TxnAccHeadCount['||l_txn_accum_header_id_tab.count||']';
3064: Print_msg(g_debug_flag,l_stage,l_proc_name);
3065: pa_debug.write_file('LOG',l_stage);
3066:
3067: IF NVL(l_return_status,'E') <> 'S' Then
3068: l_stage := 'PA_FP_RBS_PUSH_ERROR: '||'OLD_RBS_VERSION['||rbsnameRec.old_rbs_name||']NEW_RBS_VERSION['||rbsnameRec.new_rbs_name;
3069: l_stage := substr(l_stage||']PROJECT_NAME['||i.project_name||']PLAN_VERSION_NAME['||i.version_name,1,1000);

Line 3183: pa_debug.write_file('LOG',l_stage);

3179: l_stage := 'End of Map_Rlmi_Rbs RetSts['||l_return_status||']MsgData['||l_msg_data||']txnSrcTabCount['||l_txn_source_id_tab.count||']';
3180: l_stage := l_stage||'RlmiTabCount['||l_res_list_member_id_tab.count||']RbsEleTabCount['||l_rbs_element_id_tab.count||']';
3181: l_stage := l_stage||'TxnAccHeadCount['||l_txn_accum_header_id_tab.count||']';
3182: Print_msg(g_debug_flag,l_stage,l_proc_name);
3183: pa_debug.write_file('LOG',l_stage);
3184:
3185: IF NVL(l_return_status,'E') <> 'S' Then
3186: l_stage := 'PA_FP_RBS_PUSH_ERROR: '||'OLD_RBS_VERSION['||rbsnameRec.old_rbs_name||']NEW_RBS_VERSION['||rbsnameRec.new_rbs_name;
3187: l_stage := substr(l_stage||']PROJECT_NAME['||i.project_name||']PLAN_VERSION_NAME['||i.version_name,1,1000);

Line 3263: PA_DEBUG.reset_err_stack;

3259: l_stage := 'End Push_RBS_Version API: RtrnSts['||x_return_status||']x_msg_count['||x_msg_count||']';
3260: Print_msg(g_debug_flag,l_stage,l_proc_name);
3261:
3262: /* Reset the error Stack */
3263: PA_DEBUG.reset_err_stack;
3264:
3265: EXCEPTION
3266:
3267: WHEN INVALID_PARAMS THEN

Line 3270: PA_DEBUG.WRITE_FILE('LOG',l_stage);

3266:
3267: WHEN INVALID_PARAMS THEN
3268:
3269: print_msg(g_debug_flag,l_stage||':'||'INVALID_PARAMS',l_proc_name);
3270: PA_DEBUG.WRITE_FILE('LOG',l_stage);
3271: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
3272: FND_MSG_PUB.add_exc_msg
3273: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
3274: ,p_procedure_name => 'Push_RBS_Version');

Line 3271: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);

3267: WHEN INVALID_PARAMS THEN
3268:
3269: print_msg(g_debug_flag,l_stage||':'||'INVALID_PARAMS',l_proc_name);
3270: PA_DEBUG.WRITE_FILE('LOG',l_stage);
3271: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
3272: FND_MSG_PUB.add_exc_msg
3273: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
3274: ,p_procedure_name => 'Push_RBS_Version');
3275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3277: PA_DEBUG.reset_err_stack;

3273: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
3274: ,p_procedure_name => 'Push_RBS_Version');
3275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3276: x_msg_data := 'INVALID_PARAMS';
3277: PA_DEBUG.reset_err_stack;
3278: WHEN OTHERS THEN
3279: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM,l_proc_name);
3280: PA_DEBUG.WRITE_FILE('LOG',l_stage);
3281: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);

Line 3280: PA_DEBUG.WRITE_FILE('LOG',l_stage);

3276: x_msg_data := 'INVALID_PARAMS';
3277: PA_DEBUG.reset_err_stack;
3278: WHEN OTHERS THEN
3279: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM,l_proc_name);
3280: PA_DEBUG.WRITE_FILE('LOG',l_stage);
3281: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
3282: FND_MSG_PUB.add_exc_msg
3283: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
3284: ,p_procedure_name => 'Push_RBS_Version');

Line 3281: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);

3277: PA_DEBUG.reset_err_stack;
3278: WHEN OTHERS THEN
3279: print_msg(g_debug_flag,l_stage||':'||SQLCODE||SQLERRM,l_proc_name);
3280: PA_DEBUG.WRITE_FILE('LOG',l_stage);
3281: PA_DEBUG.WRITE_FILE('LOG','SQLERROR:'||SQLCODE||SQLERRM);
3282: FND_MSG_PUB.add_exc_msg
3283: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
3284: ,p_procedure_name => 'Push_RBS_Version');
3285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3286: PA_DEBUG.reset_err_stack;

3282: FND_MSG_PUB.add_exc_msg
3283: ( p_pkg_name => 'PA_RLMI_RBS_MAP_PUB'
3284: ,p_procedure_name => 'Push_RBS_Version');
3285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3286: PA_DEBUG.reset_err_stack;
3287: RAISE;
3288:
3289: END Push_RBS_Version;
3290: