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.37.12020000.7 2013/05/24 10:10:15 djambhek 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 300: IF NOT FND_API.Compatible_API_Call ( PA_BUDGET_PUB.g_api_version_number ,

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

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

5737: l_budget_lines_in(1).change_reason_code := p_change_reason_code;
5738: END IF;
5739:
5740: --Since currency attributes are defaulted to G_MISS values in
5741: --PA_BUDGET_PUB.budget_line_in_rec_type so we have to explicitly
5742: --make them null
5743: l_budget_lines_in(1).projfunc_cost_rate_type := NULL;
5744: l_budget_lines_in(1).projfunc_cost_rate_date_type := NULL;
5745: l_budget_lines_in(1).projfunc_cost_rate_date := NULL;

Line 9356: l_budget_line_in_rec pa_budget_pub.budget_line_in_rec_type;

9352: l_budget_entry_method_code VARCHAR2(30);
9353: l_change_reason_code VARCHAR2(30);
9354: l_description VARCHAR2(255);
9355: l_budget_line_index NUMBER;
9356: l_budget_line_in_rec pa_budget_pub.budget_line_in_rec_type;
9357: l_time_phased_type_code VARCHAR2(30);
9358: l_resource_assignment_id NUMBER;
9359: l_budget_start_date DATE;
9360: l_resource_list_id NUMBER;

Line 15736: PA_BUDGET_PUB.G_Latest_Encumbrance_Year := -99;

15732: -- 2) Budget_type_code model
15733: -- 3) Budgetary Control
15734: --
15735:
15736: PA_BUDGET_PUB.G_Latest_Encumbrance_Year := -99;
15737:
15738:
15739: IF ( p_update_db_flag = 'Y' )
15740: THEN

Line 15794: ,x_latest_encumbrance_year => PA_BUDGET_PUB.G_Latest_Encumbrance_Year

15790: -- Storing a value other than -99 is essential to conditional LINE validation
15791:
15792: PA_BUDGET_PVT.Get_Latest_BC_Year
15793: ( p_pa_project_id => l_project_id
15794: ,x_latest_encumbrance_year => PA_BUDGET_PUB.G_Latest_Encumbrance_Year
15795: ,x_return_status => p_return_status
15796: ,x_msg_count => p_msg_count
15797: ,x_msg_data => p_msg_data
15798: );

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

15946: -- For Update-Mode, Budget-Type-Code and Budgetary Control, issue error for any period record that
15947: -- falls after the latest encumbrance year.
15948: --
15949: -- Implicit Assumptions in following code:
15950: -- 1) If ( PA_BUDGET_PUB.G_Latest_Encumbrance_Year > -99), then
15951: -- this is Update-Mode, Budget-Type-Code and Budgetary Control data.
15952: -- 2) Budgetary control is ONLY for GL periods.
15953: --
15954:

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

15955: -- Initialize Period Year Variable
15956: l_period_year := NULL;
15957:
15958:
15959: IF ( PA_BUDGET_PUB.G_Latest_Encumbrance_Year > -99)
15960: THEN
15961: -- Budgetary Control Enabled Budget-Type-Code and Update_Mode
15962:
15963: -- Fetch Period Year for budget LINE Period Name

Line 15971: IF ( l_period_year > PA_BUDGET_PUB.G_Latest_Encumbrance_Year )

15967:
15968: CLOSE l_budget_periods_csr;
15969:
15970: -- Test Business Rule
15971: IF ( l_period_year > PA_BUDGET_PUB.G_Latest_Encumbrance_Year )
15972: THEN
15973: pa_utils.add_message
15974: ( p_app_short_name => 'PA'
15975: , p_msg_name => 'PA_BC_ENC_YR_NO_CHG_FUTURE');

Line 17297: PA_BUDGET_PUB.fetch_calculate_amounts

17293: p_return_status := FND_API.G_RET_STS_SUCCESS;
17294:
17295: -- Call the existing fetch_calculate_amounts api
17296:
17297: PA_BUDGET_PUB.fetch_calculate_amounts
17298: ( p_api_version_number => p_api_version_number
17299: ,p_init_msg_list => p_init_msg_list
17300: ,p_line_index => p_line_index
17301: ,p_return_status => p_return_status

Line 17390: ,p_finplan_trans_tab IN pa_budget_pub.FinPlan_Trans_Tab

17386: ,p_all_qty_flag IN pa_fin_plan_amount_sets.all_qty_flag%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17387: ,p_create_new_curr_working_flag IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17388: ,p_replace_current_working_flag IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17389: ,p_using_resource_lists_flag IN VARCHAR2 DEFAULT 'N'
17390: ,p_finplan_trans_tab IN pa_budget_pub.FinPlan_Trans_Tab
17391: ,p_attribute_category IN pa_budget_versions.attribute_category%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17392: ,p_attribute1 IN pa_budget_versions.attribute1%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17393: ,p_attribute2 IN pa_budget_versions.attribute2%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
17394: ,p_attribute3 IN pa_budget_versions.attribute3%TYPE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR

Line 17552: l_budget_lines_in pa_budget_pub.budget_line_in_tbl_type;

17548:
17549: /*=======================================================+
17550: | Used to call pa_budget_pvt.get_fin_plan_lines_status. |
17551: +=======================================================*/
17552: l_budget_lines_in pa_budget_pub.budget_line_in_tbl_type;
17553: l_budget_lines_out pa_budget_pub.budget_line_out_tbl_type;
17554:
17555: /*===================================================+
17556: | Used to call pa_budget_pvt.validate_budget_lines. |

Line 17553: l_budget_lines_out pa_budget_pub.budget_line_out_tbl_type;

17549: /*=======================================================+
17550: | Used to call pa_budget_pvt.get_fin_plan_lines_status. |
17551: +=======================================================*/
17552: l_budget_lines_in pa_budget_pub.budget_line_in_tbl_type;
17553: l_budget_lines_out pa_budget_pub.budget_line_out_tbl_type;
17554:
17555: /*===================================================+
17556: | Used to call pa_budget_pvt.validate_budget_lines. |
17557: +===================================================*/

Line 17558: l_res_asg_in_tbl pa_budget_pub.budget_line_in_tbl_type;

17554:
17555: /*===================================================+
17556: | Used to call pa_budget_pvt.validate_budget_lines. |
17557: +===================================================*/
17558: l_res_asg_in_tbl pa_budget_pub.budget_line_in_tbl_type;
17559: l_res_asg_out_tbl pa_budget_pub.budget_line_out_tbl_type;
17560:
17561: l_allow_qty_flag VARCHAR2(1); -- Bug 3825873 Used to call validate_budget_lines
17562:

Line 17559: l_res_asg_out_tbl pa_budget_pub.budget_line_out_tbl_type;

17555: /*===================================================+
17556: | Used to call pa_budget_pvt.validate_budget_lines. |
17557: +===================================================*/
17558: l_res_asg_in_tbl pa_budget_pub.budget_line_in_tbl_type;
17559: l_res_asg_out_tbl pa_budget_pub.budget_line_out_tbl_type;
17560:
17561: l_allow_qty_flag VARCHAR2(1); -- Bug 3825873 Used to call validate_budget_lines
17562:
17563: --fix later

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

17560:
17561: l_allow_qty_flag VARCHAR2(1); -- Bug 3825873 Used to call validate_budget_lines
17562:
17563: --fix later
17564: l_pkg_name VARCHAR2(30) := 'PA_BUDGET_PUB';
17565: g_module_name VARCHAR2(100) := 'CREATE_DRAFT_FINPLAN';
17566: l_api_name VARCHAR2(30) := 'CREATE_DRAFT_FINPLAN';
17567: l_module_name VARCHAR2(100) := 'CREATE_DRAFT_FINPLAN';
17568: l_procedure_name VARCHAR2(30) := 'CREATE_DRAFT_FINPLAN';

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

17609: SAVEPOINT create_draft_finplan_pub;
17610:
17611: x_msg_count := 0;
17612: x_return_status := FND_API.G_RET_STS_SUCCESS;
17613: pa_debug.set_err_stack('PA_BUDGET_PUB.CREATE_DRAFT_FINPLAN');
17614: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
17615: l_debug_mode := NVL(l_debug_mode, 'Y');
17616:
17617: IF ( l_debug_mode = 'Y' )

Line 19187: l_finplan_trans_tab pa_budget_pub.FinPlan_Trans_Tab;

19183: ,x_msg_count OUT NOCOPY NUMBER
19184: ,x_msg_data OUT NOCOPY VARCHAR2
19185: )
19186: IS
19187: l_finplan_trans_tab pa_budget_pub.FinPlan_Trans_Tab;
19188: BEGIN
19189: --dbms_output.put_line('populating table of records');
19190: FOR i IN G_START_DATE_TBL.FIRST .. G_START_DATE_TBL.LAST
19191: LOOP

Line 19244: PA_BUDGET_PUB.CREATE_DRAFT_FINPLAN

19240: l_finplan_trans_tab(i).ATTRIBUTE30 := G_ATTRIBUTE30_TBL(i);
19241: END LOOP;
19242:
19243: --dbms_output.put_line('Before calling PA_FIN_PLAN_PUB.CREATE_DRAFT_FINPLAN');
19244: PA_BUDGET_PUB.CREATE_DRAFT_FINPLAN
19245: ( p_api_version_number => p_api_version_number
19246: ,p_commit => p_commit
19247: ,p_init_msg_list => p_init_msg_list
19248: ,p_pm_product_code => p_pm_product_code

Line 19422: l_budget_lines_in_tbl PA_BUDGET_PUB.G_BUDGET_LINES_IN_TBL%TYPE;

19418: l_spread_curve_id_tbl SYSTEM.pa_num_tbl_type;
19419:
19420: l_version_info_rec pa_fp_gen_amount_utils.fp_cols;
19421:
19422: l_budget_lines_in_tbl PA_BUDGET_PUB.G_BUDGET_LINES_IN_TBL%TYPE;
19423: l_budget_lines_out_tbl PA_BUDGET_PUB.G_BUDGET_LINES_OUT_TBL%TYPE;
19424: l_planning_start_date_tbl SYSTEM.pa_date_tbl_type;
19425: l_planning_end_date_tbl SYSTEM.pa_date_tbl_type;
19426: l_spread_curve_name_tbl SYSTEM.PA_VARCHAR2_240_TBL_TYPE;

Line 19423: l_budget_lines_out_tbl PA_BUDGET_PUB.G_BUDGET_LINES_OUT_TBL%TYPE;

19419:
19420: l_version_info_rec pa_fp_gen_amount_utils.fp_cols;
19421:
19422: l_budget_lines_in_tbl PA_BUDGET_PUB.G_BUDGET_LINES_IN_TBL%TYPE;
19423: l_budget_lines_out_tbl PA_BUDGET_PUB.G_BUDGET_LINES_OUT_TBL%TYPE;
19424: l_planning_start_date_tbl SYSTEM.pa_date_tbl_type;
19425: l_planning_end_date_tbl SYSTEM.pa_date_tbl_type;
19426: l_spread_curve_name_tbl SYSTEM.PA_VARCHAR2_240_TBL_TYPE;
19427: l_sp_fixed_date_tbl SYSTEM.PA_DATE_TBL_TYPE;

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

19476: l_err_field varchar2(20);
19477:
19478: BEGIN
19479: -- Set the error stack.
19480: pa_debug.set_err_stack('PA_BUDGET_PUB.update_plannning_element_attr');
19481:
19482: -- Get the Debug mode into local variable and set it to 'Y'if its NULL
19483: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
19484: l_debug_mode := NVL(l_debug_mode, 'Y');

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

20021:
20022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
20023: x_msg_count := 1;
20024: x_msg_data := SQLERRM;
20025: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_BUDGET_PUB'
20026: ,p_procedure_name => 'update_plannning_element_attr');
20027: IF l_debug_mode = 'Y' THEN
20028: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;
20029: pa_debug.write(l_module_name,pa_debug.g_err_stage,PA_FP_CONSTANTS_PKG.G_DEBUG_LEVEL5);

Line 20038: end PA_BUDGET_PUB;

20034:
20035: END update_plannning_element_attr;
20036:
20037:
20038: end PA_BUDGET_PUB;