815: if NOT (roleComposite) then
816: if NOT (userComposite) then
817: select 1
818: into dummy
819: from SYS.DUAL
820: where exists
821: (select null
822: from WF_USER_ROLES UR
823: where UR.USER_NAME = IsPerformer.user
827: );
828: else
829: select 1
830: into dummy
831: from SYS.DUAL
832: where exists
833: (select null
834: from WF_USER_ROLES UR
835: where UR.USER_ORIG_SYSTEM = l_uOrigSys
843: AssignPartition (l_rorigSys,l_partID,l_partName);
844: if NOT (userComposite) then
845: select 1
846: into dummy
847: from SYS.DUAL
848: where exists
849: (select null
850: from WF_USER_ROLES UR
851: where UR.USER_NAME = IsPerformer.user
856: and UR.PARTITION_ID = l_partID);
857: else
858: select 1
859: into dummy
860: from SYS.DUAL
861: where exists
862: (select null
863: from WF_USER_ROLES UR
864: where UR.USER_ORIG_SYSTEM = l_uOrigSys
914: colon := instr(username, ':');
915: if (colon = 0) then
916: select 1
917: into dummy
918: from SYS.DUAL
919: where exists
920: (select null
921: from wf_users
922: where name = username
924: and status = 'ACTIVE');
925: else
926: select 1
927: into dummy
928: from SYS.DUAL
929: where exists
930: (select null
931: from wf_users
932: where orig_system = substr(username, 1, colon-1)
1596: elsif (name is null ) then
1597: begin
1598: select to_char(WF_ADHOC_ROLE_S.NEXTVAL)
1599: into role_id
1600: from SYS.DUAL;
1601: exception
1602: when others then
1603: raise;
1604: end;
2071: --
2072: begin
2073: select to_char(WF_ADHOC_ROLE_S.NEXTVAL)
2074: into role_id
2075: from SYS.DUAL;
2076: exception
2077: when others then
2078: raise;
2079: end;
4827: begin
4828: --check whether the role name is truly end dated
4829:
4830: select 1 into l_count
4831: from SYS.DUAL
4832: where exists (select null from wf_roles
4833: where name=p_name
4834: );
4835:
4943:
4944: -- check whether the role is end-dated
4945:
4946: select 1 into l_count
4947: from SYS.DUAL
4948: where exists (select null from wf_local_roles
4949: where name=p_rolename)
4950: and ( exists (select null from wf_user_roles
4951: where role_name=p_rolename
4991: elsif p_rolename is null then --user has been passed
4992: begin
4993: --check whether user is truly end dated
4994: select 1 into l_count
4995: from SYS.DUAL
4996: where exists (select null from wf_local_roles
4997: where name=p_username)
4998: and ( exists (select null from wf_user_roles
4999: where user_name=p_username
5035:
5036: --check whether user/role is truly end dated
5037:
5038: select 1 into l_count
5039: from SYS.DUAL
5040: where exists (select null from wf_local_roles
5041: where name=p_rolename or name=p_username)
5042: and ( exists (select null from wf_user_roles
5043: where role_name=p_rolename