149: PROCEDURE Validate_Header_Info
150: ( p_api_version_number IN NUMBER
151: ,p_budget_version_name IN VARCHAR2 /* Introduced for bug 3133930*/
152: ,p_init_msg_list IN VARCHAR2
153: ,px_pa_project_id IN OUT NOCOPY pa_projects_all.project_id%TYPE --File.Sql.39 bug 4440895
154: ,p_pm_project_reference IN pa_projects_all.pm_project_reference%TYPE
155: ,p_pm_product_code IN pa_projects_all.pm_product_code%TYPE
156: ,p_budget_type_code IN pa_budget_types.budget_type_code%TYPE
157: ,p_entry_method_code IN pa_budget_entry_methods.budget_entry_method_code%TYPE
150: ( p_api_version_number IN NUMBER
151: ,p_budget_version_name IN VARCHAR2 /* Introduced for bug 3133930*/
152: ,p_init_msg_list IN VARCHAR2
153: ,px_pa_project_id IN OUT NOCOPY pa_projects_all.project_id%TYPE --File.Sql.39 bug 4440895
154: ,p_pm_project_reference IN pa_projects_all.pm_project_reference%TYPE
155: ,p_pm_product_code IN pa_projects_all.pm_product_code%TYPE
156: ,p_budget_type_code IN pa_budget_types.budget_type_code%TYPE
157: ,p_entry_method_code IN pa_budget_entry_methods.budget_entry_method_code%TYPE
158: ,px_resource_list_name IN OUT NOCOPY pa_resource_lists_tl.name%TYPE --File.Sql.39 bug 4440895
151: ,p_budget_version_name IN VARCHAR2 /* Introduced for bug 3133930*/
152: ,p_init_msg_list IN VARCHAR2
153: ,px_pa_project_id IN OUT NOCOPY pa_projects_all.project_id%TYPE --File.Sql.39 bug 4440895
154: ,p_pm_project_reference IN pa_projects_all.pm_project_reference%TYPE
155: ,p_pm_product_code IN pa_projects_all.pm_product_code%TYPE
156: ,p_budget_type_code IN pa_budget_types.budget_type_code%TYPE
157: ,p_entry_method_code IN pa_budget_entry_methods.budget_entry_method_code%TYPE
158: ,px_resource_list_name IN OUT NOCOPY pa_resource_lists_tl.name%TYPE --File.Sql.39 bug 4440895
159: ,px_resource_list_id IN OUT NOCOPY pa_resource_lists_all_bg.resource_list_id%TYPE --File.Sql.39 bug 4440895
193: ) IS
194:
195: -- Cursor to get the cost and revenue budget entry flags from the project type
196: CURSOR l_cost_rev_budget_entry_csr
197: (c_project_id pa_projects.project_id%type)
198: IS
199: SELECT ppt.allow_cost_budget_entry_flag
200: ,ppt.allow_rev_budget_entry_flag
201: FROM pa_project_types ppt
198: IS
199: SELECT ppt.allow_cost_budget_entry_flag
200: ,ppt.allow_rev_budget_entry_flag
201: FROM pa_project_types ppt
202: ,pa_projects_all ppa
203: WHERE ppa.project_id = c_project_id
204: AND ppa.project_type = ppt.project_type;
205:
206: -- Cursor to get the details of the budget entry method passed
219:
220: -- Cursor to get the plan type details of the version being created. Created as part
221: -- of changes due to fin plan in AMG
222: CURSOR l_proj_fp_options_csr
223: ( c_project_id pa_projects.project_id%TYPE
224: ,c_fin_plan_type_id pa_fin_plan_types_b.fin_plan_type_id%TYPE)
225: IS
226: SELECT fin_plan_preference_code
227: ,nvl(plan_in_multi_curr_flag,'N') plan_in_multi_curr_flag
248:
249: -- Cursot to get the segment 1 of the project. Added baseline funding flag as part
250: -- changes due to finplan in AMG
251: CURSOR l_amg_project_csr
252: (c_project_id pa_projects_all.project_id%TYPE)
253: IS
254: SELECT segment1
255: ,baseline_funding_flag
256: FROM pa_projects_all
252: (c_project_id pa_projects_all.project_id%TYPE)
253: IS
254: SELECT segment1
255: ,baseline_funding_flag
256: FROM pa_projects_all
257: WHERE project_id=c_project_id;
258:
259: l_amg_project_rec l_amg_project_csr%ROWTYPE;
260:
260:
261: -- Cursor to get the planning level ,resource list and time phasing from the plan type
262: -- Added as part of changes due to finplan in AMG
263: CURSOR l_plan_type_settings_csr
264: ( c_project_id pa_projects.project_id%TYPE
265: ,c_fin_plan_type_id pa_fin_plan_types_b.fin_plan_type_id%TYPE
266: ,c_version_type VARCHAR2)
267:
268: IS
327: -- Cursor to know whether a version exists for plan type created by upgrading the budget type
328: -- which is given as input. Crated as part of changes due to finplan in AMG
329: CURSOR is_budget_type_upgraded_csr
330: ( c_budget_type_code pa_budget_types.budget_type_code%TYPE
331: ,c_project_id pa_projects_all.project_id%TYPE)
332: IS
333: SELECT 'X'
334: FROM pa_fin_plan_types_b fin ,pa_proj_fp_options pfo
335: WHERE pfo.project_id=c_project_id
416: -- is reported while validating the input parameters
417: -- passed by the user
418: l_any_error_occurred_flag VARCHAR2(1) :='N';
419:
420: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
421: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
422: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
423: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
424: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
417: -- passed by the user
418: l_any_error_occurred_flag VARCHAR2(1) :='N';
419:
420: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
421: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
422: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
423: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
424: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
425: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
418: l_any_error_occurred_flag VARCHAR2(1) :='N';
419:
420: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
421: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
422: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
423: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
424: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
425: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
426: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
419:
420: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
421: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
422: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
423: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
424: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
425: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
426: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
427: l_uncategorized_rlmid pa_resource_list_members.resource_list_member_id%TYPE;
420: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
421: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
422: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
423: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
424: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
425: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
426: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
427: l_uncategorized_rlmid pa_resource_list_members.resource_list_member_id%TYPE;
428: l_is_rate_type_valid BOOLEAN;
421: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
422: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
423: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
424: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
425: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
426: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
427: l_uncategorized_rlmid pa_resource_list_members.resource_list_member_id%TYPE;
428: l_is_rate_type_valid BOOLEAN;
429: l_planning_level_lookup CONSTANT VARCHAR2(30) := 'BUDGET ENTRY LEVEL';
422: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
423: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
424: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
425: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
426: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
427: l_uncategorized_rlmid pa_resource_list_members.resource_list_member_id%TYPE;
428: l_is_rate_type_valid BOOLEAN;
429: l_planning_level_lookup CONSTANT VARCHAR2(30) := 'BUDGET ENTRY LEVEL';
430: l_time_phasing_lookup CONSTANT VARCHAR2(30) := 'BUDGET TIME PHASED TYPE';
446:
447: -- for bug 3954329
448: l_res_list_migration_code pa_resource_list_members.migration_code%TYPE := FND_API.G_MISS_CHAR;
449: l_targ_request_id pa_budget_versions.request_id%TYPE;
450: px_pa_project_id_in pa_projects_all.project_id%TYPE;
451: px_resource_list_id_in pa_resource_lists_all_bg.resource_list_id%TYPE;
452: px_fin_plan_type_id_in pa_fin_plan_types_b.fin_plan_type_id%TYPE;
453:
454: BEGIN
2742: AND trunc(sysdate) BETWEEN trunc(start_date_active) and trunc(nvl(end_date_active,sysdate));
2743:
2744: --Cursor to get the plan type details of the version being created.
2745: CURSOR l_proj_fp_options_csr
2746: ( c_project_id pa_projects.project_id%TYPE
2747: ,c_fin_plan_type_id pa_fin_plan_types_b.fin_plan_type_id%TYPE
2748: ,c_version_type pa_budget_versions.version_type%TYPE
2749: ,c_fin_plan_version_id pa_budget_versions.budget_version_id%TYPE)
2750: IS
2768:
2769:
2770: -- Cursor to get the segment 1 of the project.
2771: CURSOR l_amg_project_csr
2772: (c_project_id pa_projects_all.project_id%TYPE)
2773: IS
2774: SELECT segment1
2775: FROM pa_projects_all
2776: WHERE project_id=c_project_id;
2771: CURSOR l_amg_project_csr
2772: (c_project_id pa_projects_all.project_id%TYPE)
2773: IS
2774: SELECT segment1
2775: FROM pa_projects_all
2776: WHERE project_id=c_project_id;
2777:
2778: -- Cursor used in validating the product code
2779: Cursor p_product_code_csr (c_pm_product_code IN VARCHAR2)
4103:
4104: --needed to get the field values associated to a AMG message
4105:
4106: CURSOR l_amg_project_csr
4107: (p_pa_project_id pa_projects.project_id%type)
4108: IS
4109: SELECT segment1
4110: FROM pa_projects p
4111: WHERE p.project_id = p_pa_project_id;
4106: CURSOR l_amg_project_csr
4107: (p_pa_project_id pa_projects.project_id%type)
4108: IS
4109: SELECT segment1
4110: FROM pa_projects p
4111: WHERE p.project_id = p_pa_project_id;
4112:
4113: --needed to get the unit_of_measure and track_as_labor_flag for this resource_list_member
4114: --and check for valid resource_list / member combination
5073:
5074: BEGIN
5075: SELECT projfunc_currency_code
5076: INTO l_txn_currency_code
5077: FROM pa_projects_all a, pa_budget_versions b, pa_resource_Assignments c
5078: WHERE a.project_id = b.project_id
5079: AND b.budget_version_id = c.budget_version_id
5080: AND c.resource_assignment_id = p_resource_assignment_id
5081: AND b.ci_id IS NULL; --
5673: -- sgoteti 11-May-05 Added p_run_id parameter. This parameter will be used in web ADI flow only
5674: PROCEDURE Validate_Budget_Lines
5675: ( p_calling_context IN VARCHAR2 DEFAULT 'BUDGET_LINE_LEVEL_VALIDATION'
5676: ,p_run_id IN pa_fp_webadi_upload_inf.run_id%TYPE
5677: ,p_pa_project_id IN pa_projects_all.project_id%TYPE
5678: ,p_budget_type_code IN pa_budget_types.budget_type_code%TYPE
5679: ,p_fin_plan_type_id IN pa_fin_plan_types_b.fin_plan_type_id%TYPE
5680: ,p_version_type IN pa_budget_versions.version_type%TYPE
5681: ,p_resource_list_id IN pa_resource_lists_all_bg.resource_list_id%TYPE
5754: ,c_project_id pa_fp_txn_currencies.project_id%TYPE)
5755: IS
5756: SELECT txn_currency_code
5757: FROM pa_fp_txn_currencies ptxn
5758: ,pa_projects_all p
5759: WHERE p.project_id=c_project_id
5760: AND ptxn.project_id = p.project_id
5761: AND ptxn.txn_currency_code NOT IN (p.project_currency_code, p.projfunc_currency_code)
5762: AND ptxn.proj_fp_options_id = c_proj_fp_options_id; --made changes to the sql for bug 4886319 (performance)
5769: ,c_fin_plan_version_id pa_fp_txn_currencies.fin_plan_version_id%TYPE)
5770: IS
5771: SELECT txn_currency_code
5772: FROM pa_fp_txn_currencies ptxn
5773: ,pa_projects_all p
5774: WHERE p.project_id = c_project_id
5775: AND ptxn.project_id = p.project_id
5776: AND ptxn.fin_plan_type_id = c_fin_plan_type_id
5777: AND ptxn.txn_currency_code NOT IN (p.project_currency_code, p.projfunc_currency_code)
5804: WHERE prlm.resource_list_member_id = c_resource_list_member_id;
5805:
5806: --cursor to get the field values associated to a AMG message
5807: CURSOR l_amg_project_csr
5808: (c_pa_project_id pa_projects.project_id%type)
5809: IS
5810: SELECT segment1
5811: FROM pa_projects p
5812: WHERE p.project_id = c_pa_project_id;
5807: CURSOR l_amg_project_csr
5808: (c_pa_project_id pa_projects.project_id%type)
5809: IS
5810: SELECT segment1
5811: FROM pa_projects p
5812: WHERE p.project_id = c_pa_project_id;
5813:
5814: l_amg_project_rec l_amg_project_csr%ROWTYPE;
5815:
5823: --This cursor is used to get the approved rev plan type flag of the plan type
5824: --Added as part of the changes for fin plan model in FP L
5825: CURSOR l_approved_revenue_flag_csr
5826: ( c_fin_plan_type_id pa_fin_plan_types_b.fin_plan_type_id%TYPE
5827: ,c_project_id pa_projects_all.project_id%TYPE)
5828: IS
5829: SELECT approved_rev_plan_type_flag,
5830: proj_fp_options_id
5831: FROM pa_proj_fp_options
5883: l_module_name VARCHAR2(80);
5884: l_top_task_id pa_tasks.top_task_id%TYPE;
5885: l_dummy VARCHAR2(1);
5886: l_txn_currency_code pa_fp_txn_currencies.txn_currency_code%TYPE;
5887: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
5888: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
5889: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
5890: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
5891: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
5884: l_top_task_id pa_tasks.top_task_id%TYPE;
5885: l_dummy VARCHAR2(1);
5886: l_txn_currency_code pa_fp_txn_currencies.txn_currency_code%TYPE;
5887: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
5888: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
5889: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
5890: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
5891: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
5892: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
5885: l_dummy VARCHAR2(1);
5886: l_txn_currency_code pa_fp_txn_currencies.txn_currency_code%TYPE;
5887: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
5888: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
5889: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
5890: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
5891: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
5892: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
5893: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
5886: l_txn_currency_code pa_fp_txn_currencies.txn_currency_code%TYPE;
5887: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
5888: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
5889: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
5890: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
5891: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
5892: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
5893: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
5894: l_top_task_planning_level pa_fp_elements.top_task_planning_level%TYPE;
5887: l_multi_currency_billing_flag pa_projects_all.multi_currency_billing_flag%TYPE;
5888: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
5889: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
5890: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
5891: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
5892: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
5893: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
5894: l_top_task_planning_level pa_fp_elements.top_task_planning_level%TYPE;
5895: l_res_planning_level pa_fp_elements.resource_planning_level%TYPE;
5888: l_project_currency_code pa_projects_all.project_currency_code%TYPE ;
5889: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
5890: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
5891: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
5892: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
5893: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
5894: l_top_task_planning_level pa_fp_elements.top_task_planning_level%TYPE;
5895: l_res_planning_level pa_fp_elements.resource_planning_level%TYPE;
5896: l_uncategorized_res_list_id pa_resource_list_members.resource_list_id%TYPE;
5889: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE ;
5890: l_project_cost_rate_type pa_projects_all.project_rate_type%TYPE ;
5891: l_projfunc_cost_rate_type pa_projects_all.projfunc_cost_rate_type%TYPE ;
5892: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE ;
5893: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE ;
5894: l_top_task_planning_level pa_fp_elements.top_task_planning_level%TYPE;
5895: l_res_planning_level pa_fp_elements.resource_planning_level%TYPE;
5896: l_uncategorized_res_list_id pa_resource_list_members.resource_list_id%TYPE;
5897: l_uncategorized_rlmid pa_resource_list_members.resource_list_member_id%TYPE;
6221: where spread_curve_code = 'FIXED_DATE';
6222:
6223: select segment1
6224: into l_project_number
6225: from pa_projects_all
6226: where project_id=p_pa_project_id;
6227:
6228: END IF; -- Bug 5509192
6229:
8807: -- 27-SEP-2005 jwhite Created per bug 4588279
8808:
8809:
8810: PROCEDURE Get_Latest_BC_Year
8811: ( p_pa_project_id IN pa_projects_all.project_id%TYPE
8812: ,x_latest_encumbrance_year OUT NOCOPY gl_ledgers.Latest_Encumbrance_Year%TYPE
8813: ,x_return_status OUT NOCOPY VARCHAR2
8814: ,x_msg_count OUT NOCOPY NUMBER
8815: ,x_msg_data OUT NOCOPY VARCHAR2
8838: SELECT l.Latest_Encumbrance_Year
8839: INTO x_latest_encumbrance_year
8840: FROM GL_ledgers l
8841: , pa_implementations_all i
8842: , pa_projects_all p
8843: WHERE l.LEDGER_ID = i.set_of_books_id
8844: AND i.org_id = p.org_id
8845: AND p.project_id = p_pa_project_id;
8846: