[Home] [Help]
705:
706: BEGIN
707:
708:
709: /* This might NOT be following standard
710: -- Deleting these adhoc role and user roles
711: -- should be done by WF Purge Program
712: -- Instead of this, Set Adhoc Role Expiration
713: -- using WF API. Then once user run WF Purge progam
1756: BEGIN
1757:
1758:
1759: -- Get Attachment Link Info from FND_DOCUMENT_ENTITIES
1760: -- then construct Ntf Attachmet Link for the standard
1761: -- FND:entity=
1762: -- e.g.
1763: -- FND:entity=ENG_ENGINEERING_CHANGES&pk1name=CHANGE_ID&pk1value=9999
1764: --
9621:
9622: --
9623: -- VoteForResultType
9624: -- Because of bug2885157,
9625: -- copied from WF_STANDARD.VoteForResultType 115.46
9626: -- and put Wf_Item_Activity_Status.ClearCache before calling
9627: -- Wf_Item_Activity_Status.Notification_Status to get notification group id correctly
9628: --
9629: --
9626: -- and put Wf_Item_Activity_Status.ClearCache before calling
9627: -- Wf_Item_Activity_Status.Notification_Status to get notification group id correctly
9628: --
9629: --
9630: -- Standard Voting Function
9631: -- IN
9632: -- itemtype - A valid item type from (WF_ITEM_TYPES table).
9633: -- itemkey - A string generated from the application object's primary key.
9634: -- actid - The process activity(instance id).
9649: -- - percentage ofvotes cast.
9650: --
9651: -- - REQUIRE_ALL_VOTES - Evaluate voting after all votes are cast.
9652: -- - If a Timeout occurs and all votes have not
9653: -- - been cast then the standard timeout
9654: -- - transition is taken. Votes are calculated
9655: -- - as a percenatage of users notified to vote.
9656: --
9657: -- - TALLY_ON_EVERY_VOTE - Evaluate voting after every vote or a
9663: -- - of votes cast.
9664: --
9665: -- "One attribute for each of the activities result type codes"
9666: --
9667: -- - The standard Activity VOTEFORRESULTTYPE has the WFSTD_YES_NO
9668: -- - result type assigned.
9669: -- - Thefore activity has two activity attributes.
9670: --
9671: -- Y - Percenatage required for Yes transition
9724: end if;
9725:
9726: -- SYNCHMODE: Not allowed
9727: if (itemkey = wf_engine.eng_synch) then
9728: Wf_Core.Token('OPERATION', 'Wf_Standard.VotForResultType');
9729: Wf_Core.Raise('WFENG_SYNCH_DISABLED');
9730: end if;
9731:
9732: -- Always clear the cache first
9899: return;
9900:
9901: exception
9902: when wf_invalid_command then
9903: Wf_Core.Context('Wf_Standard', 'VoteForResultType', itemtype,
9904: itemkey, to_char(actid), funcmode);
9905: Wf_Core.Token('COMMAND', l_voting_option);
9906: Wf_Core.Raise('WFSQL_COMMAND');
9907: when others then
9904: itemkey, to_char(actid), funcmode);
9905: Wf_Core.Token('COMMAND', l_voting_option);
9906: Wf_Core.Raise('WFSQL_COMMAND');
9907: when others then
9908: Wf_Core.Context('Wf_Standard', 'VoteForResultType',itemtype,
9909: itemkey, to_char(actid), funcmode);
9910: raise;
9911:
9912:
10109:
10110: --
10111: -- PeopleLevelVoteForResultType
10112: --
10113: -- Route People Level Standard Voting Function
10114: -- IN
10115: -- itemtype - A valid item type from (WF_ITEM_TYPES table).
10116: -- itemkey - A string generated from the application object's primary key.
10117: -- actid - The process activity(instance id).
11450: l_apps_web_agent VARCHAR2(240) ;
11451: l_wf_web_agent VARCHAR2(2000) ;
11452:
11453: BEGIN
11454: -- Standard Start of API savepoint
11455: -- No Need to set SAVEPOINT for this API
11456: -- SAVEPOINT GetWorkflowMonitorURL_Util ;
11457:
11458: -- Standard call to check for call compatibility.
11454: -- Standard Start of API savepoint
11455: -- No Need to set SAVEPOINT for this API
11456: -- SAVEPOINT GetWorkflowMonitorURL_Util ;
11457:
11458: -- Standard call to check for call compatibility.
11459: IF NOT FND_API.Compatible_API_Call( l_api_version
11460: , p_api_version
11461: , l_api_name
11462: , G_PKG_NAME )
11529:
11530: END IF ;
11531:
11532:
11533: -- Standard check of p_commit.
11534: -- IF FND_API.To_Boolean( p_commit ) THEN
11535: -- COMMIT WORK;
11536: -- END IF;
11537:
11534: -- IF FND_API.To_Boolean( p_commit ) THEN
11535: -- COMMIT WORK;
11536: -- END IF;
11537:
11538: -- Standard call to get message count and if count is 1, get message info.
11539: FND_MSG_PUB.Count_And_Get
11540: ( p_count => x_msg_count
11541: , p_data => x_msg_data
11542: );
11738:
11739:
11740:
11741: BEGIN
11742: -- Standard Start of API savepoint
11743: SAVEPOINT StartWorkflow_Util;
11744:
11745: -- Standard call to check for call compatibility.
11746: IF NOT FND_API.Compatible_API_Call( l_api_version
11741: BEGIN
11742: -- Standard Start of API savepoint
11743: SAVEPOINT StartWorkflow_Util;
11744:
11745: -- Standard call to check for call compatibility.
11746: IF NOT FND_API.Compatible_API_Call( l_api_version
11747: , p_api_version
11748: , l_api_name
11749: , G_PKG_NAME )
12431: Write_Debug('After executing StartWorkflow API Body') ;
12432: END IF ;
12433:
12434:
12435: -- Standard check of p_commit.
12436: IF FND_API.To_Boolean( p_commit ) THEN
12437:
12438: IF g_debug_flag THEN
12439: Write_Debug('Do Commit.') ;
12441:
12442: COMMIT WORK;
12443: END IF;
12444:
12445: -- Standard call to get message count and if count is 1, get message info.
12446: FND_MSG_PUB.Count_And_Get
12447: ( p_count => x_msg_count
12448: , p_data => x_msg_data
12449: );
12455:
12456:
12457: EXCEPTION
12458: WHEN FND_API.G_EXC_ERROR THEN
12459: -- Standard check of p_commit.
12460: IF FND_API.To_Boolean( p_commit ) THEN
12461: IF g_debug_flag THEN
12462: Write_Debug('Rollback . . .') ;
12463: END IF ;
12584: l_return_status VARCHAR2(1) ;
12585:
12586:
12587: BEGIN
12588: -- Standard Start of API savepoint
12589: SAVEPOINT AbortWorkflow_Util;
12590:
12591: -- Standard call to check for call compatibility.
12592: IF NOT FND_API.Compatible_API_Call( l_api_version
12587: BEGIN
12588: -- Standard Start of API savepoint
12589: SAVEPOINT AbortWorkflow_Util;
12590:
12591: -- Standard call to check for call compatibility.
12592: IF NOT FND_API.Compatible_API_Call( l_api_version
12593: , p_api_version
12594: , l_api_name
12595: , G_PKG_NAME )
13135: Write_Debug('After executing AbortWorkflow API Body') ;
13136: END IF ;
13137:
13138:
13139: -- Standard check of p_commit.
13140: IF FND_API.To_Boolean( p_commit ) THEN
13141:
13142: IF g_debug_flag THEN
13143: Write_Debug('Do Commit.') ;
13146: COMMIT WORK;
13147:
13148: END IF;
13149:
13150: -- Standard call to get message count and if count is 1, get message info.
13151: FND_MSG_PUB.Count_And_Get
13152: ( p_count => x_msg_count
13153: , p_data => x_msg_data
13154: );
13864: --
13865:
13866:
13867: BEGIN
13868: -- Standard Start of API savepoint
13869: SAVEPOINT GrantObjectRoles;
13870:
13871: -- Standard call to check for call compatibility.
13872: IF NOT FND_API.Compatible_API_Call( l_api_version
13867: BEGIN
13868: -- Standard Start of API savepoint
13869: SAVEPOINT GrantObjectRoles;
13870:
13871: -- Standard call to check for call compatibility.
13872: IF NOT FND_API.Compatible_API_Call( l_api_version
13873: , p_api_version
13874: , l_api_name
13875: , G_PKG_NAME )
14249: Write_Debug('After executing GrantObjectRoles API Body') ;
14250: END IF ;
14251:
14252:
14253: -- Standard check of p_commit.
14254: IF FND_API.To_Boolean( p_commit ) THEN
14255:
14256: IF g_debug_flag THEN
14257: Write_Debug('Do Commit.') ;
14260: COMMIT WORK;
14261:
14262: END IF;
14263:
14264: -- Standard call to get message count and if count is 1, get message info.
14265: FND_MSG_PUB.Count_And_Get
14266: ( p_count => x_msg_count
14267: , p_data => x_msg_data
14268: );
14275:
14276: EXCEPTION
14277: WHEN FND_API.G_EXC_ERROR THEN
14278:
14279: -- Standard check of p_commit.
14280: IF FND_API.To_Boolean( p_commit )
14281: THEN
14282: ROLLBACK TO GrantObjectRoles ;
14283: END IF ;
14293: Close_Debug_Session ;
14294: END IF ;
14295:
14296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14297: -- Standard check of p_commit.
14298: IF FND_API.To_Boolean( p_commit )
14299: THEN
14300: ROLLBACK TO GrantObjectRoles ;
14301: IF g_debug_flag THEN
14316: Close_Debug_Session ;
14317: END IF ;
14318:
14319: WHEN OTHERS THEN
14320: -- Standard check of p_commit.
14321: IF FND_API.To_Boolean( p_commit )
14322: THEN
14323: ROLLBACK TO GrantObjectRoles ;
14324:
14821:
14822:
14823:
14824: BEGIN
14825: -- Standard Start of API savepoint
14826: SAVEPOINT RevokeObjectRoles;
14827:
14828: -- Standard call to check for call compatibility.
14829: IF NOT FND_API.Compatible_API_Call( l_api_version
14824: BEGIN
14825: -- Standard Start of API savepoint
14826: SAVEPOINT RevokeObjectRoles;
14827:
14828: -- Standard call to check for call compatibility.
14829: IF NOT FND_API.Compatible_API_Call( l_api_version
14830: , p_api_version
14831: , l_api_name
14832: , G_PKG_NAME )
15181: Write_Debug('After executing RevokeObjectRoles API Body') ;
15182: END IF ;
15183:
15184:
15185: -- Standard check of p_commit.
15186: IF FND_API.To_Boolean( p_commit ) THEN
15187:
15188: IF g_debug_flag THEN
15189: Write_Debug('Do Commit.') ;
15192: COMMIT WORK;
15193:
15194: END IF;
15195:
15196: -- Standard call to get message count and if count is 1, get message info.
15197: FND_MSG_PUB.Count_And_Get
15198: ( p_count => x_msg_count
15199: , p_data => x_msg_data
15200: );
15207:
15208: EXCEPTION
15209: WHEN FND_API.G_EXC_ERROR THEN
15210:
15211: -- Standard check of p_commit.
15212: IF FND_API.To_Boolean( p_commit )
15213: THEN
15214: ROLLBACK TO RevokeObjectRoles ;
15215: END IF ;
15225: Close_Debug_Session ;
15226: END IF ;
15227:
15228: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15229: -- Standard check of p_commit.
15230: IF FND_API.To_Boolean( p_commit )
15231: THEN
15232: ROLLBACK TO RevokeObjectRoles ;
15233: IF g_debug_flag THEN
15247: Close_Debug_Session ;
15248: END IF ;
15249:
15250: WHEN OTHERS THEN
15251: -- Standard check of p_commit.
15252: IF FND_API.To_Boolean( p_commit )
15253: THEN
15254: ROLLBACK TO RevokeObjectRoles ;
15255: IF g_debug_flag THEN