DBA Data[Home] [Help]

APPS.PA_FIN_PLAN_MAINT_VER_GLOBAL dependencies on PA_FIN_PLAN_MAINT_VER_GLOBAL

Line 1: PACKAGE BODY pa_fin_plan_maint_ver_global as

1: PACKAGE BODY pa_fin_plan_maint_ver_global as
2: /* $Header: PAFPMVGB.pls 120.4.12010000.3 2009/06/25 11:02:08 rthumma ship $
3: Start of Comments
4: Package name : PA_FIN_PLAN_MAINT_VER_GLOBAL
5: Purpose : API's for Org Forecast: Maintain Versions Page

Line 4: Package name : PA_FIN_PLAN_MAINT_VER_GLOBAL

1: PACKAGE BODY pa_fin_plan_maint_ver_global as
2: /* $Header: PAFPMVGB.pls 120.4.12010000.3 2009/06/25 11:02:08 rthumma ship $
3: Start of Comments
4: Package name : PA_FIN_PLAN_MAINT_VER_GLOBAL
5: Purpose : API's for Org Forecast: Maintain Versions Page
6: History :
7: NOTE :
8: End of Comments

Line 54: IF(paFinplanSecType = 'Submit') THEN pa_fin_plan_maint_ver_global.G_SECURITY_S := paFinplanSec;

50: begin
51: x_msg_count := 0;
52: x_return_status := FND_API.G_RET_STS_SUCCESS;
53:
54: IF(paFinplanSecType = 'Submit') THEN pa_fin_plan_maint_ver_global.G_SECURITY_S := paFinplanSec;
55: ELSIF(paFinplanSecType = 'Rework') THEN pa_fin_plan_maint_ver_global.G_SECURITY_R := paFinplanSec;
56: ELSIF(paFinplanSecType = 'Baseline') THEN pa_fin_plan_maint_ver_global.G_SECURITY_B := paFinplanSec;
57: END IF;
58:

Line 55: ELSIF(paFinplanSecType = 'Rework') THEN pa_fin_plan_maint_ver_global.G_SECURITY_R := paFinplanSec;

51: x_msg_count := 0;
52: x_return_status := FND_API.G_RET_STS_SUCCESS;
53:
54: IF(paFinplanSecType = 'Submit') THEN pa_fin_plan_maint_ver_global.G_SECURITY_S := paFinplanSec;
55: ELSIF(paFinplanSecType = 'Rework') THEN pa_fin_plan_maint_ver_global.G_SECURITY_R := paFinplanSec;
56: ELSIF(paFinplanSecType = 'Baseline') THEN pa_fin_plan_maint_ver_global.G_SECURITY_B := paFinplanSec;
57: END IF;
58:
59:

Line 56: ELSIF(paFinplanSecType = 'Baseline') THEN pa_fin_plan_maint_ver_global.G_SECURITY_B := paFinplanSec;

52: x_return_status := FND_API.G_RET_STS_SUCCESS;
53:
54: IF(paFinplanSecType = 'Submit') THEN pa_fin_plan_maint_ver_global.G_SECURITY_S := paFinplanSec;
55: ELSIF(paFinplanSecType = 'Rework') THEN pa_fin_plan_maint_ver_global.G_SECURITY_R := paFinplanSec;
56: ELSIF(paFinplanSecType = 'Baseline') THEN pa_fin_plan_maint_ver_global.G_SECURITY_B := paFinplanSec;
57: END IF;
58:
59:
60: exception

Line 85: pa_fin_plan_maint_ver_global.G_PROJECT_ID := p_project_id;

81: l_resource_name VARCHAR(240); /* Added this line for bug 3456811 */
82: begin
83: x_msg_count := 0;
84: x_return_status := FND_API.G_RET_STS_SUCCESS;
85: pa_fin_plan_maint_ver_global.G_PROJECT_ID := p_project_id;
86: pa_fin_plan_maint_ver_global.G_FIN_PLAN_TYPE_ID := p_fin_plan_type_id;
87:
88: PA_COMP_PROFILE_PUB.GET_USER_INFO
89: (p_user_id => p_user_id,

Line 86: pa_fin_plan_maint_ver_global.G_FIN_PLAN_TYPE_ID := p_fin_plan_type_id;

82: begin
83: x_msg_count := 0;
84: x_return_status := FND_API.G_RET_STS_SUCCESS;
85: pa_fin_plan_maint_ver_global.G_PROJECT_ID := p_project_id;
86: pa_fin_plan_maint_ver_global.G_FIN_PLAN_TYPE_ID := p_fin_plan_type_id;
87:
88: PA_COMP_PROFILE_PUB.GET_USER_INFO
89: (p_user_id => p_user_id,
90: x_person_id => l_person_id,

Line 94: pa_fin_plan_maint_ver_global.G_LOGIN_PERSON_ID := l_person_id;

90: x_person_id => l_person_id,
91: x_resource_id => l_resource_id, /* Added the ending comma for bug 3456811 */
92: x_resource_name => l_resource_name );/* Added this line for bug 3456811 */
93:
94: pa_fin_plan_maint_ver_global.G_LOGIN_PERSON_ID := l_person_id;
95:
96: exception
97: when others then
98: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 156: pa_debug.init_err_stack('pa_fin_plan_maint_ver_global.Maintain_Versions_Init');

152: wbs_errored_versions_rec wbs_errored_versions_csr%ROWTYPE;
153:
154: begin
155: IF P_PA_DEBUG_MODE = 'Y' THEN
156: pa_debug.init_err_stack('pa_fin_plan_maint_ver_global.Maintain_Versions_Init');
157: END IF;
158: x_msg_count := 0;
159: x_return_status := FND_API.G_RET_STS_SUCCESS;
160:

Line 284: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'pa_fin_plan_maint_ver_global',

280: when others then
281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
282: x_msg_count := 1;
283: x_msg_data := SQLERRM;
284: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'pa_fin_plan_maint_ver_global',
285: p_procedure_name => 'Maintain_Versions_Init');
286: raise FND_API.G_EXC_UNEXPECTED_ERROR;
287: end Maintain_Versions_Init;
288:

Line 354: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'pa_fin_plan_maint_ver_global',

350: when others then
351: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
352: x_msg_count := 1;
353: x_msg_data := SQLERRM;
354: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'pa_fin_plan_maint_ver_global',
355: p_procedure_name => 'Create_Working_Copy');
356: raise FND_API.G_EXC_UNEXPECTED_ERROR;
357: END Create_Working_Copy;
358:

Line 376: pa_debug.init_err_stack('pa_fin_plan_maint_ver_global.Maintain_Versions_Init');

372: l_msg_index_out NUMBER;
373:
374: BEGIN
375: IF P_PA_DEBUG_MODE = 'Y' THEN
376: pa_debug.init_err_stack('pa_fin_plan_maint_ver_global.Maintain_Versions_Init');
377: END IF;
378: x_msg_count := 0;
379: x_return_status := FND_API.G_RET_STS_SUCCESS;
380:

Line 407: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'pa_fin_plan_maint_ver_global',

403: when others then
404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
405: x_msg_count := 1;
406: x_msg_data := SQLERRM;
407: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'pa_fin_plan_maint_ver_global',
408: p_procedure_name => 'Resubmit_Concurrent_Process');
409: raise FND_API.G_EXC_UNEXPECTED_ERROR;
410: END Resubmit_Concurrent_Process;
411:

Line 412: END pa_fin_plan_maint_ver_global;

408: p_procedure_name => 'Resubmit_Concurrent_Process');
409: raise FND_API.G_EXC_UNEXPECTED_ERROR;
410: END Resubmit_Concurrent_Process;
411:
412: END pa_fin_plan_maint_ver_global;