APPS.FPA_MAIN_PROCESS_PVT dependencies on WF_DIRECTORY

Line 782: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240

778: -- end if;
779:
780: -- if(l_flag = FND_API.G_TRUE) then
781: -- Add users to the role.
782: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240
783: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,
784: role_users => l_user);
785: end if; --Bug#14558240
786: IF l_user_exists ='N' then

Line 783: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,

779:
780: -- if(l_flag = FND_API.G_TRUE) then
781: -- Add users to the role.
782: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240
783: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,
784: role_users => l_user);
785: end if; --Bug#14558240
786: IF l_user_exists ='N' then
787: l_user_exists := 'Y';

Line 824: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240

820: -- l_flag := FND_API.G_TRUE;
821: -- end if;
822: -- if(l_flag = FND_API.G_TRUE) then
823: -- Add users to the role.
824: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240
825: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,
826: role_users => l_user);
827: end if;
828: IF l_user_exists ='N' then

Line 825: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,

821: -- end if;
822: -- if(l_flag = FND_API.G_TRUE) then
823: -- Add users to the role.
824: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240
825: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,
826: role_users => l_user);
827: end if;
828: IF l_user_exists ='N' then
829: l_user_exists := 'Y';

Line 851: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240

847: LOOP
848: FETCH c_get_projmg_users INTO l_user;
849: EXIT WHEN c_get_projmg_users%NOTFOUND;
850: -- Add users to the role.
851: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240
852: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,
853: role_users => l_user);
854: end if;
855: IF l_user_exists ='N' then

Line 852: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,

848: FETCH c_get_projmg_users INTO l_user;
849: EXIT WHEN c_get_projmg_users%NOTFOUND;
850: -- Add users to the role.
851: if wf_directory.IsPerformer (l_user, p_notify_role)= false then -- Bug#14558240
852: wf_directory.AddUsersToAdHocRole(role_name => p_notify_role,
853: role_users => l_user);
854: end if;
855: IF l_user_exists ='N' then
856: l_user_exists := 'Y';

Line 954: IF (NOT Wf_Directory.RoleActive(l_notify_role)) THEN

950:
951: -- Create adhoc role. This will be used to send the notifications
952: -- to members of this role.
953: -- Create role only when not present else remove users from the role Bug 12709972
954: IF (NOT Wf_Directory.RoleActive(l_notify_role)) THEN
955: BEGIN
956: wf_directory.CreateAdHocRole(role_name => l_notify_role,
957: role_display_name => l_notify_role,
958: role_users => null,

Line 956: wf_directory.CreateAdHocRole(role_name => l_notify_role,

952: -- to members of this role.
953: -- Create role only when not present else remove users from the role Bug 12709972
954: IF (NOT Wf_Directory.RoleActive(l_notify_role)) THEN
955: BEGIN
956: wf_directory.CreateAdHocRole(role_name => l_notify_role,
957: role_display_name => l_notify_role,
958: role_users => null,
959: email_address => null);
960: EXCEPTION

Line 971: wf_directory.RemoveUsersFromAdhocRole(role_name => l_notify_role);

967:
968: END;
969: ELSE
970: -- Delete the users if already existing from the above role :
971: wf_directory.RemoveUsersFromAdhocRole(role_name => l_notify_role);
972: END IF;
973:
974: -- Need to notify Project Managers
975: wf_engine.SetItemAttrText(itemtype => p_item_type,