The following lines contain the word 'select', 'insert', 'update' or 'delete':
select ppa.start_date
,ppa.completion_date
into d_proj_start_date
,d_proj_end_date
from pa_projects_all ppa
where ppa.project_id =p_project_id
;
select ppa.start_date
,ppa.completion_date
,pt.start_date
,pt.completion_date
into d_proj_start_date
,d_proj_end_date
,d_task_start_date
,d_task_end_date
from pa_projects_all ppa
,pa_tasks pt
where ppa.project_id =p_project_id
and pt.project_id =ppa.project_id
and pt.task_id =p_task_id
;
FUNCTION PJM_SELECT_PROJECT_MANAGER(pn_project_id IN number
) return varchar2
IS
c_project_manager varchar2(240):='';
select fu.user_name project_manager
from fnd_user fu
,pa_project_players ppp
,pa_projects_all ppa
where fu.employee_id =ppp.person_id
and nvl(fu.end_date,sysdate) >=sysdate
and ppp.project_role_type = 'PROJECT MANAGER'
and ppp.project_id = ppa.project_id
and nvl(ppp.end_date_active,sysdate) >= sysdate
and ppa.project_id = pn_project_id
order by fu.user_name
;
END PJM_SELECT_PROJECT_MANAGER;
FUNCTION PJM_SELECT_TASK_MANAGER(pn_task_id IN number
) return varchar2
IS
c_task_manager varchar2(240):='';
select fu.user_name task_manager
from fnd_user fu
,pa_tasks pt
where fu.employee_id =pt.task_manager_person_id
and nvl(fu.end_date,sysdate) >=sysdate
and pt.task_id = pn_task_id
order by fu.user_name
;
END PJM_SELECT_TASK_MANAGER;
PROCEDURE SELECT_DOCUMENT_TYPE(ITEMTYPE IN VARCHAR2
,ITEMKEY IN VARCHAR2
,ACTID IN NUMBER
,FUNCMODE IN VARCHAR2
,RESULTOUT OUT NOCOPY VARCHAR2
) IS
BEGIN
if (funcmode='RUN') then
resultout:=wf_engine.getitemattrtext(itemtype => itemtype
,itemkey => itemkey
,aname => 'DOCUMENT_TYPE'
);
END SELECT_DOCUMENT_TYPE;