DBA Data[Home] [Help]

APPS.AS_BUSINESS_EVENT_PVT dependencies on AS_BUSINESS_EVENT_PVT

Line 1: PACKAGE BODY AS_BUSINESS_EVENT_PVT as

1: PACKAGE BODY AS_BUSINESS_EVENT_PVT as
2: /* $Header: asxvbevb.pls 120.1 2005/06/14 01:33:53 appldev $ */
3:
4: --
5: -- NAME

Line 6: -- AS_BUSINESS_EVENT_PVT

2: /* $Header: asxvbevb.pls 120.1 2005/06/14 01:33:53 appldev $ */
3:
4: --
5: -- NAME
6: -- AS_BUSINESS_EVENT_PVT
7: --
8: -- HISTORY
9: -- 9/17/2003 SUMAHALI CREATED
10: --

Line 13: G_PKG_NAME CONSTANT VARCHAR2(30):='AS_BUSINESS_EVENT_PVT';

9: -- 9/17/2003 SUMAHALI CREATED
10: --
11: --
12:
13: G_PKG_NAME CONSTANT VARCHAR2(30):='AS_BUSINESS_EVENT_PVT';
14: G_FILE_NAME CONSTANT VARCHAR2(12):='asxvbevb.pls';
15:
16: G_DUMMY_DATE CONSTANT DATE := to_date('11/11/9999', 'MM/DD/YYYY');
17:

Line 49: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'EVENT_DATA_DELETE', p_event.getEventName(), p_subscription_guid);

45: WHEN NO_DATA_FOUND THEN
46: FND_MESSAGE.Set_Name('AS', 'Error number ' || to_char(SQLCODE));
47: FND_MSG_PUB.ADD;
48:
49: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'EVENT_DATA_DELETE', p_event.getEventName(), p_subscription_guid);
50: WF_EVENT.setErrorInfo(p_event, 'WARNING');
51:
52: RETURN 'WARNING';
53:

Line 60: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'EVENT_DATA_DELETE', p_event.getEventName(), p_subscription_guid);

56:
57: FND_MESSAGE.Set_Name('AS', 'Error number ' || to_char(SQLCODE));
58: FND_MSG_PUB.ADD;
59:
60: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'EVENT_DATA_DELETE', p_event.getEventName(), p_subscription_guid);
61: WF_EVENT.setErrorInfo(p_event, 'ERROR');
62:
63: RETURN 'ERROR';
64: END;

Line 97: AND UPPER(sub.rule_function) = 'AS_BUSINESS_EVENT_PVT.EVENT_DATA_DELETE'

93: wf_event_subscriptions sub
94: WHERE eve.name = p_event_name
95: AND eve.status = 'ENABLED'
96: AND eve.guid = sub.event_filter_guid
97: AND UPPER(sub.rule_function) = 'AS_BUSINESS_EVENT_PVT.EVENT_DATA_DELETE'
98: AND sub.status = 'ENABLED'
99: AND sub.source_type = 'LOCAL'
100: AND EXISTS (
101: SELECT 'X'

Line 104: AND UPPER(sub1.rule_function) <> 'AS_BUSINESS_EVENT_PVT.EVENT_DATA_DELETE'

100: AND EXISTS (
101: SELECT 'X'
102: FROM wf_event_subscriptions sub1
103: WHERE sub1.event_filter_guid = eve.guid
104: AND UPPER(sub1.rule_function) <> 'AS_BUSINESS_EVENT_PVT.EVENT_DATA_DELETE'
105: AND sub1.status = 'ENABLED'
106: AND sub1.source_type = 'LOCAL')
107: ;
108:

Line 288: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'TEST_EVENT', p_event.getEventName(), p_subscription_guid);

284: WHEN NO_DATA_FOUND THEN
285: FND_MESSAGE.Set_Name('AS', 'Error number ' || to_char(SQLCODE));
286: FND_MSG_PUB.ADD;
287:
288: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'TEST_EVENT', p_event.getEventName(), p_subscription_guid);
289: WF_EVENT.setErrorInfo(p_event, 'WARNING');
290:
291: RETURN 'WARNING';
292:

Line 299: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'TEST_EVENT', p_event.getEventName(), p_subscription_guid);

295:
296: FND_MESSAGE.Set_Name('AS', 'Error number ' || to_char(SQLCODE));
297: FND_MSG_PUB.ADD;
298:
299: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'TEST_EVENT', p_event.getEventName(), p_subscription_guid);
300: WF_EVENT.setErrorInfo(p_event, 'ERROR');
301:
302: RETURN 'ERROR';
303: END Test_event;

Line 1181: -- called directly if the last parameter is AS_BUSINESS_EVENT_PVT.DIRECT_CALL

1177: END DiffSTeamSnapShots;
1178:
1179:
1180: -- Normally this is an subscriber of INT_OPPTY_UPDATE_EVENT. But it can be
1181: -- called directly if the last parameter is AS_BUSINESS_EVENT_PVT.DIRECT_CALL
1182: -- and is set to Y
1183: FUNCTION Raise_update_oppty_event (
1184: p_subscription_guid IN RAW,
1185: p_event IN OUT NOCOPY WF_EVENT_T

Line 1271: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(' || l_event_name || '): ' || l_sub_exists);

1267:
1268: -- Debug Message
1269: IF l_debug THEN
1270: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1271: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(' || l_event_name || '): ' || l_sub_exists);
1272: END IF;
1273:
1274: IF l_sub_exists = 'Y' THEN
1275: IF l_event_code = 'U' THEN

Line 1297: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');

1293: l_event_rec := l_event_list(l_i);
1294: -- Debug Message
1295: IF l_debug THEN
1296: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1297: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');
1298: END IF;
1299:
1300: raise_event(
1301: p_event_name => l_event_rec.event_name,

Line 1332: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'RAISE_UPDATE_OPPTY_EVENT', p_event.getEventName(), p_subscription_guid);

1328: FND_MESSAGE.Set_Name('AS', 'Error number ' || to_char(SQLCODE));
1329: FND_MSG_PUB.ADD;
1330:
1331: IF l_direct_call <> 'Y' THEN
1332: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'RAISE_UPDATE_OPPTY_EVENT', p_event.getEventName(), p_subscription_guid);
1333: WF_EVENT.setErrorInfo(p_event, 'ERROR');
1334: END IF;
1335:
1336: RETURN 'ERROR';

Line 1367: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);

1363:
1364: -- Debug Message
1365: IF l_debug THEN
1366: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1367: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);
1368: END IF;
1369:
1370: IF l_raise_event <> 'Y' THEN
1371: -- Raise Event ONLY if a subscription to

Line 1378: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(CLOSED): ' || l_raise_event);

1374:
1375: -- Debug Message
1376: IF l_debug THEN
1377: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1378: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(CLOSED): ' || l_raise_event);
1379: END IF;
1380: END IF;
1381:
1382: IF l_raise_event <> 'Y' THEN

Line 1390: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(WON): ' || l_raise_event);

1386:
1387: -- Debug Message
1388: IF l_debug THEN
1389: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1390: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(WON): ' || l_raise_event);
1391: END IF;
1392: END IF;
1393:
1394: IF l_raise_event <> 'Y' THEN

Line 1402: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(LOST): ' || l_raise_event);

1398:
1399: -- Debug Message
1400: IF l_debug THEN
1401: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1402: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription(LOST): ' || l_raise_event);
1403: END IF;
1404: END IF;
1405: -- End Set l_raise_event = 'Y' if subscription exists to one of
1406: -- OPPTY UPDATE/CLOSED/WON/LOST Events.

Line 1481: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');

1477:
1478: -- Debug Message
1479: IF l_debug THEN
1480: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1481: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');
1482: END IF;
1483:
1484: -- Raise Event to do diff and raise actual event(s)
1485: raise_event(

Line 1514: -- called directly if the last parameter is AS_BUSINESS_EVENT_PVT.DIRECT_CALL

1510: END Update_oppty_post_event;
1511:
1512:
1513: -- Normally this is an subscriber of INT_OPP_LINES_UPDATE_EVENT. But it can be
1514: -- called directly if the last parameter is AS_BUSINESS_EVENT_PVT.DIRECT_CALL
1515: -- and is set to Y
1516: FUNCTION Raise_upd_opp_lines_evnt (
1517: p_subscription_guid IN RAW,
1518: p_event IN OUT NOCOPY WF_EVENT_T

Line 1567: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);

1563:
1564: -- Debug Message
1565: IF l_debug THEN
1566: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1567: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);
1568: END IF;
1569:
1570: IF l_raise_event = 'Y' THEN
1571: l_oppline_changed := DiffOppLineSnapShots(l_event_key, FALSE) ;

Line 1585: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');

1581: IF l_raise_event = 'Y' THEN
1582: -- Debug Message
1583: IF l_debug THEN
1584: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1585: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');
1586: END IF;
1587:
1588: -- Raise Event
1589: raise_event(

Line 1614: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'RAISE_UPD_OPP_LINES_EVNT', p_event.getEventName(), p_subscription_guid);

1610: FND_MESSAGE.Set_Name('AS', 'Error number ' || to_char(SQLCODE));
1611: FND_MSG_PUB.ADD;
1612:
1613: IF l_direct_call <> 'Y' THEN
1614: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'RAISE_UPD_OPP_LINES_EVNT', p_event.getEventName(), p_subscription_guid);
1615: WF_EVENT.setErrorInfo(p_event, 'ERROR');
1616: END IF;
1617:
1618: RETURN 'ERROR';

Line 1647: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);

1643:
1644: -- Debug Message
1645: IF l_debug THEN
1646: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1647: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);
1648: END IF;
1649:
1650: IF l_raise_event = 'Y' THEN
1651: x_event_key := item_key( OPP_LINES_UPDATE_EVENT );

Line 1723: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');

1719:
1720: -- Debug Message
1721: IF l_debug THEN
1722: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1723: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');
1724: END IF;
1725:
1726: -- Raise Event to do diff and raise actual event(s)
1727: raise_event(

Line 1756: -- called directly if the last parameter is AS_BUSINESS_EVENT_PVT.DIRECT_CALL

1752:
1753: -- The below method is used to raise events for SalesTeam update of either
1754: -- opportunity or Customer. Normally this is an subscriber of
1755: -- INT_STEAM_UPDATE_EVENT. But it can be
1756: -- called directly if the last parameter is AS_BUSINESS_EVENT_PVT.DIRECT_CALL
1757: -- and is set to Y
1758: FUNCTION Raise_upd_STeam_evnt (
1759: p_subscription_guid IN RAW,
1760: p_event IN OUT NOCOPY WF_EVENT_T

Line 1817: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);

1813:
1814: -- Debug Message
1815: IF l_debug THEN
1816: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1817: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);
1818: END IF;
1819:
1820: IF l_raise_event = 'Y' THEN
1821: l_steam_changed := DiffSTeamSnapShots(l_event_key, FALSE) ;

Line 1835: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');

1831: IF l_raise_event = 'Y' THEN
1832: -- Debug Message
1833: IF l_debug THEN
1834: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1835: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');
1836: END IF;
1837:
1838: -- Raise Event
1839: raise_event(

Line 1864: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'RAISE_UPD_STEAM_EVNT', p_event.getEventName(), p_subscription_guid);

1860: FND_MESSAGE.Set_Name('AS', 'Error number ' || to_char(SQLCODE));
1861: FND_MSG_PUB.ADD;
1862:
1863: IF l_direct_call <> 'Y' THEN
1864: WF_CORE.CONTEXT('AS_BUSINESS_EVENT_PVT', 'RAISE_UPD_STEAM_EVNT', p_event.getEventName(), p_subscription_guid);
1865: WF_EVENT.setErrorInfo(p_event, 'ERROR');
1866: END IF;
1867:
1868: RETURN 'ERROR';

Line 1897: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);

1893:
1894: -- Debug Message
1895: IF l_debug THEN
1896: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1897: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);
1898: END IF;
1899:
1900: IF l_raise_event = 'Y' THEN
1901: x_event_key := item_key( OPP_STEAM_UPDATE_EVENT );

Line 1973: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');

1969:
1970: -- Debug Message
1971: IF l_debug THEN
1972: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1973: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');
1974: END IF;
1975:
1976: -- Raise Event to do diff and raise actual event(s)
1977: raise_event(

Line 2028: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);

2024:
2025: -- Debug Message
2026: IF l_debug THEN
2027: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2028: 'Return Value from AS_BUSINESS_EVENT_PVT.exist_subscription: ' || l_raise_event);
2029: END IF;
2030:
2031: IF l_raise_event = 'Y' THEN
2032: x_event_key := item_key( CUST_STEAM_UPDATE_EVENT );

Line 2104: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');

2100:
2101: -- Debug Message
2102: IF l_debug THEN
2103: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
2104: 'Calling AS_BUSINESS_EVENT_PVT.raise_event');
2105: END IF;
2106:
2107: -- Raise Event to do diff and raise actual event(s)
2108: raise_event(

Line 2133: END AS_BUSINESS_EVENT_PVT;

2129: 'Private API: ' || l_api_name || ' end');
2130: END IF;
2131: END Upd_Cust_STeam_post_event;
2132:
2133: END AS_BUSINESS_EVENT_PVT;