80: IS
81: SELECT 'x'
82: FROM pa_project_role_types_v roles,
83: pa_role_controls controls,
84: pa_projects_all proj
85: WHERE proj.project_id = p_project_id
86: AND proj.ROLE_LIST_ID is null
87: AND roles.project_role_id = controls.project_role_id
88: AND roles.PROJECT_ROLE_TYPE = p_role_type
91: UNION ALL
92: SELECT 'x'
93: FROM pa_project_role_types_v roles,
94: pa_role_controls controls,
95: pa_projects_all proj,
96: pa_role_list_members prlm
97: WHERE proj.project_id = p_project_id
98: AND proj.ROLE_LIST_ID = prlm.role_list_id
99: AND prlm.project_role_id = roles.project_role_id
582: CURSOR l_valid_category_csr (c_project_id NUMBER, c_class_category VARCHAR2)
583: IS
584: SELECT 'Y'
585: FROM PA_VALID_CATEGORIES_V vc,
586: PA_PROJECTS_ALL ppa,
587: PA_PROJECT_TYPES_ALL ppta
588: WHERE ppa.project_id = c_project_id
589: AND ppa.project_type = ppta.project_type
590: AND nvl(ppa.org_id, -99) = nvl(ppta.org_id, -99)
601: SELECT 'Y'
602: FROM PA_CLASS_CATEGORIES cc,
603: PA_VALID_CATEGORIES vc,
604: PA_PROJECT_TYPES_ALL PPTA,
605: PA_PROJECTS_ALL PPA
606: WHERE PPA.PROJECT_ID = c_project_id
607: AND PPA.PROJECT_TYPE = PPTA.PROJECT_TYPE
608: -- AND nvl(PPA.ORG_ID, -99) = nvl(PPTA.ORG_ID, -99) - R12: Bug 4364092
609: AND PPA.ORG_ID = PPTA.ORG_ID
1244: --Bug 3279981
1245: --The revenue acrual method for the task needs to be defaulted from the (new) project
1246: CURSOR cur_get_rev_acc_mth IS
1247: SELECT revenue_accrual_method
1248: FROM pa_projects_all
1249: WHERE project_id = p_project_rec.project_id;
1250:
1251: CURSOR cur_get_inv_mth IS
1252: SELECT invoice_method
1249: WHERE project_id = p_project_rec.project_id;
1250:
1251: CURSOR cur_get_inv_mth IS
1252: SELECT invoice_method
1253: FROM pa_projects_all
1254: WHERE project_id = p_project_rec.project_id;
1255:
1256: CURSOR cur_get_def_top_task_cust IS
1257: SELECT customer_id
1672:
1673: else
1674:
1675:
1676: /* select adj_on_std_inv into l_adj_on_std_inv from pa_projects_all where project_id =p_project_rec.project_id ;
1677: commented for bug 12659208*/
1678:
1679: l_adj_on_std_inv := NULL;
1680:
12289: valid_def_ttsk_cust VARCHAR2(1) :='N';
12290:
12291: cursor project_data is
12292: select enable_top_task_customer_flag
12293: from pa_projects_all
12294: where project_id=p_project_id;
12295:
12296: l_enable_tt_cust_flag varchar2(1) :='N';
12297: l_cust_count number;