[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: --
9545:
9546: --
9547: -- VoteForResultType
9548: -- Because of bug2885157,
9549: -- copied from WF_STANDARD.VoteForResultType 115.46
9550: -- and put Wf_Item_Activity_Status.ClearCache before calling
9551: -- Wf_Item_Activity_Status.Notification_Status to get notification group id correctly
9552: --
9553: --
9550: -- and put Wf_Item_Activity_Status.ClearCache before calling
9551: -- Wf_Item_Activity_Status.Notification_Status to get notification group id correctly
9552: --
9553: --
9554: -- Standard Voting Function
9555: -- IN
9556: -- itemtype - A valid item type from (WF_ITEM_TYPES table).
9557: -- itemkey - A string generated from the application object's primary key.
9558: -- actid - The process activity(instance id).
9573: -- - percentage ofvotes cast.
9574: --
9575: -- - REQUIRE_ALL_VOTES - Evaluate voting after all votes are cast.
9576: -- - If a Timeout occurs and all votes have not
9577: -- - been cast then the standard timeout
9578: -- - transition is taken. Votes are calculated
9579: -- - as a percenatage of users notified to vote.
9580: --
9581: -- - TALLY_ON_EVERY_VOTE - Evaluate voting after every vote or a
9587: -- - of votes cast.
9588: --
9589: -- "One attribute for each of the activities result type codes"
9590: --
9591: -- - The standard Activity VOTEFORRESULTTYPE has the WFSTD_YES_NO
9592: -- - result type assigned.
9593: -- - Thefore activity has two activity attributes.
9594: --
9595: -- Y - Percenatage required for Yes transition
9648: end if;
9649:
9650: -- SYNCHMODE: Not allowed
9651: if (itemkey = wf_engine.eng_synch) then
9652: Wf_Core.Token('OPERATION', 'Wf_Standard.VotForResultType');
9653: Wf_Core.Raise('WFENG_SYNCH_DISABLED');
9654: end if;
9655:
9656: -- Always clear the cache first
9823: return;
9824:
9825: exception
9826: when wf_invalid_command then
9827: Wf_Core.Context('Wf_Standard', 'VoteForResultType', itemtype,
9828: itemkey, to_char(actid), funcmode);
9829: Wf_Core.Token('COMMAND', l_voting_option);
9830: Wf_Core.Raise('WFSQL_COMMAND');
9831: when others then
9828: itemkey, to_char(actid), funcmode);
9829: Wf_Core.Token('COMMAND', l_voting_option);
9830: Wf_Core.Raise('WFSQL_COMMAND');
9831: when others then
9832: Wf_Core.Context('Wf_Standard', 'VoteForResultType',itemtype,
9833: itemkey, to_char(actid), funcmode);
9834: raise;
9835:
9836:
10033:
10034: --
10035: -- PeopleLevelVoteForResultType
10036: --
10037: -- Route People Level Standard Voting Function
10038: -- IN
10039: -- itemtype - A valid item type from (WF_ITEM_TYPES table).
10040: -- itemkey - A string generated from the application object's primary key.
10041: -- actid - The process activity(instance id).
11374: l_apps_web_agent VARCHAR2(240) ;
11375: l_wf_web_agent VARCHAR2(2000) ;
11376:
11377: BEGIN
11378: -- Standard Start of API savepoint
11379: -- No Need to set SAVEPOINT for this API
11380: -- SAVEPOINT GetWorkflowMonitorURL_Util ;
11381:
11382: -- Standard call to check for call compatibility.
11378: -- Standard Start of API savepoint
11379: -- No Need to set SAVEPOINT for this API
11380: -- SAVEPOINT GetWorkflowMonitorURL_Util ;
11381:
11382: -- Standard call to check for call compatibility.
11383: IF NOT FND_API.Compatible_API_Call( l_api_version
11384: , p_api_version
11385: , l_api_name
11386: , G_PKG_NAME )
11453:
11454: END IF ;
11455:
11456:
11457: -- Standard check of p_commit.
11458: -- IF FND_API.To_Boolean( p_commit ) THEN
11459: -- COMMIT WORK;
11460: -- END IF;
11461:
11458: -- IF FND_API.To_Boolean( p_commit ) THEN
11459: -- COMMIT WORK;
11460: -- END IF;
11461:
11462: -- Standard call to get message count and if count is 1, get message info.
11463: FND_MSG_PUB.Count_And_Get
11464: ( p_count => x_msg_count
11465: , p_data => x_msg_data
11466: );
11662:
11663:
11664:
11665: BEGIN
11666: -- Standard Start of API savepoint
11667: SAVEPOINT StartWorkflow_Util;
11668:
11669: -- Standard call to check for call compatibility.
11670: IF NOT FND_API.Compatible_API_Call( l_api_version
11665: BEGIN
11666: -- Standard Start of API savepoint
11667: SAVEPOINT StartWorkflow_Util;
11668:
11669: -- Standard call to check for call compatibility.
11670: IF NOT FND_API.Compatible_API_Call( l_api_version
11671: , p_api_version
11672: , l_api_name
11673: , G_PKG_NAME )
12355: Write_Debug('After executing StartWorkflow API Body') ;
12356: END IF ;
12357:
12358:
12359: -- Standard check of p_commit.
12360: IF FND_API.To_Boolean( p_commit ) THEN
12361:
12362: IF g_debug_flag THEN
12363: Write_Debug('Do Commit.') ;
12365:
12366: COMMIT WORK;
12367: END IF;
12368:
12369: -- Standard call to get message count and if count is 1, get message info.
12370: FND_MSG_PUB.Count_And_Get
12371: ( p_count => x_msg_count
12372: , p_data => x_msg_data
12373: );
12379:
12380:
12381: EXCEPTION
12382: WHEN FND_API.G_EXC_ERROR THEN
12383: -- Standard check of p_commit.
12384: IF FND_API.To_Boolean( p_commit ) THEN
12385: IF g_debug_flag THEN
12386: Write_Debug('Rollback . . .') ;
12387: END IF ;
12508: l_return_status VARCHAR2(1) ;
12509:
12510:
12511: BEGIN
12512: -- Standard Start of API savepoint
12513: SAVEPOINT AbortWorkflow_Util;
12514:
12515: -- Standard call to check for call compatibility.
12516: IF NOT FND_API.Compatible_API_Call( l_api_version
12511: BEGIN
12512: -- Standard Start of API savepoint
12513: SAVEPOINT AbortWorkflow_Util;
12514:
12515: -- Standard call to check for call compatibility.
12516: IF NOT FND_API.Compatible_API_Call( l_api_version
12517: , p_api_version
12518: , l_api_name
12519: , G_PKG_NAME )
13059: Write_Debug('After executing AbortWorkflow API Body') ;
13060: END IF ;
13061:
13062:
13063: -- Standard check of p_commit.
13064: IF FND_API.To_Boolean( p_commit ) THEN
13065:
13066: IF g_debug_flag THEN
13067: Write_Debug('Do Commit.') ;
13070: COMMIT WORK;
13071:
13072: END IF;
13073:
13074: -- Standard call to get message count and if count is 1, get message info.
13075: FND_MSG_PUB.Count_And_Get
13076: ( p_count => x_msg_count
13077: , p_data => x_msg_data
13078: );
13719: --
13720:
13721:
13722: BEGIN
13723: -- Standard Start of API savepoint
13724: SAVEPOINT GrantObjectRoles;
13725:
13726: -- Standard call to check for call compatibility.
13727: IF NOT FND_API.Compatible_API_Call( l_api_version
13722: BEGIN
13723: -- Standard Start of API savepoint
13724: SAVEPOINT GrantObjectRoles;
13725:
13726: -- Standard call to check for call compatibility.
13727: IF NOT FND_API.Compatible_API_Call( l_api_version
13728: , p_api_version
13729: , l_api_name
13730: , G_PKG_NAME )
14104: Write_Debug('After executing GrantObjectRoles API Body') ;
14105: END IF ;
14106:
14107:
14108: -- Standard check of p_commit.
14109: IF FND_API.To_Boolean( p_commit ) THEN
14110:
14111: IF g_debug_flag THEN
14112: Write_Debug('Do Commit.') ;
14115: COMMIT WORK;
14116:
14117: END IF;
14118:
14119: -- Standard call to get message count and if count is 1, get message info.
14120: FND_MSG_PUB.Count_And_Get
14121: ( p_count => x_msg_count
14122: , p_data => x_msg_data
14123: );
14130:
14131: EXCEPTION
14132: WHEN FND_API.G_EXC_ERROR THEN
14133:
14134: -- Standard check of p_commit.
14135: IF FND_API.To_Boolean( p_commit )
14136: THEN
14137: ROLLBACK TO GrantObjectRoles ;
14138: END IF ;
14148: Close_Debug_Session ;
14149: END IF ;
14150:
14151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14152: -- Standard check of p_commit.
14153: IF FND_API.To_Boolean( p_commit )
14154: THEN
14155: ROLLBACK TO GrantObjectRoles ;
14156: IF g_debug_flag THEN
14171: Close_Debug_Session ;
14172: END IF ;
14173:
14174: WHEN OTHERS THEN
14175: -- Standard check of p_commit.
14176: IF FND_API.To_Boolean( p_commit )
14177: THEN
14178: ROLLBACK TO GrantObjectRoles ;
14179:
14676:
14677:
14678:
14679: BEGIN
14680: -- Standard Start of API savepoint
14681: SAVEPOINT RevokeObjectRoles;
14682:
14683: -- Standard call to check for call compatibility.
14684: IF NOT FND_API.Compatible_API_Call( l_api_version
14679: BEGIN
14680: -- Standard Start of API savepoint
14681: SAVEPOINT RevokeObjectRoles;
14682:
14683: -- Standard call to check for call compatibility.
14684: IF NOT FND_API.Compatible_API_Call( l_api_version
14685: , p_api_version
14686: , l_api_name
14687: , G_PKG_NAME )
15036: Write_Debug('After executing RevokeObjectRoles API Body') ;
15037: END IF ;
15038:
15039:
15040: -- Standard check of p_commit.
15041: IF FND_API.To_Boolean( p_commit ) THEN
15042:
15043: IF g_debug_flag THEN
15044: Write_Debug('Do Commit.') ;
15047: COMMIT WORK;
15048:
15049: END IF;
15050:
15051: -- Standard call to get message count and if count is 1, get message info.
15052: FND_MSG_PUB.Count_And_Get
15053: ( p_count => x_msg_count
15054: , p_data => x_msg_data
15055: );
15062:
15063: EXCEPTION
15064: WHEN FND_API.G_EXC_ERROR THEN
15065:
15066: -- Standard check of p_commit.
15067: IF FND_API.To_Boolean( p_commit )
15068: THEN
15069: ROLLBACK TO RevokeObjectRoles ;
15070: END IF ;
15080: Close_Debug_Session ;
15081: END IF ;
15082:
15083: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15084: -- Standard check of p_commit.
15085: IF FND_API.To_Boolean( p_commit )
15086: THEN
15087: ROLLBACK TO RevokeObjectRoles ;
15088: IF g_debug_flag THEN
15102: Close_Debug_Session ;
15103: END IF ;
15104:
15105: WHEN OTHERS THEN
15106: -- Standard check of p_commit.
15107: IF FND_API.To_Boolean( p_commit )
15108: THEN
15109: ROLLBACK TO RevokeObjectRoles ;
15110: IF g_debug_flag THEN