The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT multi_currency_billing_flag,
share_across_ou_br_sch_flag,
allow_funding_across_ou_flag,
default_rate_type,
pa_currency.get_currency_code,
competence_match_wt,
availability_match_wt,
job_level_match_wt
INTO x_multi_currency_billing_flag,
x_share_bill_rates_across_OU,
x_allow_funding_across_OU,
x_default_exchange_rate_type,
x_functional_currency,
x_competence_match_wt,
x_availability_match_wt,
x_job_level_match_wt
FROM pa_implementations;
SELECT invproc_currency_type, revproc_currency_code,
project_currency_code, project_bil_rate_date_code,
project_bil_rate_type, project_bil_rate_date,
project_bil_exchange_rate,
projfunc_currency_code, projfunc_bil_rate_date_code,
projfunc_bil_rate_type, projfunc_bil_rate_date,
projfunc_bil_exchange_rate,
funding_rate_date_code, funding_rate_type,
funding_rate_date, funding_exchange_rate,
baseline_funding_flag, multi_currency_billing_flag
INTO x_invproc_currency_type, x_revproc_currency_code,
x_project_currency_code, x_project_bil_rate_date_code,
x_project_bil_rate_type, x_project_bil_rate_date,
x_project_bil_exchange_rate,
x_projfunc_currency_code, x_projfunc_bil_rate_date_code,
x_projfunc_bil_rate_type, x_projfunc_bil_rate_date,
x_projfunc_bil_exchange_rate,
x_funding_rate_date_code, x_funding_rate_type,
x_funding_rate_date, x_funding_exchange_rate,
x_baseline_funding_flag, x_multi_currency_billing_flag
FROM pa_projects_all
WHERE project_id = p_project_id;
SELECT funding_currency_code
INTO x_invproc_currency_code
FROM pa_summary_project_fundings
WHERE project_id = p_project_id
AND rownum = 1
AND NVL(total_baselined_amount,0) > 0; /* Added for bug 2834362 */
SELECT multi_currency_billing_flag
INTO l_multi_currency_billing_flag
FROM pa_projects_all
WHERE project_id = p_project_id;
SELECT multi_currency_billing_flag
INTO l_multi_currency_billing_flag
FROM pa_implementations_all
WHERE org_id = p_org_id; /*Bug 5368089*/
SELECT share_across_ou_br_sch_flag
INTO l_share_across_ou_br_sch_flag
FROM pa_implementations_all
WHERE org_id = p_org_id; /*Bug 5368089*/
SELECT allow_funding_across_ou_flag
INTO l_allow_funding_across_ou_flag
FROM pa_implementations;
SELECT invproc_currency_type, project_currency_code,
projfunc_currency_code
INTO l_invproc_currency_type, l_project_currency_code,
l_projfunc_currency_code
FROM pa_projects_all
WHERE project_id = p_project_id;
SELECT funding_currency_code
INTO l_invproc_currency_code
FROM pa_summary_project_fundings
WHERE project_id = p_project_id
AND rownum = 1;
SELECT FC.Currency_Code currency_code,
FC.Minimum_Accountable_Unit mau,
FC.Precision sp,
FC.Extended_Precision ep
FROM FND_CURRENCIES FC
WHERE EXISTS
(SELECT null FROM
pa_projects_all pr
where pr.project_id = p_project_id AND
fc.currency_code in (pr.project_currency_code,
pr.projfunc_currency_code)
UNION
SELECT null from
PA_SUMMARY_PROJECT_FUNDINGS spf
WHERE project_id = p_project_id
AND spf.funding_currency_code = fc.currency_code
AND spf.total_baselined_amount <> 0 )
ORDER BY currency_code;
CurrAttrTab.delete;
l_CurrCodeTab.delete;
l_MauTab.delete;
l_SpTab.delete;
l_EpTab.delete;
SELECT FC.Minimum_Accountable_Unit,
FC.Precision,
FC.Extended_Precision
INTO x_mau,
x_sp,
x_ep
FROM FND_CURRENCIES FC
WHERE FC.Currency_Code = p_curr_code;
SELECT sum(nvl(allocated_amount,0))
INTO l_baseline_amount
FROM PA_PROJECT_FUNDINGS P
WHERE P.PROJECT_ID = p_project_id
AND budget_type_code = 'BASELINE';
SELECT 'Y' into lv_return_flag
FROM PA_PROJECT_FUNDINGS P
WHERE P.PROJECT_ID = p_project_id
AND budget_type_code = 'DRAFT';
SELECT 'Y' into lv_return_flag FROM dual
WHERE exists
(SELECT project_id
FROM pa_project_fundings
WHERE project_id = p_project_id
AND budget_type_code = 'DRAFT');
SELECT 'Y' into lv_return_flag from dual
where exists
(select project_id
from pa_events
where project_id = p_project_id);
SELECT 'Y' into lv_return_flag from dual
where exists
(select T.project_id
from pa_expenditure_items_all E, pa_tasks T
where T.project_id = p_project_id
and E.task_id = T.task_id);
SELECT 'Y' into lv_return_flag from dual
where exists
(select E.project_id
from pa_expenditure_items_all E
where E.project_id = p_project_id);
SELECT ppt.baseline_funding_flag
,ppt.NON_LAB_STD_BILL_RT_SCH_ID
,brs.std_bill_rate_schedule
,brs.rate_sch_currency_code
FROM pa_project_types ppt, pa_std_bill_rate_schedules brs
WHERE ppt.project_type = p_project_type
AND ppt.non_lab_std_bill_rt_sch_id = brs.bill_rate_sch_id(+);
SELECT 'Y' INTO lv_return_flag FROM DUAL
WHERE EXISTS ( SELECT spf.project_id
FROM pa_summary_project_fundings spf, pa_agreements a,
pa_projects_all P
WHERE spf.agreement_id = a.agreement_id
AND spf.project_id = p.project_id
AND a.org_id <> p.org_id);
SELECT 'Y' INTO lv_return_flag FROM DUAL
WHERE EXISTS (SELECT p.project_type_id
FROM pa_std_bill_rate_schedules_all br, pa_project_types p
WHERE ( p.job_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( p.emp_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( p.non_lab_std_bill_rt_sch_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99)));
SELECT 'Y' INTO lv_return_flag FROM DUAL
WHERE EXISTS (SELECT p.project_id
FROM pa_std_bill_rate_schedules_all br, pa_projects p
WHERE ( p.job_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( p.emp_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( p.non_lab_std_bill_rt_sch_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99)));
SELECT 'Y' INTO lv_return_flag FROM DUAL
WHERE EXISTS (SELECT p.project_id
FROM pa_std_bill_rate_schedules_all br, pa_projects p,
pa_tasks t
WHERE p.project_id = t.project_id
AND ( ( t.job_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( t.emp_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( t.non_lab_std_bill_rt_sch_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))));
SELECT 'Y' INTO lv_return_flag FROM DUAL
WHERE EXISTS (SELECT p.project_id
FROM pa_projects p, pa_tasks t
WHERE p.project_id = t.project_id
AND EXISTS
(select null
FROM pa_std_bill_rate_schedules_all br
WHERE ( (t.job_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( t.emp_bill_rate_schedule_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
OR ( t.non_lab_std_bill_rt_sch_id = br.BILL_RATE_SCH_ID
AND NVL(p.org_id,-99) <> NVL(br.org_id,-99))
)));
select baseline_funding_flag into lv_baseline_flag
from pa_projects_all
where project_id = p_project_id;
SELECT 'x'
FROM pa_project_customers
WHERE INV_CURRENCY_CODE = p_curr_code
AND project_id = p_project_id;
SELECT 'Y'
INTO l_Flag
FROM Dual
WHERE Exists ( SELECt 1 FROM PA_Project_Customers
WHERE Project_ID = p_Project_ID
AND Inv_Currency_Code <> p_pfc_Currency_Code);
SELECT 'Y'
INTO l_Flag
FROM Dual
WHERE Exists ( SELECT 1 FROM PA_Draft_Invoices_All
WHERE Project_ID = p_Project_ID
AND Inv_Currency_Code <> p_pfc_Currency_Code);
FUNCTION Check_update_ou_mcb_flag RETURN VARCHAR2 IS
lv_return_flag varchar2(1);
select pa_currency.get_currency_code
into l_currency_code
from dual ;
SELECT 'N' INTO lv_return_flag FROM DUAL
WHERE EXISTS ( SELECT a.agreement_id
FROM pa_agreements a
WHERE a.agreement_currency_code <> l_currency_code);
SELECT 'N' INTO lv_return_flag FROM DUAL
WHERE EXISTS ( SELECT b.bill_rate_sch_id
/* Commented for bug 2867740
FROM pa_bill_rates b
WHERE b.RATE_CURRENCY_CODE <> pa_currency.get_currency_code); */
END Check_update_ou_mcb_flag;
SELECT projfunc_currency_code into lv_projfunc_currency
FROM pa_projects
WHERE project_id = p_project_id;
SELECT 'Y' into lv_return_flag from dual
where exists (select null
from pa_billing_assignments asg
/* where nvl(asg.project_id,-99) = p_project_id Bug 2702200 Modified on 20/12/2002*/
where asg.project_id = p_project_id
and asg.project_id IS NOT NULL
and asg.rate_override_currency_code <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM pa_job_bill_rate_overrides jbr
/* where nvl(jbr.project_id,-99) = p_project_id Bug 2702200 Modified on 20/12/2002 */
where jbr.project_id = p_project_id
and jbr.project_id IS NOT NULL
and jbr.rate_currency_code <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM pa_nl_bill_rate_overrides nlr
/* where nvl(nlr.project_id,-99) = p_project_id Bug 2702200 Modified on 20/12/2002 */
where nlr.project_id = p_project_id
and nlr.project_id IS NOT NULL
and nlr.rate_currency_code <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM pa_emp_bill_rate_overrides emp
/* where nvl(emp.project_id,-99) = p_project_id Bug 2702200 Modified on 20/12/2002 */
where emp.project_id = p_project_id
and emp.project_id IS NOT NULL
and emp.rate_currency_code <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM PA_STD_BILL_RATE_SCHEDULES_all br, pa_projects p
where p.project_id = p_project_id
and br.BILL_RATE_SCH_ID in
(nvl(p.job_bill_rate_schedule_id,-99),
nvl(p.emp_bill_rate_schedule_id,-99),
nvl(p.non_lab_std_bill_rt_sch_id,-99))
and br.RATE_SCH_CURRENCY_CODE <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
from pa_billing_assignments asg, pa_tasks t
where t.project_id = p_project_id
/* and nvl(asg.top_task_id,-99) = t.task_id Bug 2702200 Modified on 20/12/2002 */
and asg.top_task_id = t.task_id
and asg.project_id = t.project_id -- added for bug 3517177
and asg.top_task_id IS NOT NULL
and asg.rate_override_currency_code <>lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM pa_job_bill_rate_overrides jbr, pa_tasks t
where t.project_id = p_project_id
/* and nvl(jbr.task_id,-99) = t.task_id Bug 2702200 Modified on 20/12/2002 */
and jbr.task_id = t.task_id
and jbr.task_id IS NOT NULL
and jbr.rate_currency_code <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM pa_nl_bill_rate_overrides nlr, pa_tasks t
where t.project_id = p_project_id
/* and nvl(nlr.task_id,-99) = t.task_id Modifed on 20/12/2002 */
and nlr.task_id = t.task_id
and nlr.task_id IS NOT NULL
and nlr.rate_currency_code <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM pa_emp_bill_rate_overrides emp, pa_tasks t
where t.project_id = p_project_id
/* and nvl(emp.task_id,-99) = t.task_id Modifed on 20/12/2002*/
and emp.task_id = t.task_id
and emp.task_id IS NOT NULL
and emp.rate_currency_code <> lv_projfunc_currency);
SELECT 'Y' into lv_return_flag from dual
where exists (select null
FROM PA_STD_BILL_RATE_SCHEDULES_all br, pa_tasks t
where t.project_id = p_project_id
and br.BILL_RATE_SCH_ID in
(nvl(t.job_bill_rate_schedule_id,-99),
nvl(t.emp_bill_rate_schedule_id,-99),
nvl(t.non_lab_std_bill_rt_sch_id, -99))
and br.RATE_SCH_CURRENCY_CODE <> lv_projfunc_currency);
SELECT 'x'
FROM pa_agreements a,
pa_summary_project_fundings f
WHERE a.customer_id = p_proj_customer_id
AND a.agreement_id = f.agreement_id
AND f.project_id = p_project_id
AND ( f.total_unbaselined_amount <>0
OR f.total_baselined_amount <> 0);