DBA Data[Home] [Help]

APPS.PA_FP_CI_IMPLEMENT_PKG dependencies on FND_API

Line 93: x_return_status := FND_API.G_RET_STS_SUCCESS;

89: l_project_exchange_rate pa_project_fundings.project_exchange_rate%TYPE;
90: l_projfunc_exchange_rate pa_project_fundings.projfunc_exchange_rate%TYPE;
91: BEGIN
92:
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
94: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
95: l_debug_mode := NVL(l_debug_mode, 'Y');
96: /* the above default is set for testing purpose only
97: need to set to 'N' after testing */

Line 184: x_return_status := FND_API.G_RET_STS_ERROR;

180: NVL(Approved_Rev_Plan_Type_Flag,'N') = 'Y' AND
181: CI_ID IS NULL;
182: EXCEPTION
183: WHEN NO_DATA_FOUND THEN
184: x_return_status := FND_API.G_RET_STS_ERROR;
185: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
186: p_msg_name => 'PA_FP_CI_NO_CURR_WK_VERSION');
187: IF l_debug_mode = 'Y' THEN
188: PA_DEBUG.Reset_Err_Stack;

Line 274: x_return_status := FND_API.G_RET_STS_ERROR;

270: x_err_stage => l_err_stage,
271: x_err_stack => l_err_stack );
272:
273: IF (l_err_code <> 0) THEN
274: x_return_status := FND_API.G_RET_STS_ERROR;
275: /* x_msg_count := FND_MSG_PUB.Count_Msg;
276: IF x_msg_count = 1 THEN
277: PA_INTERFACE_UTILS_PUB.get_messages
278: (p_encoded => FND_API.G_TRUE,

Line 278: (p_encoded => FND_API.G_TRUE,

274: x_return_status := FND_API.G_RET_STS_ERROR;
275: /* x_msg_count := FND_MSG_PUB.Count_Msg;
276: IF x_msg_count = 1 THEN
277: PA_INTERFACE_UTILS_PUB.get_messages
278: (p_encoded => FND_API.G_TRUE,
279: p_msg_index => 1,
280: p_msg_count => 1,
281: p_msg_data => l_msg_data ,
282: p_data => x_msg_data,

Line 337: x_return_status := FND_API.G_RET_STS_ERROR;

333: ,x_msg => 'upd agr allowed flag '||l_upd_agr_allowed
334: ,x_log_level => 5);
335: END IF;
336: IF l_upd_agr_allowed = 'N' THEN
337: x_return_status := FND_API.G_RET_STS_ERROR;
338: /* x_msg_count := FND_MSG_PUB.Count_Msg;
339: IF x_msg_count = 1 THEN
340: PA_INTERFACE_UTILS_PUB.get_messages
341: (p_encoded => FND_API.G_TRUE,

Line 341: (p_encoded => FND_API.G_TRUE,

337: x_return_status := FND_API.G_RET_STS_ERROR;
338: /* x_msg_count := FND_MSG_PUB.Count_Msg;
339: IF x_msg_count = 1 THEN
340: PA_INTERFACE_UTILS_PUB.get_messages
341: (p_encoded => FND_API.G_TRUE,
342: p_msg_index => 1,
343: p_msg_count => 1,
344: p_msg_data => l_msg_data ,
345: p_data => x_msg_data,

Line 463: x_return_status := FND_API.G_RET_STS_ERROR;

459: PA_UTILS.ADD_MESSAGE(
460: p_app_short_name => 'PA',
461: p_msg_name => 'PA_INVD_FUND_ALLOC_AMG' );
462:
463: x_return_status := FND_API.G_RET_STS_ERROR;
464: /* x_msg_count := FND_MSG_PUB.Count_Msg;
465: IF x_msg_count = 1 THEN
466: PA_INTERFACE_UTILS_PUB.get_messages
467: (p_encoded => FND_API.G_TRUE,

Line 467: (p_encoded => FND_API.G_TRUE,

463: x_return_status := FND_API.G_RET_STS_ERROR;
464: /* x_msg_count := FND_MSG_PUB.Count_Msg;
465: IF x_msg_count = 1 THEN
466: PA_INTERFACE_UTILS_PUB.get_messages
467: (p_encoded => FND_API.G_TRUE,
468: p_msg_index => 1,
469: p_msg_count => 1,
470: p_msg_data => l_msg_data ,
471: p_data => x_msg_data,

Line 543: x_return_status := FND_API.G_RET_STS_ERROR;

539: ELSIF l_ci_ver_planning_level = 'P' AND
540: l_funding_level = 'T' THEN
541: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
542: p_msg_name => 'PA_FP_CI_FUNDING_LEVEL' );
543: x_return_status := FND_API.G_RET_STS_ERROR;
544: IF l_debug_mode = 'Y' THEN
545: PA_DEBUG.Reset_Err_Stack;
546: END IF;
547: RETURN;

Line 678: x_return_status := FND_API.G_RET_STS_ERROR;

674: ,x_log_level => 5);
675: END IF;
676:
677: IF l_add_funding_ok_flag <> 'Y' THEN
678: x_return_status := FND_API.G_RET_STS_ERROR;
679: /* x_msg_count := FND_MSG_PUB.Count_Msg;
680: IF x_msg_count = 1 THEN
681: PA_INTERFACE_UTILS_PUB.get_messages
682: (p_encoded => FND_API.G_TRUE,

Line 682: (p_encoded => FND_API.G_TRUE,

678: x_return_status := FND_API.G_RET_STS_ERROR;
679: /* x_msg_count := FND_MSG_PUB.Count_Msg;
680: IF x_msg_count = 1 THEN
681: PA_INTERFACE_UTILS_PUB.get_messages
682: (p_encoded => FND_API.G_TRUE,
683: p_msg_index => 1,
684: p_msg_count => 1,
685: p_msg_data => l_msg_data ,
686: p_data => x_msg_data,

Line 772: x_return_status := FND_API.G_RET_STS_ERROR;

768: IF (l_err_code <> 0) THEN
769: PA_UTILS.ADD_MESSAGE(
770: p_app_short_name => 'PA',
771: p_msg_name => l_err_stage );
772: x_return_status := FND_API.G_RET_STS_ERROR;
773: /* x_msg_count := FND_MSG_PUB.Count_Msg;
774: IF x_msg_count = 1 THEN
775: PA_INTERFACE_UTILS_PUB.get_messages
776: (p_encoded => FND_API.G_TRUE,

Line 776: (p_encoded => FND_API.G_TRUE,

772: x_return_status := FND_API.G_RET_STS_ERROR;
773: /* x_msg_count := FND_MSG_PUB.Count_Msg;
774: IF x_msg_count = 1 THEN
775: PA_INTERFACE_UTILS_PUB.get_messages
776: (p_encoded => FND_API.G_TRUE,
777: p_msg_index => 1,
778: p_msg_count => 1,
779: p_msg_data => l_msg_data ,
780: p_data => x_msg_data,

Line 825: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

821: ,x_msg => 'aft calling link api : ret status '||
822: x_return_status
823: ,x_log_level => 5);
824: END IF;
825: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
826: IF l_debug_mode = 'Y' THEN
827: PA_DEBUG.Reset_Err_Stack;
828: END IF;
829: RETURN;

Line 846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

842: IF l_debug_mode = 'Y' THEN
843: PA_DEBUG.Reset_Err_Stack;
844: END IF;
845:
846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
847: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_FP_CI_IMPLEMENT_PKG',
848: p_procedure_name => 'CREATE_CI_IMPACT_FUND_LINES',
849: p_error_text => SUBSTRB(SQLERRM,1,240));
850:

Line 900: x_return_status := FND_API.G_RET_STS_SUCCESS;

896: if the Cost and Revenue amounts are planned separately and
897: both the target versions are undergoing WBS process update
898: changes. */
899: BEGIN
900: x_return_status := FND_API.G_RET_STS_SUCCESS;
901:
902: l_user_id := FND_GLOBAL.USER_ID;
903: l_wbs_update_flag := 'Y';
904:

Line 935: x_return_status := FND_API.G_RET_STS_ERROR;

931: for getting the status details as we are already
932: getting information from pa_budget_versions table. */
933:
934: IF l_plan_proc_code = 'WUP' AND l_wbs_update_flag = 'Y' THEN
935: x_return_status := FND_API.G_RET_STS_ERROR;
936: l_chk_flag := 'N';
937: l_wbs_update_flag := 'N';
938: IF l_request_id IS NOT NULL THEN
939: l_request_id_v := LTRIM(RTRIM(TO_CHAR(l_request_id)));

Line 957: x_return_status := FND_API.G_RET_STS_ERROR;

953: /* checking for Submitted status */
954:
955: IF l_budget_status_code = 'S' AND l_chk_flag = 'Y' THEN
956: l_chk_flag := 'N';
957: x_return_status := FND_API.G_RET_STS_ERROR;
958: IF l_version_type = 'ALL' THEN
959: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
960: p_msg_name => 'PA_FP_MERGE_ALL_SUBMIT');
961: ELSE

Line 990: x_return_status := FND_API.G_RET_STS_ERROR;

986: IF l_locked_by_person_id IS NOT NULL AND
987: l_locked_by_person_id <> l_person_id AND
988: l_chk_flag = 'Y' THEN
989: l_locked_by_name := pa_fin_plan_utils.get_person_name(l_locked_by_person_id );
990: x_return_status := FND_API.G_RET_STS_ERROR;
991: IF l_version_type = 'ALL' THEN
992: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA',
993: p_msg_name => 'PA_FP_MERGE_ALL_LCK',
994: p_token1 => 'LOCKBY',

Line 1022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1018:
1019: EXCEPTION
1020: WHEN OTHERS THEN
1021:
1022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1023: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_FP_CI_IMPLEMENT_PKG',
1024: p_procedure_name => 'CHK_PLAN_VER_FOR_MERGE',
1025: p_error_text => SUBSTRB(SQLERRM,1,240));
1026: