Workflow to find the superior

Question

I am designing a workflow for the leave approval ,that gets triggered from a form.
The Form has a LOV.From the LOV I select the number of levels of supervisors
to whom the approval should be forwarded.
In the workflow I have wriiten a procedure that selects the supervisor of the person and then sends a notifiacation to him. Then it checks if this person has a higher supervisor. if yes then it is send for approval to the higher one.
But my workflow is going out after one level of approvel only.
the following are the procedures written.
/*PROCEDURE TO CHECK FOR HIGHER APPROVER*/
CREATE OR REPLACE procedure APPS.higher_approval(
itemtype IN VARCHAR2,
itemkey IN VARCHAR2,
actid IN NUMBER,
funcmode IN VARCHAR2,
resultout OUT NOCOPY VARCHAR2
as
lv_person_name varchar2(100);
lv_approver varchar2(100);
lv_person_id varchar2(100);
lv_supervisor_id number;
lv_superior_id varchar2(100);
lv_counter1 number;
lv_counter_type varchar2(100);
begin
lv_counter_type := wf_engine.GetItemAttrtext
(itemtype => itemtype,
itemkey => itemkey,
aname => 'COUNTER_TYPE');
lv_counter1 := wf_engine.GetItemAttrtext
(itemtype => itemtype,
itemkey => itemkey,
aname => 'COUNTER1');
if lv_counter1 <> lv_counter_type
then
lv_person_name := wf_engine.GetItemAttrtext
(itemtype => itemtype,
itemkey => itemkey,
aname => 'APPROVAR_NAME');
begin
select full_name into lv_approver
from per_all_people_f
where person_id =(SELECT supervisor_id
--INTO lv_supervisor_id
FROM per_all_assignments_f,per_all_people_f
WHERE per_all_people_f.PERSON_ID = (SELECT EMPLOYEE_ID FROM FND_USER WHERE
USER_NAME=lv_person_name ));
EXCEPTION
when others
then
lv_approver := NULL;
end;
if lv_approver IS NOT NULL
then
wf_engine.setItemAttrText
(itemtype => itemtype,
itemkey => itemkey,
aname => 'APPROVAR_NAME',
avalue => upper(lv_approver));
lv_counter1:=lv_counter1+1;
wf_engine.setItemAttrText
(itemtype => itemtype,
itemkey => itemkey,
aname => 'COUNTER1',
avalue => upper(lv_counter1));
resultout :='YES';
else
resultout :='NO';
end if;
elsE
resultout:='NO';
end if;
end;
can any please help me solve my problem?

Answer 1

Hi,
lv_counter1 is a number. You are using the GetItemAttrTEXT API to retrieve it. What is the datatype of the attribute?
Does UPPER work on a number - UPPER(lv_counter1) doesn't seem right to me.
You aren't checking what the function mode is in your code, so if this is looping and the revisit flag isn't set correctly, then it will run in cancel mode as well as in run mode.
HTH,
Matt
WorkflowFAQ.com - the ONLY independent resource for Oracle Workflow development
Alpha review chapters from my book "Developing With Oracle Workflow" are available via my website http://www.workflowfaq.com
Have you read the blog at http://thoughts.workflowfaq.com ?
WorkflowFAQ support forum: http://forum.workflowfaq.com