DBA Data[Home] [Help]

APPS.PA_FP_CALC_PLAN_PUB dependencies on FND_API

Line 46: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

42:
43: PROCEDURE REFRESH_RATES
44: (
45: p_api_version_number IN NUMBER := 1.0
46: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
47: , p_commit IN VARCHAR2 := FND_API.G_FALSE
48: , p_pm_product_code IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
49: , p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
50: , p_pm_project_reference IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR

Line 47: , p_commit IN VARCHAR2 := FND_API.G_FALSE

43: PROCEDURE REFRESH_RATES
44: (
45: p_api_version_number IN NUMBER := 1.0
46: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
47: , p_commit IN VARCHAR2 := FND_API.G_FALSE
48: , p_pm_product_code IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
49: , p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
50: , p_pm_project_reference IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
51: , p_update_plan_type IN VARCHAR2

Line 174: x_return_status := FND_API.G_RET_STS_SUCCESS;

170:
171: BEGIN
172:
173: x_msg_count := 0;
174: x_return_status := FND_API.G_RET_STS_SUCCESS;
175:
176: l_user_id := fnd_global.user_id;
177: l_login_id := fnd_global.login_id;
178: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',l_user_id, l_login_id,275,null,null),'N');

Line 185: IF NOT FND_API.Compatible_API_Call ( 1.0 ,p_api_version_number,'REFRESH_RATES',G_PKG_NAME) THEN

181: PA_DEBUG.set_curr_function( p_function => 'REFRESH_RATES',
182: p_debug_mode => l_debug_mode );
183: END IF;
184:
185: IF NOT FND_API.Compatible_API_Call ( 1.0 ,p_api_version_number,'REFRESH_RATES',G_PKG_NAME) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
188: --Print All Input Params
189: IF l_debug_mode = 'Y' THEN

Line 186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

182: p_debug_mode => l_debug_mode );
183: END IF;
184:
185: IF NOT FND_API.Compatible_API_Call ( 1.0 ,p_api_version_number,'REFRESH_RATES',G_PKG_NAME) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
188: --Print All Input Params
189: IF l_debug_mode = 'Y' THEN
190: Pa_Debug.g_err_stage:= 'PA_FP_CALC_PLAN_PUB :REFRESH_RATES: Printing Input parameters';

Line 231: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN

227:
228: END IF;
229:
230:
231: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
232: FND_MSG_PUB.initialize;
233: END IF;
234:
235: IF (p_commit = FND_API.G_TRUE) THEN

Line 235: IF (p_commit = FND_API.G_TRUE) THEN

231: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
232: FND_MSG_PUB.initialize;
233: END IF;
234:
235: IF (p_commit = FND_API.G_TRUE) THEN
236: savepoint REFRESH_RATES_PUBLIC;
237: END IF;
238: --Validate All Input Params
239: IF l_debug_mode = 'Y' THEN

Line 292: RAISE FND_API.G_EXC_ERROR;

288: ,p_attribute2 => ''
289: ,p_attribute3 => ''
290: ,p_attribute4 => ''
291: ,p_attribute5 => '');
292: RAISE FND_API.G_EXC_ERROR;
293: END IF;
294:
295: IF ( p_update_plan_type = 'FINPLAN' AND
296: (

Line 330: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

326: , p_pa_project_id => p_project_id
327: , p_out_project_id => l_project_id
328: , p_return_status => l_return_status
329: );
330: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
331: RAISE Invalid_Arg_Exc_WP;
332: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
333: RAISE FND_API.G_EXC_ERROR;
334: END IF;

Line 332: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

328: , p_return_status => l_return_status
329: );
330: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
331: RAISE Invalid_Arg_Exc_WP;
332: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
333: RAISE FND_API.G_EXC_ERROR;
334: END IF;
335: --Assign values to local variables
336: l_version_type := p_version_type;

Line 333: RAISE FND_API.G_EXC_ERROR;

329: );
330: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
331: RAISE Invalid_Arg_Exc_WP;
332: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
333: RAISE FND_API.G_EXC_ERROR;
334: END IF;
335: --Assign values to local variables
336: l_version_type := p_version_type;
337: l_finplan_type_id := p_finplan_type_id;

Line 374: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

370: Pa_Debug.WRITE(g_module_name,pa_debug.g_err_stage ,l_debug_level3);
371: Pa_Debug.WRITE(g_module_name,'l_budget_version_id'||l_budget_version_id,l_debug_level3);
372: END IF;
373:
374: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
375: IF l_debug_mode = 'Y' THEN
376: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :CHECK_EDIT_TASK_OK returned'||l_return_status ;
377: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
378: END IF;

Line 379: RAISE FND_API.G_EXC_ERROR;

375: IF l_debug_mode = 'Y' THEN
376: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :CHECK_EDIT_TASK_OK returned'||l_return_status ;
377: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
378: END IF;
379: RAISE FND_API.G_EXC_ERROR;
380: END IF;
381:
382: ELSIF (p_update_plan_type = 'FINPLAN') THEN
383: IF (p_budget_version_id is not null and p_budget_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) THEN

Line 394: raise FND_API.G_EXC_ERROR;

390: ,p_token1 => 'BUDGET_VERSION_ID'
391: ,p_value1 => p_budget_version_id);
392:
393: CLOSE C_VALIDATE_FP_BUDGET_VERSION;
394: raise FND_API.G_EXC_ERROR;
395: END IF;
396: CLOSE C_VALIDATE_FP_BUDGET_VERSION;
397: END IF;
398: IF l_debug_mode = 'Y' THEN

Line 456: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

452: IF l_debug_mode = 'Y' THEN
453: Pa_Debug.WRITE(g_module_name,'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Calling Validate_Header_Info'||l_return_status,l_debug_level3);
454: Pa_Debug.WRITE(g_module_name,'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Calling Validate_Header_Info'||l_budget_version_id,l_debug_level3);
455: END IF;
456: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
457: IF l_debug_mode = 'Y' THEN
458: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Validate_Header_Info returned'||l_return_status ;
459: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
460: END IF;

Line 461: RAISE FND_API.G_EXC_ERROR;

457: IF l_debug_mode = 'Y' THEN
458: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Validate_Header_Info returned'||l_return_status ;
459: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
460: END IF;
461: RAISE FND_API.G_EXC_ERROR;
462: END IF;
463: END IF;--update_plan_type FINPLAN
464:
465: IF ( p_txn_curr_code_tab is not null and nvl(p_txn_curr_code_tab.last,0) > 0 ) THEN

Line 492: RAISE FND_API.G_EXC_ERROR;

488: --Raise Error
489: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
490: p_msg_name => 'PA_INVALID_RES_ASGN_ID');
491: CLOSE c_validate_res_asgn_id;
492: RAISE FND_API.G_EXC_ERROR;
493: END IF;
494: CLOSE c_validate_res_asgn_id;
495:
496: IF ( l_txn_curr_passed_flag = 'Y') THEN

Line 502: RAISE FND_API.G_EXC_ERROR;*/

498: p_txn_curr_code_tab(i) = PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ) THEN
499: /*--Raise Error
500: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
501: p_msg_name => 'PA_PASS_TXN_CURR_CODE');
502: RAISE FND_API.G_EXC_ERROR;*/
503:
504: /*
505: In Case Selective Refresh is required, we can comment above and use following
506: After discussion with Venky, it is assumed that if user is passinf txn curr

Line 538: RAISE FND_API.G_EXC_ERROR;

534: , p_value1 => p_txn_curr_code_tab(i)
535: , p_token2 => 'ResourceAssignmentID'
536: , p_value2 => l_resource_asgn_id);
537: CLOSE c_validate_curr_code;
538: RAISE FND_API.G_EXC_ERROR;
539: END IF;
540: CLOSE c_validate_curr_code;
541: l_resource_asgn_id_tab.extend;
542: l_txn_curr_code_tab.extend;

Line 603: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

599: , x_return_status => l_return_status
600: , x_msg_count => l_msg_count
601: , x_msg_data => l_msg_data
602: );
603: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
604: IF l_debug_mode = 'Y' THEN
605: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Calculate returned '||l_return_status ;
606: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
607: END IF;

Line 608: RAISE FND_API.G_EXC_ERROR;

604: IF l_debug_mode = 'Y' THEN
605: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Calculate returned '||l_return_status ;
606: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
607: END IF;
608: RAISE FND_API.G_EXC_ERROR;
609: END IF;
610:
611: END IF;
612:

Line 638: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

634: , x_return_status => l_return_status
635: , x_msg_count => l_msg_count
636: , x_msg_data => l_msg_data
637: );
638: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
639: IF l_debug_mode = 'Y' THEN
640: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Calculate returned '||l_return_status ;
641: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
642: END IF;

Line 643: RAISE FND_API.G_EXC_ERROR;

639: IF l_debug_mode = 'Y' THEN
640: pa_debug.g_err_stage := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Calculate returned '||l_return_status ;
641: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,l_debug_level3);
642: END IF;
643: RAISE FND_API.G_EXC_ERROR;
644: END IF;
645: END IF;
646:
647:

Line 649: IF (p_commit = FND_API.G_TRUE) THEN

645: END IF;
646:
647:
648:
649: IF (p_commit = FND_API.G_TRUE) THEN
650: COMMIT;
651: END IF;
652:
653:

Line 656: WHEN FND_API.G_EXC_ERROR THEN

652:
653:
654: EXCEPTION
655:
656: WHEN FND_API.G_EXC_ERROR THEN
657:
658: x_return_status := Fnd_Api.G_RET_STS_ERROR;
659: l_msg_count := Fnd_Msg_Pub.count_msg;
660:

Line 658: x_return_status := Fnd_Api.G_RET_STS_ERROR;

654: EXCEPTION
655:
656: WHEN FND_API.G_EXC_ERROR THEN
657:
658: x_return_status := Fnd_Api.G_RET_STS_ERROR;
659: l_msg_count := Fnd_Msg_Pub.count_msg;
660:
661: IF p_commit = FND_API.G_TRUE THEN
662: ROLLBACK TO REFRESH_RATES_PUBLIC;

Line 661: IF p_commit = FND_API.G_TRUE THEN

657:
658: x_return_status := Fnd_Api.G_RET_STS_ERROR;
659: l_msg_count := Fnd_Msg_Pub.count_msg;
660:
661: IF p_commit = FND_API.G_TRUE THEN
662: ROLLBACK TO REFRESH_RATES_PUBLIC;
663: END IF;
664:
665: IF c_validate_res_asgn_id%ISOPEN THEN

Line 688: ( p_encoded => Fnd_Api.G_TRUE

684:
685: IF l_msg_count = 1 AND x_msg_data IS NULL
686: THEN
687: Pa_Interface_Utils_Pub.get_messages
688: ( p_encoded => Fnd_Api.G_TRUE
689: , p_msg_index => 1
690: , p_msg_count => l_msg_count
691: , p_msg_data => l_msg_data
692: , p_data => l_data

Line 705: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

701: END IF;
702:
703: WHEN Invalid_Arg_Exc_WP THEN
704:
705: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
706: x_msg_count := 1;
707: x_msg_data := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Invalid Arguments are passed';
708:
709: IF p_commit = FND_API.G_TRUE THEN

Line 709: IF p_commit = FND_API.G_TRUE THEN

705: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
706: x_msg_count := 1;
707: x_msg_data := 'PA_FP_CALC_PLAN_PUB : REFRESH_RATES :Invalid Arguments are passed';
708:
709: IF p_commit = FND_API.G_TRUE THEN
710: ROLLBACK TO REFRESH_RATES_PUBLIC;
711: END IF;
712:
713: IF c_validate_res_asgn_id%ISOPEN THEN

Line 748: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

744: -- RAISE; Bug 4530531
745:
746: WHEN OTHERS THEN
747:
748: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
749: x_msg_count := 1;
750: x_msg_data := SQLERRM;
751:
752: IF p_commit = FND_API.G_TRUE THEN

Line 752: IF p_commit = FND_API.G_TRUE THEN

748: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
749: x_msg_count := 1;
750: x_msg_data := SQLERRM;
751:
752: IF p_commit = FND_API.G_TRUE THEN
753: ROLLBACK TO REFRESH_RATES_PUBLIC;
754: END IF;
755:
756: IF c_validate_res_asgn_id%ISOPEN THEN