173:
174: Cursor Get_def_Res_List is
175: Select Default_Resource_List_Id,
176: pa_resource_list_assignments_s.nextval
177: from pa_project_types
178: where project_type = p_project_type;
179:
180: x_def_res_list_id Number := 0;
181: x_def_use_Code Varchar2(30) := 'ACTUALS_ACCUM';
530: if x_err_stage = 'PA_INVALID_PT_CLASS_ORG' then
531:
532: select meaning
533: into t_project_type_class_code
534: from pa_project_types pt ,pa_lookups lps
535: where pt.project_type = p_project_type
536: and lps.lookup_type(+) = 'PROJECT TYPE CLASS'
537: and lps.lookup_code(+) = pt.project_type_class_code;
538:
1299:
1300: CURSOR cur_project_type_class
1301: IS
1302: SELECT project_type_class_code
1303: FROM pa_project_types_all
1304: WHERE project_type = p_project_type;
1305:
1306: CURSOR cur_bill_flag( c_work_type_id NUMBER )
1307: IS
1795: if l_err_stage = 'PA_INVALID_PT_CLASS_ORG' then
1796:
1797: select meaning
1798: into l_project_type_class_code
1799: from pa_project_types pt
1800: , pa_lookups lps
1801: where pt.project_type = p_project_type
1802: and lps.lookup_type(+) = 'PROJECT TYPE CLASS'
1803: and lps.lookup_code(+) = pt.project_type_class_code;
2709: DECLARE
2710: CURSOR cur_pa_proj_type
2711: IS
2712: SELECT project_type_id
2713: FROM pa_project_types ppt, pa_projects pp
2714: WHERE project_id = p_project_id
2715: AND pp.project_type = ppt.project_type;
2716: l_project_type_id NUMBER;
2717: BEGIN
3005: DECLARE
3006: CURSOR cur_pa_proj_type
3007: IS
3008: SELECT project_type_id
3009: FROM pa_project_types ppt, pa_projects pp
3010: WHERE project_id = p_project_id
3011: AND pp.project_type = ppt.project_type;
3012: l_project_type_id NUMBER;
3013: BEGIN