DBA Data[Home] [Help]

APPS.WF_PURGE dependencies on WF_CORE

Line 203: Wf_Core.Token('SYSDATE', to_char(sysdate));

199: xenddate := to_date(1, 'J');
200: -- Disallow future date in enddate
201: -- Avoid something being purged before its defined persistence period.
202: if (enddate > sysdate) then
203: Wf_Core.Token('SYSDATE', to_char(sysdate));
204: Wf_Core.Raise('WF_FUTURE_END_DATE');
205: end if;
206:
207: if ((itemkey is not null and (instr(itemkey,'%')>0 or itemtype is null))

Line 204: Wf_Core.Raise('WF_FUTURE_END_DATE');

200: -- Disallow future date in enddate
201: -- Avoid something being purged before its defined persistence period.
202: if (enddate > sysdate) then
203: Wf_Core.Token('SYSDATE', to_char(sysdate));
204: Wf_Core.Raise('WF_FUTURE_END_DATE');
205: end if;
206:
207: if ((itemkey is not null and (instr(itemkey,'%')>0 or itemtype is null))
208: or (instr(itemtype,'%')>0)) then

Line 209: wf_core.raise('WFSQL_ARGS');

205: end if;
206:
207: if ((itemkey is not null and (instr(itemkey,'%')>0 or itemtype is null))
208: or (instr(itemtype,'%')>0)) then
209: wf_core.raise('WFSQL_ARGS');
210: end if;
211:
212: -- Build ECX Purge sql
213: --

Line 540: Wf_Core.Context('Wf_Purge', 'Items', itemtype, itemkey, to_char(enddate));

536: close item5purge;
537: end if;
538:
539:
540: Wf_Core.Context('Wf_Purge', 'Items', itemtype, itemkey, to_char(enddate));
541: raise;
542: end Items;
543:
544: --

Line 680: Wf_Core.Token('SYSDATE', to_char(sysdate));

676:
677: -- Disallow future date in enddate
678: -- Avoid something being purged before its defined persistence period.
679: if (enddate > sysdate) then
680: Wf_Core.Token('SYSDATE', to_char(sysdate));
681: Wf_Core.Raise('WF_FUTURE_END_DATE');
682: end if;
683:
684: -- Bug 3228475 Disallow partial values for itemtype and activity name

Line 681: Wf_Core.Raise('WF_FUTURE_END_DATE');

677: -- Disallow future date in enddate
678: -- Avoid something being purged before its defined persistence period.
679: if (enddate > sysdate) then
680: Wf_Core.Token('SYSDATE', to_char(sysdate));
681: Wf_Core.Raise('WF_FUTURE_END_DATE');
682: end if;
683:
684: -- Bug 3228475 Disallow partial values for itemtype and activity name
685: if ((itemtype is not null and (instr(name,'%')>0 or itemtype is null))

Line 687: Wf_Core.Raise('WFSQL_ARGS');

683:
684: -- Bug 3228475 Disallow partial values for itemtype and activity name
685: if ((itemtype is not null and (instr(name,'%')>0 or itemtype is null))
686: or (instr(itemtype,'%')>0)) then
687: Wf_Core.Raise('WFSQL_ARGS');
688: end if;
689: <>
690: loop
691: if (itemtype is not null and name is null) then

Line 989: Wf_Core.Context('Wf_Purge', 'Activities', itemtype, to_char(enddate));

985:
986: if (actcurs3%ISOPEN) then
987: close actcurs3;
988: end if;
989: Wf_Core.Context('Wf_Purge', 'Activities', itemtype, to_char(enddate));
990: raise;
991: end Activities;
992:
993: --

Line 1090: Wf_Core.Token('SYSDATE', to_char(sysdate));

1086:
1087: -- Disallow future date in enddate
1088: -- Avoid something being purged before its defined persistence period.
1089: if (enddate > sysdate) then
1090: Wf_Core.Token('SYSDATE', to_char(sysdate));
1091: Wf_Core.Raise('WF_FUTURE_END_DATE');
1092: end if;
1093:
1094: -- Bug 3228475 Disallow partial values being passed for itemtype

Line 1091: Wf_Core.Raise('WF_FUTURE_END_DATE');

1087: -- Disallow future date in enddate
1088: -- Avoid something being purged before its defined persistence period.
1089: if (enddate > sysdate) then
1090: Wf_Core.Token('SYSDATE', to_char(sysdate));
1091: Wf_Core.Raise('WF_FUTURE_END_DATE');
1092: end if;
1093:
1094: -- Bug 3228475 Disallow partial values being passed for itemtype
1095: if (instr(itemtype,'%')>0) then

Line 1096: Wf_Core.Raise('WFSQL_ARGS');

1092: end if;
1093:
1094: -- Bug 3228475 Disallow partial values being passed for itemtype
1095: if (instr(itemtype,'%')>0) then
1096: Wf_Core.Raise('WFSQL_ARGS');
1097: end if;
1098:
1099: -- End date all the orphan notifications. This end dates all the notifications
1100: -- generated before the enddate parameter value.

Line 1225: Wf_Core.Context('Wf_Purge', 'Notifications', itemtype, to_char(enddate));

1221: elsif (c2%ISOPEN) then
1222: close c2;
1223: end if;
1224:
1225: Wf_Core.Context('Wf_Purge', 'Notifications', itemtype, to_char(enddate));
1226: raise;
1227: end Notifications;
1228:
1229: --

Line 1275: Wf_Core.Token('SYSDATE', to_char(sysdate));

1271:
1272: -- Disallow future date in enddate
1273: -- Avoid something being purged before its defined persistence period.
1274: if (enddate > sysdate) then
1275: Wf_Core.Token('SYSDATE', to_char(sysdate));
1276: Wf_Core.Raise('WF_FUTURE_END_DATE');
1277: end if;
1278:
1279: -- Bug 3228475 Disallow partial values from being passed

Line 1276: Wf_Core.Raise('WF_FUTURE_END_DATE');

1272: -- Disallow future date in enddate
1273: -- Avoid something being purged before its defined persistence period.
1274: if (enddate > sysdate) then
1275: Wf_Core.Token('SYSDATE', to_char(sysdate));
1276: Wf_Core.Raise('WF_FUTURE_END_DATE');
1277: end if;
1278:
1279: -- Bug 3228475 Disallow partial values from being passed
1280: if ((itemkey is not null and (instr(itemkey,'%')>0 or itemtype is null))

Line 1282: Wf_Core.Raise('WFSQL_ARGS');

1278:
1279: -- Bug 3228475 Disallow partial values from being passed
1280: if ((itemkey is not null and (instr(itemkey,'%')>0 or itemtype is null))
1281: or (instr(itemtype,'%')>0)) then
1282: Wf_Core.Raise('WFSQL_ARGS');
1283: end if;
1284:
1285: -- Bug 1636510
1286: -- Before attempting to purge items we will abort any error process

Line 1327: Wf_Core.Context('Wf_Purge', 'Total', itemtype, itemkey, to_char(enddate));

1323: Notifications(itemtype=>itemtype, enddate=>enddate,docommit=>docommit,purgesigs=>purgesigs);
1324: end if;
1325: exception
1326: when others then
1327: Wf_Core.Context('Wf_Purge', 'Total', itemtype, itemkey, to_char(enddate));
1328: raise;
1329: end Total;
1330:
1331: --

Line 1370: Wf_Core.Context('Wf_Purge', 'TotalPERM', itemtype, itemkey,

1366: exception
1367: when others then
1368: -- Reset persistence type to the default value
1369: wf_purge.persistence_type := 'TEMP';
1370: Wf_Core.Context('Wf_Purge', 'TotalPERM', itemtype, itemkey,
1371: to_char(enddate));
1372: raise;
1373: end TotalPERM;
1374:

Line 1442: wf_core.get_error(errname, errmsg, errstack);

1438:
1439: exception
1440: when others then
1441: -- Retrieve error message into errbuf
1442: wf_core.get_error(errname, errmsg, errstack);
1443: if (errmsg is not null) then
1444: errbuf := errmsg;
1445: else
1446: errbuf := sqlerrm;

Line 1526: Wf_Core.Token('SYSDATE', to_char(sysdate));

1522: begin
1523: -- Disallow future date in enddate
1524: -- Avoid something being purged before its expiration date.
1525: if (end_date > sysdate) then
1526: Wf_Core.Token('SYSDATE', to_char(sysdate));
1527: Wf_Core.Raise('WF_FUTURE_END_DATE');
1528: end if;
1529:
1530: if (orig_system is NOT NULL) then

Line 1527: Wf_Core.Raise('WF_FUTURE_END_DATE');

1523: -- Disallow future date in enddate
1524: -- Avoid something being purged before its expiration date.
1525: if (end_date > sysdate) then
1526: Wf_Core.Token('SYSDATE', to_char(sysdate));
1527: Wf_Core.Raise('WF_FUTURE_END_DATE');
1528: end if;
1529:
1530: if (orig_system is NOT NULL) then
1531: --We are using the new feature allowing a specific orig_system to be

Line 1609: wf_core.context('WF_PURGE', 'Directory', end_date);

1605: when others then
1606: if (role_cursor%isopen) then
1607: close role_cursor;
1608: end if;
1609: wf_core.context('WF_PURGE', 'Directory', end_date);
1610: raise;
1611: end Directory;
1612:
1613: --

Line 1626: wf_core.context('WF_PURGE', 'AdHocDirectory', end_date);

1622: begin
1623: Wf_Purge.Directory(end_date);
1624: exception
1625: when OTHERS then
1626: wf_core.context('WF_PURGE', 'AdHocDirectory', end_date);
1627: raise;
1628: end AdHocDirectory;
1629:
1630: --

Line 1669: wf_core.context('WF_PURGE', 'GetPurgeableCount', p_itemType);

1665: AND PRIOR WI2.PARENT_ITEM_KEY = WI2.ITEM_KEY);
1666: return l_purgeable;
1667: exception
1668: when OTHERS then
1669: wf_core.context('WF_PURGE', 'GetPurgeableCount', p_itemType);
1670: raise;
1671: end;
1672:
1673:

Line 1723: Wf_Core.Raise('WFSQL_ARGS');

1719: begin
1720:
1721: if ((itemkey is not null and (instr(itemkey,'%')>0 or itemtype is null))
1722: or (instr(itemtype,'%')>0)) then
1723: Wf_Core.Raise('WFSQL_ARGS');
1724: end if;
1725:
1726: -- Outer loop
1727: <>

Line 1809: Wf_Core.Context('Wf_Purge', 'AbortErrorProcess', itemtype, itemkey);

1805: if (c_error3%ISOPEN) then
1806: close c_error3;
1807: end if;
1808:
1809: Wf_Core.Context('Wf_Purge', 'AbortErrorProcess', itemtype, itemkey);
1810: raise;
1811:
1812: end AbortErrorProcess;
1813:

Line 1849: -- wf_core.context('WF_PURGE', 'ProvisionRequests');

1845: --
1846: -- begin
1847: --
1848: -- if (enddate > sysdate) then
1849: -- wf_core.context('WF_PURGE', 'ProvisionRequests');
1850: -- Wf_Core.Token('SYSDATE', to_char(sysdate));
1851: -- Wf_Core.Raise('WF_FUTURE_END_DATE');
1852: -- end if;
1853: --

Line 1850: -- Wf_Core.Token('SYSDATE', to_char(sysdate));

1846: -- begin
1847: --
1848: -- if (enddate > sysdate) then
1849: -- wf_core.context('WF_PURGE', 'ProvisionRequests');
1850: -- Wf_Core.Token('SYSDATE', to_char(sysdate));
1851: -- Wf_Core.Raise('WF_FUTURE_END_DATE');
1852: -- end if;
1853: --
1854: -- if context is null or length(context) = 0 then

Line 1851: -- Wf_Core.Raise('WF_FUTURE_END_DATE');

1847: --
1848: -- if (enddate > sysdate) then
1849: -- wf_core.context('WF_PURGE', 'ProvisionRequests');
1850: -- Wf_Core.Token('SYSDATE', to_char(sysdate));
1851: -- Wf_Core.Raise('WF_FUTURE_END_DATE');
1852: -- end if;
1853: --
1854: -- if context is null or length(context) = 0 then
1855: -- l_context := '%';

Line 1906: -- wf_core.context('WF_PURGE','ProvisionRequests', context, enddate);

1902: -- when others then
1903: -- if c1%isopen then
1904: -- close c1;
1905: -- end if;
1906: -- wf_core.context('WF_PURGE','ProvisionRequests', context, enddate);
1907: -- end ProvisionRequests;
1908: --
1909: -- --
1910: -- -- ProvisionRequestsConcurrent

Line 1962: -- wf_core.get_error(errname, errmsg, errstack);

1958: --
1959: -- exception
1960: -- when others then
1961: -- -- Retrieve error message into errbuf
1962: -- wf_core.get_error(errname, errmsg, errstack);
1963: -- if (errmsg is not null) then
1964: -- errbuf := errmsg;
1965: -- else
1966: -- errbuf := sqlerrm;