625: RETURN VARCHAR2 IS
626: CURSOR class_cdl (c_project_id NUMBER)
627: IS
628: SELECT '1'
629: FROM pa_expenditure_items pai, --Bug#3088387pa_tasks t,
630: pa_cost_distribution_lines pcd
631: WHERE pai.project_id=c_project_id AND --Bug#3088387t.task_id AND
632: pai.expenditure_item_id=pcd.expenditure_item_id ;
633: -- Bug#3088387AND t.project_id=c_project_id;
701: l_rec_Status_flag VARCHAR2(1);
702: l_project_id NUMBER;
703: BEGIN
704: x_return_status := 'S';
705: if p_object_type = 'PA_TASKS' then
706: SELECT project_id
707: INTO l_project_id
708: FROM pa_tasks
709: WHERE task_id = p_object_id;
704: x_return_status := 'S';
705: if p_object_type = 'PA_TASKS' then
706: SELECT project_id
707: INTO l_project_id
708: FROM pa_tasks
709: WHERE task_id = p_object_id;
710: else
711: l_project_id := p_object_id;
712: end if;
1843: FROM sys.dual
1844: WHERE EXISTS
1845: (SELECT NULL
1846: FROM pa_expenditure_items_all pai,
1847: pa_tasks t,
1848: pa_cost_distribution_lines_all pcd
1849: WHERE pai.task_id = t.task_id
1850: AND pai.expenditure_item_id = pcd.expenditure_item_id
1851: AND t.project_id = p_project_id);