701: IF (funcmode = 'RUN') THEN
702: -- create the adhoc role
703: l_role_name := 'IGS'|| itemkey ;
704:
705: Wf_Directory.CreateAdHocRole (role_name => l_role_name,
706: role_display_name => l_role_display_name
707: );
708:
709:
747: CLOSE c_dup_user;
748:
749: IF l_user_name IS NOT NULL AND l_dup_user = 0 THEN
750:
751: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
752: role_users => l_user_name);
753: END IF;
754:
755:
764: FETCH c_dup_user INTO l_dup_user;
765: CLOSE c_dup_user;
766:
767: IF l_user_name_admin IS NOT NULL AND l_dup_user = 0 THEN
768: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
769: role_users => l_user_name_admin);
770: END IF;
771:
772: -- now set this role to the workflow
866: IF (funcmode = 'RUN') THEN
867: -- create the adhoc role
868: l_role_name := 'IGS'||substr(itemkey,6);
869:
870: Wf_Directory.CreateAdHocRole (role_name => l_role_name,
871: role_display_name => l_role_display_name
872: );
873:
874:
931: FETCH c_dup_user INTO l_dup_user;
932: CLOSE c_dup_user;
933:
934: IF l_user_name IS NOT NULL AND l_dup_user = 0 THEN
935: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
936: role_users => l_user_name);
937: END IF;
938:
939:
948: CLOSE c_dup_user;
949:
950:
951: IF l_user_name_admin IS NOT NULL AND l_dup_user = 0 THEN
952: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
953: role_users => l_user_name_admin);
954: END IF;
955:
956: -- now set this role to the workflow
1063: IF (funcmode = 'RUN') THEN
1064: -- create the adhoc role
1065: l_role_name := 'IGS'||substr(itemkey,6);
1066:
1067: Wf_Directory.CreateAdHocRole (role_name => l_role_name,
1068: role_display_name => l_role_display_name
1069: );
1070:
1071:
1145: FETCH c_dup_user INTO l_dup_user;
1146: CLOSE c_dup_user;
1147:
1148: IF l_user_name_stu IS NOT NULL AND l_dup_user = 0 THEN
1149: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
1150: role_users => l_user_name_stu);
1151: END IF;
1152: END IF;
1153:
1167: FETCH c_dup_user INTO l_dup_user;
1168: CLOSE c_dup_user;
1169:
1170: IF l_user_name_adm IS NOT NULL AND l_dup_user = 0 THEN
1171: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
1172: role_users => l_user_name_adm);
1173: END IF;
1174:
1175: END IF;
1188: FETCH c_dup_user INTO l_dup_user;
1189: CLOSE c_dup_user;
1190:
1191: IF l_user_name_sup IS NOT NULL AND l_dup_user = 0 THEN
1192: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
1193: role_users => l_user_name_sup);
1194: END IF;
1195:
1196: END IF;
1295: FETCH c_dup_user INTO l_dup_user;
1296: CLOSE c_dup_user;
1297:
1298: IF l_user_name_adm IS NOT NULL AND l_dup_user = 0 THEN
1299: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
1300: role_users => l_user_name_adm);
1301: END IF;
1302:
1303: END IF;
1399: IF (funcmode = 'RUN') THEN
1400: -- create the adhoc role
1401: l_role_name := 'IGS'||substr(itemkey,6);
1402:
1403: Wf_Directory.CreateAdHocRole (role_name => l_role_name,
1404: role_display_name => l_role_display_name
1405: );
1406:
1407:
1444: FETCH c_dup_user INTO l_dup_user;
1445: CLOSE c_dup_user;
1446:
1447: IF l_user_name_stu IS NOT NULL AND l_dup_user = 0 THEN
1448: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
1449: role_users => l_user_name_stu);
1450: END IF;
1451: END IF;
1452:
1499: FETCH c_dup_user INTO l_dup_user;
1500: CLOSE c_dup_user;
1501:
1502: IF l_user_name IS NOT NULL AND l_dup_user = 0 THEN
1503: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
1504: role_users => l_user_name);
1505: END IF;
1506: END IF;
1507:
1613: FETCH c_dup_user INTO l_dup_user;
1614: CLOSE c_dup_user;
1615:
1616: IF l_user_name_adm IS NOT NULL AND l_dup_user = 0 THEN
1617: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
1618: role_users => l_user_name_adm);
1619: END IF;
1620:
1621: END IF;
2554:
2555: -- create the adhoc role
2556: l_role_name := 'IGS'||substr(itemkey,6);
2557:
2558: Wf_Directory.CreateAdHocRole (role_name => l_role_name,
2559: role_display_name => l_role_display_name
2560: );
2561:
2562:
2585: FETCH c_dup_user INTO l_dup_user;
2586: CLOSE c_dup_user;
2587:
2588: IF l_user_name_stu IS NOT NULL AND l_dup_user = 0 THEN
2589: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
2590: role_users => l_user_name_stu);
2591: END IF;
2592:
2593: END IF;
2608: FETCH c_dup_user INTO l_dup_user;
2609: CLOSE c_dup_user;
2610:
2611: IF l_user_name_adm IS NOT NULL AND l_dup_user = 0 THEN
2612: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
2613: role_users => l_user_name_adm);
2614: END IF;
2615:
2616: END IF;
2659: FETCH c_dup_user INTO l_dup_user;
2660: CLOSE c_dup_user;
2661:
2662: IF l_user_name IS NOT NULL AND l_dup_user = 0 THEN
2663: Wf_Directory.AddUsersToAdHocRole (role_name => l_role_name,
2664: role_users => l_user_name);
2665: END IF;
2666: END IF;
2667: