888: resultout out NOCOPY varchar2) is
889: l_result varchar2(10);
890: l_requester_user_name varchar2(360);
891: l_adhoc_role varchar2(360);
892: l_wf_roles boolean ;
893:
894:
895: CURSOR c_wf_adhoc_role(l_display_name in varchar2) IS
896: select name
893:
894:
895: CURSOR c_wf_adhoc_role(l_display_name in varchar2) IS
896: select name
897: from wf_roles
898: where display_name = upper(l_display_name);
899: begin
900:
901:
912: itemkey => itemkey,
913: aname => 'REQUESTER_USER_NAME');
914:
915:
916: --bug 7524239 check to see if the user is active in wf_roles
917: --bug 14083201 using wf_directory.userActive instead of
918: --WF_DIRECTORY.IsPerformer
919: l_wf_roles := wf_directory.UserActive(l_requester_user_name);
920:
915:
916: --bug 7524239 check to see if the user is active in wf_roles
917: --bug 14083201 using wf_directory.userActive instead of
918: --WF_DIRECTORY.IsPerformer
919: l_wf_roles := wf_directory.UserActive(l_requester_user_name);
920:
921: if not l_wf_roles then
922: Open c_wf_adhoc_role(l_requester_user_name);
923: Fetch c_wf_adhoc_role into l_adhoc_role;
917: --bug 14083201 using wf_directory.userActive instead of
918: --WF_DIRECTORY.IsPerformer
919: l_wf_roles := wf_directory.UserActive(l_requester_user_name);
920:
921: if not l_wf_roles then
922: Open c_wf_adhoc_role(l_requester_user_name);
923: Fetch c_wf_adhoc_role into l_adhoc_role;
924: if (c_wf_adhoc_role%NOTFOUND) then
925: Close c_wf_adhoc_role;