[Home] [Help]
81: X_proj_bcost_flag VARCHAR2(10) DEFAULT 'N';
82: BEGIN
83: SELECT nvl(burden_cost_flag,'N')
84: INTO X_proj_bcost_flag
85: FROM pa_projects_all proj,
86: pa_project_types_all ptype
87: WHERE proj.project_type = ptype.project_type
88: AND nvl(proj.org_id, -99) = nvl(ptype.org_id,-99)
89: AND project_id = p_Project_id ;
139: BEGIN
140:
141: SELECT 'Y'
142: INTO l_billable
143: FROM pa_projects_all pp,
144: pa_tasks t,
145: pa_project_types_all pt /** Bug fix 2262118 **/
146: WHERE t.task_id = p_task_id
147: AND pp.project_id = t.project_id
2308: ,l_old_billability
2309: FROM pa_expenditure_items_all EI
2310: ,pa_transaction_sources tr
2311: ,pa_project_types_all pt /** Bug fix 2262118 **/
2312: ,pa_projects_all pp
2313: -- ,pa_tasks t /* Bug 3457922 */
2314: WHERE tr.transaction_source(+) = ei.transaction_source
2315: AND ei.expenditure_item_id = ItemsIdTab(i)
2316: -- AND t.task_id = ei.task_id /* Bug 3457922 */
3682: --IF X_project_currency_code is NULL then
3683: BEGIN
3684: SELECT decode(project_currency_code,NULL,projfunc_currency_code,project_currency_code)
3685: INTO l_project_currency_code
3686: FROM pa_projects_all
3687: WHERE project_id = x_dest_prj_id;
3688: EXCEPTION
3689: WHEN NO_DATA_FOUND then
3690: Raise;
5448: l_source_expenditure_item_id PA_EXPENDITURE_ITEMS_ALL.SOURCE_EXPENDITURE_ITEM_ID%TYPE;
5449: l_acct_currency_code PA_EXPENDITURE_ITEMS_ALL.ACCT_CURRENCY_CODE%TYPE;
5450: l_adjusted_expenditure_item_id PA_EXPENDITURE_ITEMS_ALL.ADJUSTED_EXPENDITURE_ITEM_ID%TYPE;
5451: l_orig_transaction_reference PA_EXPENDITURE_ITEMS_ALL.ORIG_TRANSACTION_REFERENCE%TYPE;
5452: l_project_status_code PA_PROJECTS_ALL.PROJECT_STATUS_CODE%TYPE;
5453: l_adjust_allowed BOOLEAN := TRUE;
5454: l_award_id GMS_AWARDS_ALL.AWARD_ID%TYPE; /* Bug 5436420 */
5455: l_project_id_cache PA_PROJECTS_ALL.PROJECT_ID%TYPE := -1; /* Bug 5441891 */
5456: l_transaction_source_cache PA_TRANSACTION_SOURCES.TRANSACTION_SOURCE%TYPE := 'NULL'; /* Bug 5441891 */
5451: l_orig_transaction_reference PA_EXPENDITURE_ITEMS_ALL.ORIG_TRANSACTION_REFERENCE%TYPE;
5452: l_project_status_code PA_PROJECTS_ALL.PROJECT_STATUS_CODE%TYPE;
5453: l_adjust_allowed BOOLEAN := TRUE;
5454: l_award_id GMS_AWARDS_ALL.AWARD_ID%TYPE; /* Bug 5436420 */
5455: l_project_id_cache PA_PROJECTS_ALL.PROJECT_ID%TYPE := -1; /* Bug 5441891 */
5456: l_transaction_source_cache PA_TRANSACTION_SOURCES.TRANSACTION_SOURCE%TYPE := 'NULL'; /* Bug 5441891 */
5457: l_commit_count NUMBER := 0; /* Bug 5501593 */
5458: /* R12 Changes - End */
5459: BEGIN
5601:
5602: if x_billable_flag is not null then
5603: where_clause := where_clause || ' AND 1 = (SELECT 1'
5604: || ' FROM pa_project_types_all pt'
5605: || ' , pa_projects_all p'
5606: || ' WHERE p.project_type = pt.project_type'
5607: || ' AND p.org_id = pt.org_id'
5608: || ' AND p.project_id = ei.project_id'
5609: || ' AND pt.project_type_class_code <> ''CAPITAL'')'
5640:
5641: if x_revenue_distributed_flag is not null then
5642: where_clause := where_clause || ' AND 1 = (SELECT 1'
5643: || ' FROM pa_project_types_all pt'
5644: || ' , pa_projects_all p'
5645: || ' WHERE p.project_type = pt.project_type'
5646: || ' AND p.org_id = pt.org_id'
5647: || ' AND p.project_id = ei.project_id'
5648: || ' AND pt.project_type_class_code <> ''CAPITAL'')'
5848:
5849: if x_capitalizable_flag is not null then
5850: where_clause := where_clause || ' AND 1 = (SELECT 1'
5851: || ' FROM pa_project_types_all pt'
5852: || ' , pa_projects_all p'
5853: || ' WHERE p.project_type = pt.project_type'
5854: || ' AND p.org_id = pt.org_id'
5855: || ' AND p.project_id = ei.project_id'
5856: || ' AND pt.project_type_class_code = ''CAPITAL'')'
5859:
5860: if x_grouped_cip_flag is not null then
5861: where_clause := where_clause || ' AND 1 = (SELECT 1'
5862: || ' FROM pa_project_types_all pt'
5863: || ' , pa_projects_all p'
5864: || ' WHERE p.project_type = pt.project_type'
5865: || ' AND p.org_id = pt.org_id'
5866: || ' AND p.project_id = ei.project_id'
5867: || ' AND pt.project_type_class_code = ''CAPITAL'')'
5874:
5875: if p_grouped_rwip_flag is not null then
5876: where_clause := where_clause || ' AND 1 = (SELECT 1'
5877: || ' FROM pa_project_types_all pt'
5878: || ' , pa_projects_all p'
5879: || ' WHERE p.project_type = pt.project_type'
5880: || ' AND p.org_id = pt.org_id'
5881: || ' AND p.project_id = ei.project_id'
5882: || ' AND pt.project_type_class_code = ''CAPITAL'')'
5889:
5890: if p_expensed_flag = 'Y' then /* Bug 5393328 */
5891: where_clause := where_clause || ' AND 1 = (SELECT 1'
5892: || ' FROM pa_project_types_all pt'
5893: || ' , pa_projects_all p'
5894: || ' WHERE p.project_type = pt.project_type'
5895: || ' AND p.org_id = pt.org_id'
5896: || ' AND p.project_id = ei.project_id'
5897: || ' AND pt.project_type_class_code = ''CAPITAL'')'
6236: , p.project_status_code
6237: INTO v_project_type_class_code
6238: , l_project_status_code
6239: FROM pa_project_types_all pt
6240: , pa_projects_all p
6241: WHERE p.project_type = pt.project_type
6242: AND p.org_id = pt.org_id
6243: AND p.project_id = l_project_id;
6244: l_project_id_cache := l_project_id;
6655: l_start_date DATE;
6656: l_end_date DATE;
6657: cursor proj_start_end_date is
6658: select start_date, completion_date
6659: from pa_projects_all
6660: where project_id = X_dest_prj_id;
6661: begin
6662: open proj_start_end_date;
6663: fetch proj_start_end_date into l_start_date, l_end_date;
9377: l_rate_sch_id pa_std_bill_rate_schedules_all.bill_rate_sch_id%TYPE;
9378: l_acct_rate_type pa_expenditure_items_all.acct_rate_type%TYPE;
9379: l_acct_rate_date_code pa_implementations_all.acct_rate_date_code%TYPE;
9380: l_acct_exch_rate pa_org_labor_sch_rule.acct_exchange_rate%TYPE;
9381: l_ot_project_id pa_projects_all.project_id%TYPE;
9382: l_ot_task_id pa_tasks.task_id%TYPE;
9383: l_err_stage number;
9384: l_err_code varchar2(1000);
9385: OTHERS_EXCEPTION EXCEPTION;