DBA Data[Home] [Help]

APPS.ZPB_WF_NTF dependencies on ZPB_WF_NTF

Line 1: PACKAGE BODY ZPB_WF_NTF AS

1: PACKAGE BODY ZPB_WF_NTF AS
2: /* $Header: zpbwfntf.plb 120.6 2007/12/04 16:23:24 mbhat ship $ */
3:
4: PROCEDURE SetRole (AdHocRole in varchar2, ExpDays in number, RoleDisplay in varchar2 default NULL)
5: IS

Line 120: WF_CORE.CONTEXT('ZPB_WF_NTF.VALIDATE_BUS_AREA', itemtype, itemkey, to_char(actid), funcmode);

116: when NO_DATA_FOUND then
117: Null;
118:
119: when others then
120: WF_CORE.CONTEXT('ZPB_WF_NTF.VALIDATE_BUS_AREA', itemtype, itemkey, to_char(actid), funcmode);
121: raise;
122:
123: end VALIDATE_BUS_AREA;
124:

Line 352: thisOwner := zpb_wf_ntf.ID_to_FNDUser(thisOwnerID);

348:
349: thisOwnerID := wf_engine.GetItemAttrNumber(Itemtype => ItemType,
350: Itemkey => ItemKey,
351: aname => 'OWNERID');
352: thisOwner := zpb_wf_ntf.ID_to_FNDUser(thisOwnerID);
353:
354:
355: select business_area_id into l_business_area_id from
356: zpb_analysis_cycles where analysis_cycle_id = (select analysis_cycle_id

Line 385: avalue => ZPB_WF_NTF.ID_to_FNDUser(authorID));

381:
382: wf_engine.SetItemAttrText(Itemtype => ItemType,
383: Itemkey => ItemKey,
384: aname => '#FROM_ROLE',
385: avalue => ZPB_WF_NTF.ID_to_FNDUser(authorID));
386:
387: -- end if;
388:
389: -- read parameters from ZPB_TASK_PARAMETERS using task ID.

Line 514: RoleName := zpb_wf_ntf.OLD_STYLE_USERS(instanceID, taskID, thisOwner, thisOwnerID, relative+7, UserList);

510:
511: -- this is support for * OLD STYLE * user_to_notify
512: if UserList is not NULL OR UserList <> 'NONE' then
513: -- B4951035 prevent relative from being passed as zero, that is now bad for WF
514: RoleName := zpb_wf_ntf.OLD_STYLE_USERS(instanceID, taskID, thisOwner, thisOwnerID, relative+7, UserList);
515:
516: if RoleName <> '#NOROLE#' then
517: wf_engine.SetItemAttrText(Itemtype => ItemType,
518: Itemkey => ItemKey,

Line 532: UserToNotifyP := zpb_wf_ntf.set_users_to_notify(taskID, ItemKey, workflowprocess, relative+7, thisOwner, thisOwnerID);

528:
529: else -- users_to_notify_param=N
530:
531: -- B4951035 prevent relative from being passed as zero, that is now bad for WF
532: UserToNotifyP := zpb_wf_ntf.set_users_to_notify(taskID, ItemKey, workflowprocess, relative+7, thisOwner, thisOwnerID);
533:
534: if UserToNotifyP = 'B' then
535: resultout := 'COMPLETE:B';
536: else

Line 546: zpb_wf_ntf.SendExpiredUserMsg(thisOwnerID, TaskID, itemType);

542:
543: -- b 4948928
544: -- if Expired WF users have been detected then send list to BPO or its proxy
545: -- otherwise do nothing.
546: zpb_wf_ntf.SendExpiredUserMsg(thisOwnerID, TaskID, itemType);
547:
548:
549: END IF;
550: return;

Line 664: fndResp := ZPB_WF_NTF.GetFNDResp(RespKey);

660: v_zpbusers c_zpbusers%ROWTYPE;
661:
662: BEGIN
663:
664: fndResp := ZPB_WF_NTF.GetFNDResp(RespKey);
665:
666: if RespKEY = 'ZPB' then
667: -- by application
668: for v_zpbusers in c_zpbusers loop

Line 925: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);

921: if c_recipient%ROWCOUNT = 1 then
922: if cCount > 1 then
923:
924: -- THIS SHOULD NOT BE FOR REVIEW FRAMEWORK - FYI style
925: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
926: zpb_wf_ntf.SetRole(rolename, relative+7);
927: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
928: thisUserID := FNDUser_to_ID(thisRecipient);
929: zpb_wf_ntf.add_Shadow(rolename, thisUserID);

Line 926: zpb_wf_ntf.SetRole(rolename, relative+7);

922: if cCount > 1 then
923:
924: -- THIS SHOULD NOT BE FOR REVIEW FRAMEWORK - FYI style
925: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
926: zpb_wf_ntf.SetRole(rolename, relative+7);
927: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
928: thisUserID := FNDUser_to_ID(thisRecipient);
929: zpb_wf_ntf.add_Shadow(rolename, thisUserID);
930:

Line 929: zpb_wf_ntf.add_Shadow(rolename, thisUserID);

925: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
926: zpb_wf_ntf.SetRole(rolename, relative+7);
927: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
928: thisUserID := FNDUser_to_ID(thisRecipient);
929: zpb_wf_ntf.add_Shadow(rolename, thisUserID);
930:
931: else
932:
933: -- THIS CAN BE FOR REVIEW FRAMEWORK - response style

Line 937: if zpb_wf_ntf.has_Shadow(thisUserID) = 'Y' then

933: -- THIS CAN BE FOR REVIEW FRAMEWORK - response style
934: -- only one user
935: thisUserID := FNDUser_to_ID(thisRecipient);
936: -- make the Ad Hoc role to hold both the dataowner and shadow
937: if zpb_wf_ntf.has_Shadow(thisUserID) = 'Y' then
938: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
939: select distinct display_name
940: into NewDispName
941: from wf_users

Line 938: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);

934: -- only one user
935: thisUserID := FNDUser_to_ID(thisRecipient);
936: -- make the Ad Hoc role to hold both the dataowner and shadow
937: if zpb_wf_ntf.has_Shadow(thisUserID) = 'Y' then
938: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
939: select distinct display_name
940: into NewDispName
941: from wf_users
942: where name = thisRecipient;

Line 948: zpb_wf_ntf.SetRole(rolename, relative+7, NewDispName);

944: FND_MESSAGE.SET_NAME ('ZPB', 'ZPB_NTF_ANDSHADOWS');
945: l_label := FND_MESSAGE.GET;
946: NewDispName := NewDispName || l_label;
947:
948: zpb_wf_ntf.SetRole(rolename, relative+7, NewDispName);
949: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
950: zpb_wf_ntf.add_Shadow(rolename, thisUserID);
951: else
952: rolename := thisRecipient;

Line 950: zpb_wf_ntf.add_Shadow(rolename, thisUserID);

946: NewDispName := NewDispName || l_label;
947:
948: zpb_wf_ntf.SetRole(rolename, relative+7, NewDispName);
949: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
950: zpb_wf_ntf.add_Shadow(rolename, thisUserID);
951: else
952: rolename := thisRecipient;
953: end if;
954: end if;

Line 958: if zpb_wf_ntf.user_in_role(rolename, thisRecipient) = 'N' then

954: end if;
955: else
956: -- not for Review Framework
957: -- b 4948928 added test as part of this bug premptively
958: if zpb_wf_ntf.user_in_role(rolename, thisRecipient) = 'N' then
959: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
960: end if;
961:
962: thisUserID := FNDUser_to_ID(thisRecipient);

Line 963: zpb_wf_ntf.add_Shadow(rolename, thisUserID);

959: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
960: end if;
961:
962: thisUserID := FNDUser_to_ID(thisRecipient);
963: zpb_wf_ntf.add_Shadow(rolename, thisUserID);
964: end if;
965:
966: end loop;
967: elsif Rtype = 'ZPB_CONTROLLER_RESP' then

Line 969: roleName := zpb_wf_ntf.GetFNDResp('ZPB_CONTROLLER_RESP');

965:
966: end loop;
967: elsif Rtype = 'ZPB_CONTROLLER_RESP' then
968: -- transform to FND resp.
969: roleName := zpb_wf_ntf.GetFNDResp('ZPB_CONTROLLER_RESP');
970: elsif Rtype = 'ZPB_ALL_USERS' then
971:
972: -- transform to all ZPB users.
973: -- not setting shadows for all users

Line 974: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);

970: elsif Rtype = 'ZPB_ALL_USERS' then
971:
972: -- transform to all ZPB users.
973: -- not setting shadows for all users
974: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
975: zpb_wf_ntf.SetRole(rolename, relative+7);
976: zpb_wf_ntf.Set_EPB_Users(rolename, 'ZPB');
977:
978: elsif Rtype = 'OWNER_OF_AC' then

Line 975: zpb_wf_ntf.SetRole(rolename, relative+7);

971:
972: -- transform to all ZPB users.
973: -- not setting shadows for all users
974: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
975: zpb_wf_ntf.SetRole(rolename, relative+7);
976: zpb_wf_ntf.Set_EPB_Users(rolename, 'ZPB');
977:
978: elsif Rtype = 'OWNER_OF_AC' then
979: -- uses thisOwner

Line 976: zpb_wf_ntf.Set_EPB_Users(rolename, 'ZPB');

972: -- transform to all ZPB users.
973: -- not setting shadows for all users
974: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
975: zpb_wf_ntf.SetRole(rolename, relative+7);
976: zpb_wf_ntf.Set_EPB_Users(rolename, 'ZPB');
977:
978: elsif Rtype = 'OWNER_OF_AC' then
979: -- uses thisOwner
980: -- make the Ad Hoc role to hold both the dataowner and shadow

Line 981: if zpb_wf_ntf.has_Shadow(thisOwnerID) = 'Y' then

977:
978: elsif Rtype = 'OWNER_OF_AC' then
979: -- uses thisOwner
980: -- make the Ad Hoc role to hold both the dataowner and shadow
981: if zpb_wf_ntf.has_Shadow(thisOwnerID) = 'Y' then
982: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
983: select distinct display_name
984: into NewDispName
985: from wf_users

Line 982: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);

978: elsif Rtype = 'OWNER_OF_AC' then
979: -- uses thisOwner
980: -- make the Ad Hoc role to hold both the dataowner and shadow
981: if zpb_wf_ntf.has_Shadow(thisOwnerID) = 'Y' then
982: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
983: select distinct display_name
984: into NewDispName
985: from wf_users
986: where name = thisOwner;

Line 992: zpb_wf_ntf.SetRole(rolename, relative, NewDispName);

988: -- add (And Shadows) display to role dispaly name
989: FND_MESSAGE.SET_NAME ('ZPB', 'ZPB_NTF_ANDSHADOWS');
990: l_label := FND_MESSAGE.GET;
991: NewDispName := NewDispName || l_label;
992: zpb_wf_ntf.SetRole(rolename, relative, NewDispName);
993: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisOwner);
994: zpb_wf_ntf.add_Shadow(rolename, thisOwnerID);
995: else
996: rolename := thisOwner;

Line 994: zpb_wf_ntf.add_Shadow(rolename, thisOwnerID);

990: l_label := FND_MESSAGE.GET;
991: NewDispName := NewDispName || l_label;
992: zpb_wf_ntf.SetRole(rolename, relative, NewDispName);
993: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisOwner);
994: zpb_wf_ntf.add_Shadow(rolename, thisOwnerID);
995: else
996: rolename := thisOwner;
997: end if;
998: elsif Rtype = 'NONE' or Rtype is NULL then

Line 1039: fndResp := ZPB_WF_NTF.GetFNDResp(RespKey);

1035: v_zpbusers c_zpbusers%ROWTYPE;
1036:
1037: BEGIN
1038:
1039: fndResp := ZPB_WF_NTF.GetFNDResp(RespKey);
1040:
1041: -- by application
1042: for v_zpbusers in c_zpbusers loop
1043: if cntr = 1 then

Line 1084: zpb_wf_ntf.add_Shadow(roleName, thisUserID);

1080: thisUserID number;
1081: BEGIN
1082: thisUserID := FNDUser_to_ID(thisUser);
1083: if has_Shadow(thisUserID) = 'Y' then
1084: zpb_wf_ntf.add_Shadow(roleName, thisUserID);
1085: end if;
1086:
1087: -- abudnik 01JAN20 bUG 4641877
1088: if zpb_wf_ntf.user_in_role(rolename, thisUser) = 'N' then

Line 1088: if zpb_wf_ntf.user_in_role(rolename, thisUser) = 'N' then

1084: zpb_wf_ntf.add_Shadow(roleName, thisUserID);
1085: end if;
1086:
1087: -- abudnik 01JAN20 bUG 4641877
1088: if zpb_wf_ntf.user_in_role(rolename, thisUser) = 'N' then
1089: ZPB_UTIL_PVT.AddUsersToAdHocRole(roleName, thisUser);
1090: end if;
1091:
1092:

Line 1172: if zpb_wf_ntf.user_in_role(rolename, thisRecipient) = 'N' then

1168:
1169: for v_shadow in c_shadow loop
1170: thisID := v_shadow.shadow_id;
1171: thisRecipient := ID_to_FNDUser(thisID);
1172: if zpb_wf_ntf.user_in_role(rolename, thisRecipient) = 'N' then
1173: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, thisRecipient);
1174: end if;
1175: end loop;
1176:

Line 1286: roleName := zpb_wf_ntf.GetFNDResp('ZPB_CONTROLLER_RESP');

1282:
1283: elsif UserList = 'ZPB_CONTROLLER_RESP' then
1284:
1285: -- transform to FND resp.
1286: roleName := zpb_wf_ntf.GetFNDResp('ZPB_CONTROLLER_RESP');
1287: l_type := 'ALREADY_SET';
1288:
1289: elsif UserList = 'ZPB_ALL_USERS' then
1290: -- transform to all ZPB users. so no need to add shadows.

Line 1291: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);

1287: l_type := 'ALREADY_SET';
1288:
1289: elsif UserList = 'ZPB_ALL_USERS' then
1290: -- transform to all ZPB users. so no need to add shadows.
1291: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
1292: zpb_wf_ntf.SetRole(rolename, relative+7);
1293: l_UserList := zpb_wf_ntf.Get_EPB_Users('ZPB');
1294: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, l_UserList);
1295: l_type := 'ALREADY_SET';

Line 1292: zpb_wf_ntf.SetRole(rolename, relative+7);

1288:
1289: elsif UserList = 'ZPB_ALL_USERS' then
1290: -- transform to all ZPB users. so no need to add shadows.
1291: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
1292: zpb_wf_ntf.SetRole(rolename, relative+7);
1293: l_UserList := zpb_wf_ntf.Get_EPB_Users('ZPB');
1294: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, l_UserList);
1295: l_type := 'ALREADY_SET';
1296:

Line 1293: l_UserList := zpb_wf_ntf.Get_EPB_Users('ZPB');

1289: elsif UserList = 'ZPB_ALL_USERS' then
1290: -- transform to all ZPB users. so no need to add shadows.
1291: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
1292: zpb_wf_ntf.SetRole(rolename, relative+7);
1293: l_UserList := zpb_wf_ntf.Get_EPB_Users('ZPB');
1294: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, l_UserList);
1295: l_type := 'ALREADY_SET';
1296:
1297: elsif instr(UserList, ',') > 0 then

Line 1299: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);

1295: l_type := 'ALREADY_SET';
1296:
1297: elsif instr(UserList, ',') > 0 then
1298: -- FND user names list so build Ad Hoc role
1299: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
1300: zpb_wf_ntf.SetRole(rolename, relative+7);
1301: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, UserList);
1302: l_type := 'ALREADY_SET';
1303:

Line 1300: zpb_wf_ntf.SetRole(rolename, relative+7);

1296:
1297: elsif instr(UserList, ',') > 0 then
1298: -- FND user names list so build Ad Hoc role
1299: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
1300: zpb_wf_ntf.SetRole(rolename, relative+7);
1301: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, UserList);
1302: l_type := 'ALREADY_SET';
1303:
1304: -- a single user selected

Line 1307: curUserID := zpb_wf_ntf.FNDUser_to_ID(UserList);

1303:
1304: -- a single user selected
1305: elsif instr(UserList, ',') = 0 then
1306: curUser := UserList;
1307: curUserID := zpb_wf_ntf.FNDUser_to_ID(UserList);
1308: l_type := 'SET_THE_ROLE';
1309:
1310: end if;
1311:

Line 1314: if zpb_wf_ntf.has_Shadow(curUserID) = 'Y' then

1310: end if;
1311:
1312: if l_type = 'SET_THE_ROLE' then
1313: -- make the Ad Hoc role to hold both the dataowner and shadow
1314: if zpb_wf_ntf.has_Shadow(curUserID) = 'Y' then
1315: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
1316: select distinct display_name
1317: into NewDispName
1318: from wf_users

Line 1315: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);

1311:
1312: if l_type = 'SET_THE_ROLE' then
1313: -- make the Ad Hoc role to hold both the dataowner and shadow
1314: if zpb_wf_ntf.has_Shadow(curUserID) = 'Y' then
1315: rolename := zpb_wf_ntf.MakeRoleName(InstanceID, TaskID);
1316: select distinct display_name
1317: into NewDispName
1318: from wf_users
1319: where name = curUser;

Line 1326: zpb_wf_ntf.SetRole(rolename, relative, NewDispName);

1322: FND_MESSAGE.SET_NAME ('ZPB', 'ZPB_NTF_ANDSHADOWS');
1323: l_label := FND_MESSAGE.GET;
1324: NewDispName := NewDispName || l_label;
1325:
1326: zpb_wf_ntf.SetRole(rolename, relative, NewDispName);
1327: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, curUser);
1328: zpb_wf_ntf.add_Shadow(rolename, curUserID);
1329: else
1330: rolename := curUser;

Line 1328: zpb_wf_ntf.add_Shadow(rolename, curUserID);

1324: NewDispName := NewDispName || l_label;
1325:
1326: zpb_wf_ntf.SetRole(rolename, relative, NewDispName);
1327: ZPB_UTIL_PVT.AddUsersToAdHocRole(rolename, curUser);
1328: zpb_wf_ntf.add_Shadow(rolename, curUserID);
1329: else
1330: rolename := curUser;
1331: end if;
1332: end if;

Line 1484: if zpb_wf_ntf.has_Shadow(l_thisUserID) = 'Y' then

1480:
1481: -- make the Ad Hoc role to hold both the dataowner and shadow
1482:
1483: --DBMS_OUTPUT.PUT_LINE(l_thisRecipient);
1484: if zpb_wf_ntf.has_Shadow(l_thisUserID) = 'Y' then
1485:
1486:
1487: l_InstanceID := WF_ENGINE.GetItemAttrNumber(
1488: itemtype => ItemType,

Line 1498: l_RoleName := zpb_wf_ntf.MakeRoleName(l_InstanceID, l_TaskID);

1494: itemkey => ItemKey,
1495: aname => 'TASKID');
1496:
1497: --DBMS_OUTPUT.PUT_LINE('has shadow');
1498: l_RoleName := zpb_wf_ntf.MakeRoleName(l_InstanceID, l_TaskID);
1499: select distinct display_name
1500: into l_NewDispName
1501: from wf_users
1502: where name = l_thisRecipient;

Line 1508: zpb_wf_ntf.SetRole(l_RoleName, 7, l_NewDispName);

1504: FND_MESSAGE.SET_NAME ('ZPB', 'ZPB_NTF_ANDSHADOWS');
1505: l_label := FND_MESSAGE.GET;
1506:
1507: l_NewDispName := l_NewDispName || l_label;
1508: zpb_wf_ntf.SetRole(l_RoleName, 7, l_NewDispName);
1509: -- b4948928
1510: if zpb_wf_ntf.user_in_role(l_rolename, l_thisRecipient) = 'N' then
1511: ZPB_UTIL_PVT.AddUsersToAdHocRole(l_RoleName, l_thisRecipient);
1512: end if;

Line 1510: if zpb_wf_ntf.user_in_role(l_rolename, l_thisRecipient) = 'N' then

1506:
1507: l_NewDispName := l_NewDispName || l_label;
1508: zpb_wf_ntf.SetRole(l_RoleName, 7, l_NewDispName);
1509: -- b4948928
1510: if zpb_wf_ntf.user_in_role(l_rolename, l_thisRecipient) = 'N' then
1511: ZPB_UTIL_PVT.AddUsersToAdHocRole(l_RoleName, l_thisRecipient);
1512: end if;
1513: zpb_wf_ntf.add_Shadow(l_RoleName, l_thisUserID);
1514:

Line 1513: zpb_wf_ntf.add_Shadow(l_RoleName, l_thisUserID);

1509: -- b4948928
1510: if zpb_wf_ntf.user_in_role(l_rolename, l_thisRecipient) = 'N' then
1511: ZPB_UTIL_PVT.AddUsersToAdHocRole(l_RoleName, l_thisRecipient);
1512: end if;
1513: zpb_wf_ntf.add_Shadow(l_RoleName, l_thisUserID);
1514:
1515: wf_engine.SetItemAttrText(Itemtype => ItemType,
1516: Itemkey => ItemKey,
1517: aname => 'EPBPERFORMER',

Line 1539: Wf_Core.Context('ZPB_WF_NTF', 'SHADOWS_FOR_EPBPERFORMER', itemtype,

1535: if (funcmode = 'EPBPERFORMER') or (funcmode = 'EPB_BPOWNERID') then
1536: raise;
1537: else
1538:
1539: Wf_Core.Context('ZPB_WF_NTF', 'SHADOWS_FOR_EPBPERFORMER', itemtype,
1540: itemkey, to_char(actid), funcmode);
1541: raise;
1542: end if;
1543:

Line 1591: l_BPownerOrProxy := zpb_wf_ntf.Get_Active_User(l_BPOwnerID, l_BAID);

1587: and t.ANALYSIS_CYCLE_ID = ac.ANALYSIS_CYCLE_ID
1588: and ac.ANALYSIS_CYCLE_ID = i.INSTANCE_AC_ID
1589: and ac.business_area_id = v.business_area_id;
1590:
1591: l_BPownerOrProxy := zpb_wf_ntf.Get_Active_User(l_BPOwnerID, l_BAID);
1592:
1593: --DBMS_OUTPUT.PUT_LINE('after getactive owner proxy' || l_bpownerorproxy);
1594: --DBMS_OUTPUT.PUT_LINE('l_taskname ' || l_taskname);
1595:

Line 1628: zpb_wf_ntf.Build_ExpiredUser_list (l_nid);

1624:
1625:
1626: --DBMS_OUTPUT.PUT_LINE('before build expired');
1627: -- Build user list for message body
1628: zpb_wf_ntf.Build_ExpiredUser_list (l_nid);
1629:
1630: end if; -- if > 0
1631:
1632:

Line 1656: l_thisRecipient := zpb_wf_ntf.ID_to_FNDUser(p_BPOwnerID);

1652: L_RESPDISPLAY varchar2(100);
1653:
1654: begin
1655:
1656: l_thisRecipient := zpb_wf_ntf.ID_to_FNDUser(p_BPOwnerID);
1657:
1658: -- Make a role name may not use it if just one user.
1659: if zpb_wf_ntf.has_Shadow(p_BPOwnerID) = 'Y' then
1660:

Line 1659: if zpb_wf_ntf.has_Shadow(p_BPOwnerID) = 'Y' then

1655:
1656: l_thisRecipient := zpb_wf_ntf.ID_to_FNDUser(p_BPOwnerID);
1657:
1658: -- Make a role name may not use it if just one user.
1659: if zpb_wf_ntf.has_Shadow(p_BPOwnerID) = 'Y' then
1660:
1661: l_RoleName := zpb_wf_ntf.MakeRoleName(l_InstanceID, l_TaskID);
1662:
1663: select distinct display_name

Line 1661: l_RoleName := zpb_wf_ntf.MakeRoleName(l_InstanceID, l_TaskID);

1657:
1658: -- Make a role name may not use it if just one user.
1659: if zpb_wf_ntf.has_Shadow(p_BPOwnerID) = 'Y' then
1660:
1661: l_RoleName := zpb_wf_ntf.MakeRoleName(l_InstanceID, l_TaskID);
1662:
1663: select distinct display_name
1664: into l_NewDispName
1665: from wf_users

Line 1673: zpb_wf_ntf.SetRole(l_RoleName, 7, l_NewDispName);

1669: l_label := FND_MESSAGE.GET;
1670: l_NewDispName := l_NewDispName || l_label;
1671:
1672:
1673: zpb_wf_ntf.SetRole(l_RoleName, 7, l_NewDispName);
1674:
1675: if wf_directory.useractive(l_thisRecipient) = TRUE then
1676: if zpb_wf_ntf.user_in_role(l_rolename, l_thisRecipient) = 'N' then
1677: ZPB_UTIL_PVT.AddUsersToAdHocRole(l_RoleName, l_thisRecipient);

Line 1676: if zpb_wf_ntf.user_in_role(l_rolename, l_thisRecipient) = 'N' then

1672:
1673: zpb_wf_ntf.SetRole(l_RoleName, 7, l_NewDispName);
1674:
1675: if wf_directory.useractive(l_thisRecipient) = TRUE then
1676: if zpb_wf_ntf.user_in_role(l_rolename, l_thisRecipient) = 'N' then
1677: ZPB_UTIL_PVT.AddUsersToAdHocRole(l_RoleName, l_thisRecipient);
1678: end if;
1679: end if;
1680:

Line 1681: zpb_wf_ntf.add_Shadow(l_RoleName, p_BPOwnerID);

1677: ZPB_UTIL_PVT.AddUsersToAdHocRole(l_RoleName, l_thisRecipient);
1678: end if;
1679: end if;
1680:
1681: zpb_wf_ntf.add_Shadow(l_RoleName, p_BPOwnerID);
1682:
1683: else
1684:
1685: if wf_directory.useractive(l_thisRecipient) = TRUE then

Line 1691: l_RoleName := zpb_wf_ntf.MakeRoleName(l_InstanceID, l_TaskID);

1687: else
1688:
1689: -- there are no shadows and the owner is expired so
1690: -- try to find secrity admins and send the notes to them
1691: l_RoleName := zpb_wf_ntf.MakeRoleName(l_InstanceID, l_TaskID);
1692: -- add Responibility name as role dispaly name
1693: -- first get RESPONSIBILITY_ID
1694: select RESPONSIBILITY_ID, RESPONSIBILITY_NAME
1695: into l_respID, l_respDisplay

Line 1700: zpb_wf_ntf.SetRole(l_RoleName, 7, l_respDisplay);

1696: from fnd_responsibility_vl
1697: where application_id = 210 and
1698: RESPONSIBILITY_KEY = 'ZPB_MANAGER_RESP';
1699:
1700: zpb_wf_ntf.SetRole(l_RoleName, 7, l_respDisplay);
1701:
1702: l_RoleName := zpb_wf_ntf.FindSecurityAdmin (p_BAID, l_RoleName, l_respID);
1703: -- final check if no zpb users yet then go to sysadmin
1704: if l_RoleName = 'NO_ZPB_USERS' then

Line 1702: l_RoleName := zpb_wf_ntf.FindSecurityAdmin (p_BAID, l_RoleName, l_respID);

1698: RESPONSIBILITY_KEY = 'ZPB_MANAGER_RESP';
1699:
1700: zpb_wf_ntf.SetRole(l_RoleName, 7, l_respDisplay);
1701:
1702: l_RoleName := zpb_wf_ntf.FindSecurityAdmin (p_BAID, l_RoleName, l_respID);
1703: -- final check if no zpb users yet then go to sysadmin
1704: if l_RoleName = 'NO_ZPB_USERS' then
1705: l_RoleName := 'SYSADMIN';
1706: end if;

Line 1746: if zpb_wf_ntf.user_in_role(p_RoleName, l_thisRecipient) = 'N' then

1742: l_thisUserID := v_SecAdmin.user_id;
1743: l_thisRecipient := ID_to_FNDuser(l_thisUserID);
1744:
1745: if wf_directory.useractive(l_thisRecipient) = TRUE then
1746: if zpb_wf_ntf.user_in_role(p_RoleName, l_thisRecipient) = 'N' then
1747: ZPB_UTIL_PVT.AddUsersToAdHocRole(p_RoleName, l_thisRecipient);
1748: l_status := 'Y';
1749: end if;
1750: end if;

Line 1886: end ZPB_WF_NTF;

1882:
1883:
1884:
1885:
1886: end ZPB_WF_NTF;