DBA Data[Home] [Help]

APPS.WF_ENGINE_BULK dependencies on WF_ENGINE_BULK

Line 1: package body WF_ENGINE_BULK as

1: package body WF_ENGINE_BULK as
2: /* $Header: wfengblkb.pls 120.5 2006/02/10 01:13:02 anachatt noship $ */
3:
4:
5: --

Line 30: procedure ConsolidateKeys(itemkeys in out NOCOPY WF_ENGINE_BULK.Itemkeytabtype,

26: -- itemkeys
27: -- userkeys
28: -- ownerroles
29:
30: procedure ConsolidateKeys(itemkeys in out NOCOPY WF_ENGINE_BULK.Itemkeytabtype,
31: user_keys in out NOCOPY WF_ENGINE_BULK.UserKeyTabType ,
32: owner_roles in out NOCOPY WF_ENGINE_BULK.OwnerRoleTabType )
33: is
34:

Line 31: user_keys in out NOCOPY WF_ENGINE_BULK.UserKeyTabType ,

27: -- userkeys
28: -- ownerroles
29:
30: procedure ConsolidateKeys(itemkeys in out NOCOPY WF_ENGINE_BULK.Itemkeytabtype,
31: user_keys in out NOCOPY WF_ENGINE_BULK.UserKeyTabType ,
32: owner_roles in out NOCOPY WF_ENGINE_BULK.OwnerRoleTabType )
33: is
34:
35: begin

Line 32: owner_roles in out NOCOPY WF_ENGINE_BULK.OwnerRoleTabType )

28: -- ownerroles
29:
30: procedure ConsolidateKeys(itemkeys in out NOCOPY WF_ENGINE_BULK.Itemkeytabtype,
31: user_keys in out NOCOPY WF_ENGINE_BULK.UserKeyTabType ,
32: owner_roles in out NOCOPY WF_ENGINE_BULK.OwnerRoleTabType )
33: is
34:
35: begin
36:

Line 72: if (wf_engine_bulk.schema is null) then

68: function Current_Schema
69: return varchar2
70: is
71: begin
72: if (wf_engine_bulk.schema is null) then
73: select sys_context('USERENV','CURRENT_SCHEMA')
74: into wf_engine_bulk.schema
75: from sys.dual;
76: end if;

Line 74: into wf_engine_bulk.schema

70: is
71: begin
72: if (wf_engine_bulk.schema is null) then
73: select sys_context('USERENV','CURRENT_SCHEMA')
74: into wf_engine_bulk.schema
75: from sys.dual;
76: end if;
77: return wf_engine_bulk.schema;
78: exception

Line 77: return wf_engine_bulk.schema;

73: select sys_context('USERENV','CURRENT_SCHEMA')
74: into wf_engine_bulk.schema
75: from sys.dual;
76: end if;
77: return wf_engine_bulk.schema;
78: exception
79: when OTHERS then
80: Wf_Core.Context('Wf_Engine_Bulk', 'Current_Schema');
81: raise;

Line 80: Wf_Core.Context('Wf_Engine_Bulk', 'Current_Schema');

76: end if;
77: return wf_engine_bulk.schema;
78: exception
79: when OTHERS then
80: Wf_Core.Context('Wf_Engine_Bulk', 'Current_Schema');
81: raise;
82: end Current_Schema;
83:
84: --

Line 99: user_keys in out NOCOPY wf_engine_bulk.userkeytabtype,

95: procedure BulkCreateItems(
96: itemtype in varchar2,
97: wflow in varchar2,
98: actdate in date,
99: user_keys in out NOCOPY wf_engine_bulk.userkeytabtype,
100: owner_roles in out NOCOPY wf_engine_bulk.ownerroletabtype,
101: parent_itemtype in varchar2,
102: parent_itemkey in varchar2,
103: parent_context in varchar2)

Line 100: owner_roles in out NOCOPY wf_engine_bulk.ownerroletabtype,

96: itemtype in varchar2,
97: wflow in varchar2,
98: actdate in date,
99: user_keys in out NOCOPY wf_engine_bulk.userkeytabtype,
100: owner_roles in out NOCOPY wf_engine_bulk.ownerroletabtype,
101: parent_itemtype in varchar2,
102: parent_itemkey in varchar2,
103: parent_context in varchar2)
104: is

Line 107: itemkeys wf_engine_bulk.itemkeytabtype;

103: parent_context in varchar2)
104: is
105:
106: rootversion number;
107: itemkeys wf_engine_bulk.itemkeytabtype;
108:
109: begin
110:
111: rootversion := Wf_Activity.Version(itemtype, wflow, actdate);

Line 309: l_itemkeys WF_ENGINE_BULK.itemkeytabtype;

305: aname in varchar2,
306: text_values in wf_engine.textTabTyp)
307: is
308: bulkException boolean := FALSE;
309: l_itemkeys WF_ENGINE_BULK.itemkeytabtype;
310: l_ukeys WF_ENGINE_BULK.UserKeyTabType;
311: l_rkeys WF_ENGINE_BULK.OwnerRoleTabType;
312: begin
313: -- Check Arguments

Line 310: l_ukeys WF_ENGINE_BULK.UserKeyTabType;

306: text_values in wf_engine.textTabTyp)
307: is
308: bulkException boolean := FALSE;
309: l_itemkeys WF_ENGINE_BULK.itemkeytabtype;
310: l_ukeys WF_ENGINE_BULK.UserKeyTabType;
311: l_rkeys WF_ENGINE_BULK.OwnerRoleTabType;
312: begin
313: -- Check Arguments
314: if ((itemtype is null) or

Line 311: l_rkeys WF_ENGINE_BULK.OwnerRoleTabType;

307: is
308: bulkException boolean := FALSE;
309: l_itemkeys WF_ENGINE_BULK.itemkeytabtype;
310: l_ukeys WF_ENGINE_BULK.UserKeyTabType;
311: l_rkeys WF_ENGINE_BULK.OwnerRoleTabType;
312: begin
313: -- Check Arguments
314: if ((itemtype is null) or
315: (aname is null)) then

Line 380: itemkeys in Wf_Engine_Bulk.ItemKeyTabType,

376: -- avalue - Array of New values for attribute
377: --
378: procedure SetItemAttrText (
379: itemtype in varchar2,
380: itemkeys in Wf_Engine_Bulk.ItemKeyTabType,
381: anames in Wf_Engine.NameTabTyp,
382: avalues in Wf_Engine.TextTabTyp)
383: is
384: status pls_integer;

Line 391: succItemUpdates Wf_Engine_Bulk.ItemKeyTabType;

387: wiavIND number;
388: success_cnt number;
389: match boolean;
390: succAttrUpdates Wf_Engine.NameTabTyp;
391: succItemUpdates Wf_Engine_Bulk.ItemKeyTabType;
392:
393: begin
394: -- Check Arguments
395: if (itemtype is null) then

Line 510: Wf_Core.Context('Wf_Engine_Bulk', 'SetItemAttrText', itemtype);

506: end if;
507:
508: exception
509: when others then
510: Wf_Core.Context('Wf_Engine_Bulk', 'SetItemAttrText', itemtype);
511: raise;
512: end SetItemAttrText;
513:
514:

Line 527: itemkeys in Wf_Engine_Bulk.ItemKeyTabType,

523: -- avalue - Array of new value for attribute
524: --
525: procedure SetItemAttrNumber(
526: itemtype in varchar2,
527: itemkeys in Wf_Engine_Bulk.ItemKeyTabType,
528: anames in Wf_Engine.NameTabTyp,
529: avalues in Wf_Engine.NumTabTyp)
530: is
531: arrayIndex pls_integer;

Line 538: succItemUpdates Wf_Engine_Bulk.ItemKeyTabType;

534: success_cnt number;
535: j pls_integer;
536: match boolean;
537: succAttrUpdates Wf_Engine.NameTabTyp;
538: succItemUpdates Wf_Engine_Bulk.ItemKeyTabType;
539:
540: begin
541: -- Check Arguments
542: if (itemtype is null) then

Line 655: Wf_Core.Context('Wf_Engine_Bulk', 'SetItemAttrNumber', itemtype);

651: end if;
652:
653: exception
654: when others then
655: Wf_Core.Context('Wf_Engine_Bulk', 'SetItemAttrNumber', itemtype);
656: raise;
657: end SetItemAttrNumber;
658:
659: --

Line 671: itemkeys in Wf_Engine_Bulk.ItemKeyTabType,

667: -- avalue - Array of new value for attribute
668: --
669: procedure SetItemAttrDate(
670: itemtype in varchar2,
671: itemkeys in Wf_Engine_Bulk.ItemKeyTabType,
672: anames in Wf_Engine.NameTabTyp,
673: avalues in Wf_Engine.DateTabTyp)
674: is
675: status pls_integer;

Line 683: succItemUpdates Wf_Engine_Bulk.ItemKeyTabType;

679:
680: j pls_integer;
681: match boolean;
682: succAttrUpdates Wf_Engine.NameTabTyp;
683: succItemUpdates Wf_Engine_Bulk.ItemKeyTabType;
684:
685: begin
686:
687: -- Check Arguments

Line 798: Wf_Core.Context('Wf_Engine_Bulk', 'SetItemAttrDate', itemtype);

794: WF_CORE.Raise('WFENG_BULK_SETATTR');
795: end if;
796: exception
797: when others then
798: Wf_Core.Context('Wf_Engine_Bulk', 'SetItemAttrDate', itemtype);
799: raise;
800: end SetItemAttrDate;
801:
802: -- BulkCreateProcess (PUBLIC)

Line 816: itemkeys in wf_engine_bulk.itemkeytabtype,

812: -- correspondence with the item ley list
813: -- owner_roles - A list of ownerroles bearing one-to-one
814: -- correspondence with the item key list
815: procedure CreateProcess(itemtype in varchar2,
816: itemkeys in wf_engine_bulk.itemkeytabtype,
817: process in varchar2,
818: user_keys in wf_engine_bulk.userkeytabtype,
819: owner_roles in wf_engine_bulk.ownerroletabtype,
820: parent_itemtype in varchar2,

Line 818: user_keys in wf_engine_bulk.userkeytabtype,

814: -- correspondence with the item key list
815: procedure CreateProcess(itemtype in varchar2,
816: itemkeys in wf_engine_bulk.itemkeytabtype,
817: process in varchar2,
818: user_keys in wf_engine_bulk.userkeytabtype,
819: owner_roles in wf_engine_bulk.ownerroletabtype,
820: parent_itemtype in varchar2,
821: parent_itemkey in varchar2,
822: parent_context in varchar2,

Line 819: owner_roles in wf_engine_bulk.ownerroletabtype,

815: procedure CreateProcess(itemtype in varchar2,
816: itemkeys in wf_engine_bulk.itemkeytabtype,
817: process in varchar2,
818: user_keys in wf_engine_bulk.userkeytabtype,
819: owner_roles in wf_engine_bulk.ownerroletabtype,
820: parent_itemtype in varchar2,
821: parent_itemkey in varchar2,
822: parent_context in varchar2,
823: masterdetail in boolean )

Line 835: l_itemkeys wf_engine_bulk.itemkeytabtype;

831:
832: foundDuplicate boolean :=FALSE;
833:
834:
835: l_itemkeys wf_engine_bulk.itemkeytabtype;
836: l_user_keys wf_engine_bulk.userkeytabtype;
837: l_owner_roles wf_engine_bulk.ownerroletabtype;
838: mon_random wf_engine.textTabTyp;
839: acc_random wf_engine.textTabTyp;

Line 836: l_user_keys wf_engine_bulk.userkeytabtype;

832: foundDuplicate boolean :=FALSE;
833:
834:
835: l_itemkeys wf_engine_bulk.itemkeytabtype;
836: l_user_keys wf_engine_bulk.userkeytabtype;
837: l_owner_roles wf_engine_bulk.ownerroletabtype;
838: mon_random wf_engine.textTabTyp;
839: acc_random wf_engine.textTabTyp;
840: schemaAttribute varchar2(30);

Line 837: l_owner_roles wf_engine_bulk.ownerroletabtype;

833:
834:
835: l_itemkeys wf_engine_bulk.itemkeytabtype;
836: l_user_keys wf_engine_bulk.userkeytabtype;
837: l_owner_roles wf_engine_bulk.ownerroletabtype;
838: mon_random wf_engine.textTabTyp;
839: acc_random wf_engine.textTabTyp;
840: schemaAttribute varchar2(30);
841: l_rkeys wf_engine_bulk.ownerroleTabType;

Line 841: l_rkeys wf_engine_bulk.ownerroleTabType;

837: l_owner_roles wf_engine_bulk.ownerroletabtype;
838: mon_random wf_engine.textTabTyp;
839: acc_random wf_engine.textTabTyp;
840: schemaAttribute varchar2(30);
841: l_rkeys wf_engine_bulk.ownerroleTabType;
842: l_ukeys wf_engine_bulk.userkeyTabType;
843: l_count number;
844:
845: begin

Line 842: l_ukeys wf_engine_bulk.userkeyTabType;

838: mon_random wf_engine.textTabTyp;
839: acc_random wf_engine.textTabTyp;
840: schemaAttribute varchar2(30);
841: l_rkeys wf_engine_bulk.ownerroleTabType;
842: l_ukeys wf_engine_bulk.userkeyTabType;
843: l_count number;
844:
845: begin
846: -- Argument validation

Line 955: Wf_Engine_Bulk.BulkCreateItems(itemtype, root, actdate,l_user_keys,

951: end if;*/
952:
953: g_SuccessItems:=l_ItemKeys;
954: -- Bulk Insert rows in items table
955: Wf_Engine_Bulk.BulkCreateItems(itemtype, root, actdate,l_user_keys,
956: l_owner_roles, parent_itemtype, parent_itemkey,parent_context);
957:
958:
959: -- Build the array of random numbers for monitor and access key attributes

Line 960: schemaAttribute:=Wf_Engine_Bulk.Current_Schema;

956: l_owner_roles, parent_itemtype, parent_itemkey,parent_context);
957:
958:
959: -- Build the array of random numbers for monitor and access key attributes
960: schemaAttribute:=Wf_Engine_Bulk.Current_Schema;
961: if g_successItems.count>0 then
962: for arrInd in g_SuccessItems.first..g_SuccessItems.last loop
963: mon_random(arrInd) := Wf_Core.Random;
964: acc_random(arrInd) := Wf_Core.Random;

Line 969: Wf_Engine_Bulk.BulkAddItemAttr(itemtype, wf_engine.wfmon_mon_key,

965:
966: end loop;
967: end if;
968: -- Create monitor access key attributes
969: Wf_Engine_Bulk.BulkAddItemAttr(itemtype, wf_engine.wfmon_mon_key,
970: mon_random);
971: Wf_Engine_Bulk.BulkAddItemAttr(itemtype, wf_engine.wfmon_acc_key,
972: acc_random);
973:

Line 971: Wf_Engine_Bulk.BulkAddItemAttr(itemtype, wf_engine.wfmon_acc_key,

967: end if;
968: -- Create monitor access key attributes
969: Wf_Engine_Bulk.BulkAddItemAttr(itemtype, wf_engine.wfmon_mon_key,
970: mon_random);
971: Wf_Engine_Bulk.BulkAddItemAttr(itemtype, wf_engine.wfmon_acc_key,
972: acc_random);
973:
974: l_itemkeys:=g_SuccessItems;
975: -- Create a schema attribute across the itemkeys

Line 1080: Wf_Core.Context('Wf_Engine_Bulk', 'CreateProcess', itemtype, process);

1076: end if;
1077:
1078: exception
1079: when others then
1080: Wf_Core.Context('Wf_Engine_Bulk', 'CreateProcess', itemtype, process);
1081: raise;
1082: end CreateProcess;
1083:
1084: ----------------------------------------------------------------

Line 1097: itemkeys in wf_engine_bulk.itemkeytabtype)

1093: -- itemkeys - A list of itemkeys generated from the application object's
1094: -- primary key.
1095: --
1096: procedure StartProcess(itemtype in varchar2,
1097: itemkeys in wf_engine_bulk.itemkeytabtype)
1098: is
1099:
1100:
1101: -- Select all the start activities in this parent process with

Line 1164: l_itemkeys wf_engine_bulk.itemkeytabtype;

1160:
1161: duedateTab DateTabType;
1162: execCountTab numTabType;
1163: msgIdTab RawTabType;
1164: l_itemkeys wf_engine_bulk.itemkeytabtype;
1165: l_rkeys wf_engine_bulk.ownerroleTabType;
1166: l_ukeys wf_engine_bulk.userkeyTabType;
1167: begin
1168: -- Check if the item exists and also get back the root process name

Line 1165: l_rkeys wf_engine_bulk.ownerroleTabType;

1161: duedateTab DateTabType;
1162: execCountTab numTabType;
1163: msgIdTab RawTabType;
1164: l_itemkeys wf_engine_bulk.itemkeytabtype;
1165: l_rkeys wf_engine_bulk.ownerroleTabType;
1166: l_ukeys wf_engine_bulk.userkeyTabType;
1167: begin
1168: -- Check if the item exists and also get back the root process name
1169: -- and version. We assume that the process and version are identical

Line 1166: l_ukeys wf_engine_bulk.userkeyTabType;

1162: execCountTab numTabType;
1163: msgIdTab RawTabType;
1164: l_itemkeys wf_engine_bulk.itemkeytabtype;
1165: l_rkeys wf_engine_bulk.ownerroleTabType;
1166: l_ukeys wf_engine_bulk.userkeyTabType;
1167: begin
1168: -- Check if the item exists and also get back the root process name
1169: -- and version. We assume that the process and version are identical
1170: -- across the itemkeys in the list so that they need to be retieved

Line 1574: Wf_Core.Context('Wf_Engine_Bulk','StartProcess',

1570: WF_CORE.RAISE('WFENG_BULK_OPER');
1571: end if;
1572: exception
1573: when others then
1574: Wf_Core.Context('Wf_Engine_Bulk','StartProcess',
1575: itemtype);
1576: raise;
1577: end StartProcess;
1578:

Line 1598: itemkeys in wf_engine_bulk.itemkeytabtype,

1594: -- activityStatus - The status of the activity.This should be restricted to 'NOTIFIED'
1595: -- and 'DEFERRED' only.
1596:
1597: procedure FastForward(itemtype in varchar2,
1598: itemkeys in wf_engine_bulk.itemkeytabtype,
1599: process in varchar2,
1600: activity in varchar2,
1601: activityStatus in varchar2,
1602: parent_itemtype in varchar2,

Line 1645: l_itemkeys wf_engine_bulk.itemKeyTabType;

1641:
1642: duedateTab DateTabType;
1643: execCountTab numTabType;
1644: msgIdTab RawTabType;
1645: l_itemkeys wf_engine_bulk.itemKeyTabType;
1646: l_ukeys wf_engine_bulk.userkeyTabType;
1647: l_rkeys wf_engine_bulk.ownerroleTabType;
1648:
1649: begin

Line 1646: l_ukeys wf_engine_bulk.userkeyTabType;

1642: duedateTab DateTabType;
1643: execCountTab numTabType;
1644: msgIdTab RawTabType;
1645: l_itemkeys wf_engine_bulk.itemKeyTabType;
1646: l_ukeys wf_engine_bulk.userkeyTabType;
1647: l_rkeys wf_engine_bulk.ownerroleTabType;
1648:
1649: begin
1650:

Line 1647: l_rkeys wf_engine_bulk.ownerroleTabType;

1643: execCountTab numTabType;
1644: msgIdTab RawTabType;
1645: l_itemkeys wf_engine_bulk.itemKeyTabType;
1646: l_ukeys wf_engine_bulk.userkeyTabType;
1647: l_rkeys wf_engine_bulk.ownerroleTabType;
1648:
1649: begin
1650:
1651: -- Validate that the activityStatus is not other than 'DEFERRED' or 'NOTIFIED'

Line 1664: WF_ENGINE_BULK.CreateProcess(itemtype,l_itemkeys,process,l_ukeys,l_rkeys,

1660: -- initialize the itemkeys list
1661: l_itemkeys:=itemkeys;
1662: -- Call CreateProcess to Create the Process across all itemkeys
1663: begin
1664: WF_ENGINE_BULK.CreateProcess(itemtype,l_itemkeys,process,l_ukeys,l_rkeys,
1665: parent_itemtype,parent_itemkey,parent_context,masterdetail);
1666: exception
1667: when others then
1668:

Line 1989: Wf_Core.Context('Wf_Engine_Bulk','FastForward',

1985: WF_CORE.RAISE('WFENG_BULK_OPER');
1986: end if;
1987: exception
1988: when others then
1989: Wf_Core.Context('Wf_Engine_Bulk','FastForward',
1990: Itemtype,process,activity);
1991: raise;
1992:
1993:

Line 1997: END WF_ENGINE_BULK;

1993:
1994: end FastForward;
1995:
1996:
1997: END WF_ENGINE_BULK;