DBA Data[Home] [Help]

APPS.PA_BUDGET_PUB dependencies on PA_BUDGET_PUB

Line 1: package body PA_BUDGET_PUB as

1: package body PA_BUDGET_PUB as
2: --$Header: PAPMBUPB.pls 120.26.12010000.3 2008/09/09 22:50:47 snizam ship $
3:
4: --package global to be used during updates
5: G_USER_ID CONSTANT NUMBER := FND_GLOBAL.user_id;

Line 12: g_module_name VARCHAR2(100) := 'pa.plsql.PA_BUDGET_PUB';

8:
9: -- Bug Fix: 4569365. Removed MRC code.
10: -- g_mrc_exception EXCEPTION; /* FPB2 */
11:
12: g_module_name VARCHAR2(100) := 'pa.plsql.PA_BUDGET_PUB';
13:
14:
15: /*new cursor for bug no 2413400*/
16: Cursor p_product_code_csr (p_pm_product_code IN VARCHAR2)

Line 28: return PA_BUDGET_PUB.G_PROJECT_ID;

24:
25: FUNCTION get_project_id return pa_projects_all.project_id%type
26: is
27: BEGIN
28: return PA_BUDGET_PUB.G_PROJECT_ID;
29: END;
30:
31: PROCEDURE set_project_id (p_project_id IN PA_PROJECTS_ALL.project_id%type) is
32: BEGIN

Line 33: PA_BUDGET_PUB.G_Project_Id := p_project_id;

29: END;
30:
31: PROCEDURE set_project_id (p_project_id IN PA_PROJECTS_ALL.project_id%type) is
32: BEGIN
33: PA_BUDGET_PUB.G_Project_Id := p_project_id;
34: END;
35:
36:
37:

Line 180: l_budget_line_in_rec pa_budget_pub.budget_line_in_rec_type;

176: l_err_code NUMBER;
177: l_err_stage VARCHAR2(120);
178: l_err_stack VARCHAR2(630);
179: i NUMBER;
180: l_budget_line_in_rec pa_budget_pub.budget_line_in_rec_type;
181: l_budget_entry_method_rec pa_budget_entry_methods%rowtype;
182: l_budget_amount_code pa_budget_types.budget_amount_code%type;
183: l_description VARCHAR2(255);
184: l_resource_name pa_resource_lists_tl.Name%type;

Line 298: IF NOT FND_API.Compatible_API_Call ( PA_BUDGET_PUB.g_api_version_number ,

294:
295:
296:
297: -- Standard call to check for call compatibility.
298: IF NOT FND_API.Compatible_API_Call ( PA_BUDGET_PUB.g_api_version_number ,
299: p_api_version_number ,
300: l_api_name ,
301: G_PKG_NAME )
302: THEN

Line 5590: --PA_BUDGET_PUB.budget_line_in_rec_type so we have to explicitly

5586: l_budget_lines_in(1).change_reason_code := p_change_reason_code;
5587: END IF;
5588:
5589: --Since currency attributes are defaulted to G_MISS values in
5590: --PA_BUDGET_PUB.budget_line_in_rec_type so we have to explicitly
5591: --make them null
5592: l_budget_lines_in(1).projfunc_cost_rate_type := NULL;
5593: l_budget_lines_in(1).projfunc_cost_rate_date_type := NULL;
5594: l_budget_lines_in(1).projfunc_cost_rate_date := NULL;

Line 9175: l_budget_line_in_rec pa_budget_pub.budget_line_in_rec_type;

9171: l_budget_entry_method_code VARCHAR2(30);
9172: l_change_reason_code VARCHAR2(30);
9173: l_description VARCHAR2(255);
9174: l_budget_line_index NUMBER;
9175: l_budget_line_in_rec pa_budget_pub.budget_line_in_rec_type;
9176: l_time_phased_type_code VARCHAR2(30);
9177: l_resource_assignment_id NUMBER;
9178: l_budget_start_date DATE;
9179: l_resource_list_id NUMBER;

Line 15490: PA_BUDGET_PUB.G_Latest_Encumbrance_Year := -99;

15486: -- 2) Budget_type_code model
15487: -- 3) Budgetary Control
15488: --
15489:
15490: PA_BUDGET_PUB.G_Latest_Encumbrance_Year := -99;
15491:
15492:
15493: IF ( p_update_db_flag = 'Y' )
15494: THEN

Line 15548: ,x_latest_encumbrance_year => PA_BUDGET_PUB.G_Latest_Encumbrance_Year

15544: -- Storing a value other than -99 is essential to conditional LINE validation
15545:
15546: PA_BUDGET_PVT.Get_Latest_BC_Year
15547: ( p_pa_project_id => l_project_id
15548: ,x_latest_encumbrance_year => PA_BUDGET_PUB.G_Latest_Encumbrance_Year
15549: ,x_return_status => p_return_status
15550: ,x_msg_count => p_msg_count
15551: ,x_msg_data => p_msg_data
15552: );

Line 15701: -- 1) If ( PA_BUDGET_PUB.G_Latest_Encumbrance_Year > -99), then

15697: -- For Update-Mode, Budget-Type-Code and Budgetary Control, issue error for any period record that
15698: -- falls after the latest encumbrance year.
15699: --
15700: -- Implicit Assumptions in following code:
15701: -- 1) If ( PA_BUDGET_PUB.G_Latest_Encumbrance_Year > -99), then
15702: -- this is Update-Mode, Budget-Type-Code and Budgetary Control data.
15703: -- 2) Budgetary control is ONLY for GL periods.
15704: --
15705:

Line 15710: IF ( PA_BUDGET_PUB.G_Latest_Encumbrance_Year > -99)

15706: -- Initialize Period Year Variable
15707: l_period_year := NULL;
15708:
15709:
15710: IF ( PA_BUDGET_PUB.G_Latest_Encumbrance_Year > -99)
15711: THEN
15712: -- Budgetary Control Enabled Budget-Type-Code and Update_Mode
15713:
15714: -- Fetch Period Year for budget LINE Period Name

Line 15722: IF ( l_period_year > PA_BUDGET_PUB.G_Latest_Encumbrance_Year )

15718:
15719: CLOSE l_budget_periods_csr;
15720:
15721: -- Test Business Rule
15722: IF ( l_period_year > PA_BUDGET_PUB.G_Latest_Encumbrance_Year )
15723: THEN
15724: pa_utils.add_message
15725: ( p_app_short_name => 'PA'
15726: , p_msg_name => 'PA_BC_ENC_YR_NO_CHG_FUTURE');

Line 17040: PA_BUDGET_PUB.fetch_calculate_amounts

17036: p_return_status := FND_API.G_RET_STS_SUCCESS;
17037:
17038: -- Call the existing fetch_calculate_amounts api
17039:
17040: PA_BUDGET_PUB.fetch_calculate_amounts
17041: ( p_api_version_number => p_api_version_number
17042: ,p_init_msg_list => p_init_msg_list
17043: ,p_line_index => p_line_index
17044: ,p_return_status => p_return_status

Line 17131: ,p_finplan_trans_tab IN pa_budget_pub.FinPlan_Trans_Tab

17127: ,p_all_qty_flag IN pa_fin_plan_amount_sets.all_qty_flag%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17128: ,p_create_new_curr_working_flag IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17129: ,p_replace_current_working_flag IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17130: ,p_using_resource_lists_flag IN VARCHAR2 DEFAULT 'N'
17131: ,p_finplan_trans_tab IN pa_budget_pub.FinPlan_Trans_Tab
17132: ,p_attribute_category IN pa_budget_versions.attribute_category%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17133: ,p_attribute1 IN pa_budget_versions.attribute1%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17134: ,p_attribute2 IN pa_budget_versions.attribute2%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17135: ,p_attribute3 IN pa_budget_versions.attribute3%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR

Line 17292: l_budget_lines_in pa_budget_pub.budget_line_in_tbl_type;

17288:
17289: /*=======================================================+
17290: | Used to call pa_budget_pvt.get_fin_plan_lines_status. |
17291: +=======================================================*/
17292: l_budget_lines_in pa_budget_pub.budget_line_in_tbl_type;
17293: l_budget_lines_out pa_budget_pub.budget_line_out_tbl_type;
17294:
17295: /*===================================================+
17296: | Used to call pa_budget_pvt.validate_budget_lines. |

Line 17293: l_budget_lines_out pa_budget_pub.budget_line_out_tbl_type;

17289: /*=======================================================+
17290: | Used to call pa_budget_pvt.get_fin_plan_lines_status. |
17291: +=======================================================*/
17292: l_budget_lines_in pa_budget_pub.budget_line_in_tbl_type;
17293: l_budget_lines_out pa_budget_pub.budget_line_out_tbl_type;
17294:
17295: /*===================================================+
17296: | Used to call pa_budget_pvt.validate_budget_lines. |
17297: +===================================================*/

Line 17298: l_res_asg_in_tbl pa_budget_pub.budget_line_in_tbl_type;

17294:
17295: /*===================================================+
17296: | Used to call pa_budget_pvt.validate_budget_lines. |
17297: +===================================================*/
17298: l_res_asg_in_tbl pa_budget_pub.budget_line_in_tbl_type;
17299: l_res_asg_out_tbl pa_budget_pub.budget_line_out_tbl_type;
17300:
17301: l_allow_qty_flag VARCHAR2(1); -- Bug 3825873 Used to call validate_budget_lines
17302:

Line 17299: l_res_asg_out_tbl pa_budget_pub.budget_line_out_tbl_type;

17295: /*===================================================+
17296: | Used to call pa_budget_pvt.validate_budget_lines. |
17297: +===================================================*/
17298: l_res_asg_in_tbl pa_budget_pub.budget_line_in_tbl_type;
17299: l_res_asg_out_tbl pa_budget_pub.budget_line_out_tbl_type;
17300:
17301: l_allow_qty_flag VARCHAR2(1); -- Bug 3825873 Used to call validate_budget_lines
17302:
17303: --fix later

Line 17304: l_pkg_name VARCHAR2(30) := 'PA_BUDGET_PUB';

17300:
17301: l_allow_qty_flag VARCHAR2(1); -- Bug 3825873 Used to call validate_budget_lines
17302:
17303: --fix later
17304: l_pkg_name VARCHAR2(30) := 'PA_BUDGET_PUB';
17305: g_module_name VARCHAR2(100) := 'CREATE_DRAFT_FINPLAN';
17306: l_api_name VARCHAR2(30) := 'CREATE_DRAFT_FINPLAN';
17307: l_module_name VARCHAR2(100) := 'CREATE_DRAFT_FINPLAN';
17308: l_procedure_name VARCHAR2(30) := 'CREATE_DRAFT_FINPLAN';

Line 17353: pa_debug.set_err_stack('PA_BUDGET_PUB.CREATE_DRAFT_FINPLAN');

17349: SAVEPOINT create_draft_finplan_pub;
17350:
17351: x_msg_count := 0;
17352: x_return_status := FND_API.G_RET_STS_SUCCESS;
17353: pa_debug.set_err_stack('PA_BUDGET_PUB.CREATE_DRAFT_FINPLAN');
17354: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
17355: l_debug_mode := NVL(l_debug_mode, 'Y');
17356:
17357: IF ( l_debug_mode = 'Y' )

Line 18902: l_finplan_trans_tab pa_budget_pub.FinPlan_Trans_Tab;

18898: ,x_msg_count OUT NOCOPY NUMBER
18899: ,x_msg_data OUT NOCOPY VARCHAR2
18900: )
18901: IS
18902: l_finplan_trans_tab pa_budget_pub.FinPlan_Trans_Tab;
18903: BEGIN
18904: --dbms_output.put_line('populating table of records');
18905: FOR i IN G_START_DATE_TBL.FIRST .. G_START_DATE_TBL.LAST
18906: LOOP

Line 18955: PA_BUDGET_PUB.CREATE_DRAFT_FINPLAN

18951: l_finplan_trans_tab(i).ATTRIBUTE30 := G_ATTRIBUTE30_TBL(i);
18952: END LOOP;
18953:
18954: --dbms_output.put_line('Before calling PA_FIN_PLAN_PUB.CREATE_DRAFT_FINPLAN');
18955: PA_BUDGET_PUB.CREATE_DRAFT_FINPLAN
18956: ( p_api_version_number => p_api_version_number
18957: ,p_commit => p_commit
18958: ,p_init_msg_list => p_init_msg_list
18959: ,p_pm_product_code => p_pm_product_code

Line 19128: l_budget_lines_in_tbl PA_BUDGET_PUB.G_BUDGET_LINES_IN_TBL%TYPE;

19124: l_spread_curve_id_tbl SYSTEM.pa_num_tbl_type;
19125:
19126: l_version_info_rec pa_fp_gen_amount_utils.fp_cols;
19127:
19128: l_budget_lines_in_tbl PA_BUDGET_PUB.G_BUDGET_LINES_IN_TBL%TYPE;
19129: l_budget_lines_out_tbl PA_BUDGET_PUB.G_BUDGET_LINES_OUT_TBL%TYPE;
19130: l_planning_start_date_tbl SYSTEM.pa_date_tbl_type;
19131: l_planning_end_date_tbl SYSTEM.pa_date_tbl_type;
19132: l_spread_curve_name_tbl SYSTEM.PA_VARCHAR2_240_TBL_TYPE;

Line 19129: l_budget_lines_out_tbl PA_BUDGET_PUB.G_BUDGET_LINES_OUT_TBL%TYPE;

19125:
19126: l_version_info_rec pa_fp_gen_amount_utils.fp_cols;
19127:
19128: l_budget_lines_in_tbl PA_BUDGET_PUB.G_BUDGET_LINES_IN_TBL%TYPE;
19129: l_budget_lines_out_tbl PA_BUDGET_PUB.G_BUDGET_LINES_OUT_TBL%TYPE;
19130: l_planning_start_date_tbl SYSTEM.pa_date_tbl_type;
19131: l_planning_end_date_tbl SYSTEM.pa_date_tbl_type;
19132: l_spread_curve_name_tbl SYSTEM.PA_VARCHAR2_240_TBL_TYPE;
19133: l_sp_fixed_date_tbl SYSTEM.PA_DATE_TBL_TYPE;

Line 19182: pa_debug.set_err_stack('PA_BUDGET_PUB.update_plannning_element_attr');

19178:
19179:
19180: BEGIN
19181: -- Set the error stack.
19182: pa_debug.set_err_stack('PA_BUDGET_PUB.update_plannning_element_attr');
19183:
19184: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
19185: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
19186: l_debug_mode := NVL(l_debug_mode, 'Y');

Line 19670: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_BUDGET_PUB'

19666:
19667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
19668: x_msg_count := 1;
19669: x_msg_data := SQLERRM;
19670: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_BUDGET_PUB'
19671: ,p_procedure_name => 'update_plannning_element_attr');
19672: IF l_debug_mode = 'Y' THEN
19673: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
19674: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 19683: end PA_BUDGET_PUB;

19679:
19680: END update_plannning_element_attr;
19681:
19682:
19683: end PA_BUDGET_PUB;