[Home] [Help]
337: l_currency_record_type := 4;
338: BEGIN
339: SELECT projfunc_currency_code
340: INTO l_Currency_Code
341: FROM pa_projects_all
342: WHERE project_id = l_project_ids_tbl(i);
343: EXCEPTION
344: WHEN OTHERS THEN
345: l_Currency_Code := NULL;
349: l_currency_record_type := 8;
350: BEGIN
351: SELECT project_currency_code
352: INTO l_Currency_Code
353: FROM pa_projects_all
354: WHERE project_id = l_project_ids_tbl(i);
355: EXCEPTION
356: WHEN OTHERS THEN
357: l_Currency_Code := NULL;
1901: END IF;
1902:
1903: SELECT pia.fte_day
1904: INTO l_hours_per_day
1905: FROM pa_implementations_all pia, pa_projects_all ppa WHERE pia.org_id = ppa.org_id and ppa.project_id = pProjectId;
1906:
1907: /* To handle the program reporting when current version and orginal version are same
1908: * we have to generate a local table with current version orginal version in different
1909: * rows even the version id is same. So we will fix the index of those plan versions
1956: ELSE
1957: BEGIN
1958: SELECT DISTINCT UPPER(t.project_type_class_code)
1959: INTO l_project_type_class
1960: FROM pa_projects_all p
1961: , pa_project_types_all t
1962: WHERE 1=1
1963: AND p.project_id = pProjectId
1964: AND p.project_type = t.project_type
2000: /* Added by Ning to get the next invoice date */
2001: SELECT start_date, billing_cycle_id,
2002: billing_offset
2003: INTO l_start_date, l_billing_cycle_id, l_billing_offset
2004: FROM pa_projects_all
2005: WHERE project_id = pProjectId;
2006:
2007: l_next_invoice_date :=
2008: Pa_Billing_Cycles_Pkg.get_next_billing_date(
3211: , org_id
3212: INTO
3213: xDaysSinceITD
3214: , l_org_id
3215: FROM pa_projects_all,
3216: ( SELECT end_date
3217: FROM pji_time_ent_period_v
3218: WHERE 1=1
3219: AND TO_DATE(pPeriodDateJulian,'j') BETWEEN start_date AND end_date