[Home] [Help]
1002: l_party_notify_rec_tbl.DECISION_MAKER_FLAG.extend(l_new_resource_count);
1003:
1004: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1005: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1006: fnd_message.Set_Token('TEXT', 'Adding to pv_party_notifications the following:');
1007: fnd_msg_pub.Add;
1008: END IF;
1009:
1010: for i in l_bulk_running_count + 1 .. l_party_notify_rec_tbl.wf_item_type.count loop
1302: , c.resource_id
1303: , c.decision_maker_flag
1304: , c.notification_type
1305: , c.user_id
1306: from pv_lead_workflows a, pv_lead_assignments b, pv_party_notifications c, fnd_user usr
1307: where a.lead_id = pc_lead_id
1308: and a.wf_status = g_wf_status_open
1309: and a.wf_item_type = b.wf_item_type
1310: and a.wf_item_key = b.wf_item_key
1566:
1567: close lc_get_assignment;
1568:
1569: if l_itemtype is NULL then
1570: -- the cursor returned no rows, which means that the person is not in pv_party_notifications)
1571: -- because of the way the UI is implemented (partner link), this API get's called whenever anyone
1572: -- changes anything on that page even though the assignment list is not updated
1573: -- so instead of throwing an exception, just return
1574:
1937: is
1938: select a.wf_item_type, a.wf_item_key, a.routing_status, a.wf_status,
1939: b.lead_assignment_id, b.status, b.assign_sequence,
1940: c.rowid, c.resource_id, c.decision_maker_flag, c.user_id
1941: from pv_lead_workflows a, pv_lead_assignments b, pv_party_notifications c, fnd_user usr
1942: where a.lead_id = pc_lead_id
1943: and a.entity = pc_entity
1944: and a.wf_item_type = b.wf_item_type
1945: and a.wf_item_key = b.wf_item_key
1973: pc_partner_id number,
1974: pc_notify_type varchar2) is
1975: select usr.user_name, pn.resource_id
1976: from pv_lead_assignments la,
1977: pv_party_notifications pn,
1978: fnd_user usr
1979: where la.wf_item_type = pc_itemtype
1980: and la.wf_item_key = pc_itemkey
1981: and la.partner_id = pc_partner_id
1991: pc_partner_id number,
1992: pc_notify_type varchar2) is
1993: select usr.user_name, pn.resource_id
1994: from pv_lead_assignments la,
1995: pv_party_notifications pn,
1996: fnd_user usr
1997: where la.wf_item_type = pc_itemtype
1998: and la.wf_item_key = pc_itemkey
1999: and la.partner_id = pc_partner_id
2002: and pn.user_id = usr.user_id
2003: and not exists
2004: (select 1
2005: from pv_lead_assignments la2,
2006: pv_party_notifications pn2
2007: where la2.wf_item_type = pc_itemtype
2008: and la2.wf_item_key = pc_itemkey
2009: and la2.partner_id <> la.partner_id
2010: and la2.status in (g_la_status_cm_timeout,