[Home] [Help]
108: and x_end_period_end_date;
109:
110: cursor get_budget_amount_code is
111: select budget_amount_code
112: from pa_budget_versions b,pa_budget_types t
113: where b.budget_version_id = x_version_id
114: and b.budget_type_code = t.budget_type_code;
115:
116: cursor c_period_pa(x_project_id NUMBER,
4403:
4404: begin
4405: select 'Y'
4406: into l_target_is_baselined
4407: from pa_budget_versions
4408: where budget_status_code = 'B'
4409: and budget_version_id = x_dest_version_id;
4410: exception
4411: when no_data_found then
4636: cursor get_info is
4637: select pbv.resource_list_id,
4638: pbem.time_phased_type_code,
4639: pbv.budget_version_id
4640: from pa_budget_versions pbv,
4641: pa_budget_entry_methods pbem
4642: where pbem.budget_entry_method_code = pbv.budget_entry_method_code
4643: and pbv.project_id = x_project_id
4644: and pbv.budget_type_code = x_budget_type_code
4643: and pbv.project_id = x_project_id
4644: and pbv.budget_type_code = x_budget_type_code
4645: and pbv.budget_status_code = 'W';
4646:
4647: cursor get_budget_amount_code(x_version_id pa_budget_versions.budget_version_id%type) is
4648: select budget_amount_code
4649: from pa_budget_versions b,
4650: pa_budget_types t
4651: where b.budget_version_id = x_version_id
4645: and pbv.budget_status_code = 'W';
4646:
4647: cursor get_budget_amount_code(x_version_id pa_budget_versions.budget_version_id%type) is
4648: select budget_amount_code
4649: from pa_budget_versions b,
4650: pa_budget_types t
4651: where b.budget_version_id = x_version_id
4652: and b.budget_type_code = t.budget_type_code;
4653:
4654: l_resource_list_id pa_resource_lists_all_bg.resource_list_id%type;
4655: l_time_phased_type_code pa_budget_entry_methods.time_phased_type_code%type;
4656: l_start_period_name pa_periods_all.period_name%type;
4657: l_start_period_date pa_periods_all.start_date%type;
4658: l_budget_version_id pa_budget_versions.budget_version_id%type;
4659: l_budget_amount_code pa_budget_types.budget_amount_code%type;
4660: x_err_code number;
4661: x_err_stage varchar2(2000);
4662: x_err_stack varchar2(2000);
4721: Autonomous transaction is used as the value should appear in the database. Based on this value
4722: copy actuals is allowed or restricted through budget form and/or concurrent request
4723: *********************************************************************************************/
4724: procedure update_budget_version (x_request_id number default null,
4725: x_budget_version_id pa_budget_versions.budget_version_id%type)
4726: is
4727: pragma autonomous_transaction;
4728: begin
4729: update pa_budget_versions
4725: x_budget_version_id pa_budget_versions.budget_version_id%type)
4726: is
4727: pragma autonomous_transaction;
4728: begin
4729: update pa_budget_versions
4730: set request_id = x_request_id
4731: where budget_version_id = x_budget_version_id;
4732: commit;
4733: end;
4748: select pbv.resource_list_id,
4749: pbv.budget_entry_method_code,
4750: pbv.budget_version_id,
4751: pbv.request_id
4752: from pa_budget_versions pbv
4753: where pbv.project_id = x_project_id
4754: and pbv.budget_type_code = x_budget_type_code
4755: and pbv.budget_status_code = 'W';
4756:
4758: x_err_stack varchar2(2000);
4759: x_err_stage varchar2(2000);
4760: l_resource_list_id pa_resource_lists_all_bg.resource_list_id%type;
4761: l_budget_entry_method_code pa_budget_entry_methods.time_phased_type_code%type;
4762: l_budget_version_id pa_budget_versions.budget_version_id%type;
4763:
4764:
4765: l_start_period_date pa_periods_all.start_date%type;
4766: l_end_period_date pa_periods_all.end_date%type;
4826: /* Commented for Bug 8682811
4827:
4828: select request_id
4829: into l_request_id
4830: from pa_budget_versions
4831: where project_id = x_project_id
4832: and budget_type_code = x_budget_type_code
4833: and budget_status_code = 'W';
4834:
4877: If p_debug_mode = 'Y' and g_calling_mode = 'CONCURRENT REQUEST' then
4878: fnd_file.put_line(1, errbuf);
4879: End if;
4880:
4881: update pa_budget_versions
4882: set request_id = NULL
4883: where budget_version_id = l_budget_version_id;
4884:
4885: else