304: BEGIN
305: -- dbms_output.put_line ('inside start workflow');
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
307: /*
308: IF fnd_msg_pub.count_msg > 0 THEN
309: insert_into_temp ('msgs in stack inside start_workflow is',
310: fnd_msg_pub.count_msg);
311: END IF;
312: */
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
307: /*
308: IF fnd_msg_pub.count_msg > 0 THEN
309: insert_into_temp ('msgs in stack inside start_workflow is',
310: fnd_msg_pub.count_msg);
311: END IF;
312: */
313: fnd_msg_pub.initialize;
314: pa_debug.init_err_stack ('pa_asgmt_wfstd.start_workflow');
309: insert_into_temp ('msgs in stack inside start_workflow is',
310: fnd_msg_pub.count_msg);
311: END IF;
312: */
313: fnd_msg_pub.initialize;
314: pa_debug.init_err_stack ('pa_asgmt_wfstd.start_workflow');
315: x_msg_count := 0;
316: -- Create the unique item key to launch WF with
317: SELECT pa_prm_wf_item_key_s.nextval
467: END IF;
468: END IF;
469: -- If there are any busines rules violations , then do
470: -- not proceed. Return
471: l_msg_count := fnd_msg_pub.count_msg;
472: IF l_msg_count > 0 THEN
473: IF l_msg_count = 1 THEN
474: pa_interface_utils_pub.get_messages
475: (p_encoded => FND_API.G_TRUE,
1455: -- 4537865 : RESET other OUT params also
1456: x_msg_data := SUBSTRB(SQLERRM,1,240);
1457: x_error_message_code := SQLCODE ;
1458: -- 4537865 : End
1459: fnd_msg_pub.add_exc_msg
1460: (p_pkg_name => 'PA_ASGMT_WFSTD',
1461: p_procedure_name => pa_debug.g_err_stack );
1462: x_msg_count := fnd_msg_pub.count_msg;
1463: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1458: -- 4537865 : End
1459: fnd_msg_pub.add_exc_msg
1460: (p_pkg_name => 'PA_ASGMT_WFSTD',
1461: p_procedure_name => pa_debug.g_err_stack );
1462: x_msg_count := fnd_msg_pub.count_msg;
1463: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1464: END Start_Workflow ;
1465:
1466:
1556: x_wf_process := NULL ;
1557: x_wf_type := NULL ;
1558:
1559: -- 4537865 : End
1560: fnd_msg_pub.add_exc_msg
1561: (p_pkg_name => 'PA_ASGMT_WFSTD',
1562: p_procedure_name => pa_debug.g_err_stack );
1563: x_msg_count := fnd_msg_pub.count_msg;
1564: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1559: -- 4537865 : End
1560: fnd_msg_pub.add_exc_msg
1561: (p_pkg_name => 'PA_ASGMT_WFSTD',
1562: p_procedure_name => pa_debug.g_err_stack );
1563: x_msg_count := fnd_msg_pub.count_msg;
1564: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
1565: RAISE ;
1566: END Get_workflow_process_info ;
1567:
3793: WHERE notification_id = document_id;
3794:
3795: BEGIN
3796: l_newline := FND_GLOBAL.newline;
3797: l_msg_count := FND_MSG_PUB.Count_Msg;
3798: OPEN l_nf_csr;
3799: FETCH l_nf_csr INTO l_item_type, l_item_key;
3800: IF l_nf_csr%NOTFOUND THEN
3801: document := 'Item Key not found';
4482: -- Initialize the return status to success
4483: x_return_status := FND_API.G_RET_STS_SUCCESS;
4484:
4485: --Clear the global PL/SQL message table
4486: FND_MSG_PUB.initialize;
4487:
4488: log_message('Inside Start mass approval flow: 0');
4489: log_message('Value of updated info doc:' || p_update_info_doc);
4490:
4745: --Setting the original value
4746: wf_engine.threshold := l_save_threshold;
4747:
4748: -- Set the excetption Message and the stack
4749: FND_MSG_PUB.add_exc_msg
4750: ( p_pkg_name => 'PA_ASGMT_WFSTD.start_mass_Approval_flow'
4751: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
4752:
4753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4911: -- Initialize the return status to success
4912: x_return_status := FND_API.G_RET_STS_SUCCESS;
4913:
4914: --Clear the global PL/SQL message table
4915: FND_MSG_PUB.initialize;
4916: x_msg_count := 0;
4917:
4918: ---------------------------------
4919: --Set the pending approval flag
5422: wf_engine.threshold := l_save_threshold;
5423:
5424: -- IF the number of messages is 1 then fetch the message code from
5425: -- the stack and return its text
5426: x_msg_count := FND_MSG_PUB.Count_Msg;
5427:
5428: IF x_msg_count = 1 THEN
5429: pa_interface_utils_pub.get_messages
5430: ( p_encoded => FND_API.G_TRUE
5436: -- Reset the error stack when returning to the calling program
5437: PA_DEBUG.Reset_Err_Stack;
5438:
5439: -- If g_error_exists is TRUE then set the x_return_status to 'E'
5440: IF FND_MSG_PUB.Count_Msg >0 THEN
5441: x_return_status := FND_API.G_RET_STS_ERROR;
5442: END IF;
5443:
5444: EXCEPTION
5447: --Setting the original value
5448: wf_engine.threshold := l_save_threshold;
5449:
5450: -- Set the excetption Message and the stack
5451: FND_MSG_PUB.add_exc_msg
5452: ( p_pkg_name => 'PA_ASGMT_WFSTD.process_res_fyi_notification'
5453: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
5454:
5455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5998: -- Initialize the return status to success
5999: x_return_status := FND_API.G_RET_STS_SUCCESS;
6000:
6001: --Clear the global PL/SQL message table
6002: FND_MSG_PUB.initialize;
6003:
6004: --------------------------------------------
6005: --Get Project Manager for these assignments
6006: --------------------------------------------
6394: wf_engine.threshold := l_save_threshold;
6395:
6396: -- IF the number of messages is 1 then fetch the message code from
6397: -- the stack and return its text
6398: x_msg_count := FND_MSG_PUB.Count_Msg;
6399:
6400: IF x_msg_count = 1 THEN
6401: pa_interface_utils_pub.get_messages
6402: ( p_encoded => FND_API.G_TRUE
6408: -- Reset the error stack when returning to the calling program
6409: PA_DEBUG.Reset_Err_Stack;
6410:
6411: -- If g_error_exists is TRUE then set the x_return_status to 'E'
6412: IF FND_MSG_PUB.Count_Msg >0 THEN
6413: x_return_status := FND_API.G_RET_STS_ERROR;
6414: END IF;
6415:
6416: EXCEPTION
6416: EXCEPTION
6417: WHEN OTHERS THEN
6418:
6419: -- Set the excetption Message and the stack
6420: FND_MSG_PUB.add_exc_msg
6421: ( p_pkg_name => 'PA_ASGMT_WFSTD.process_mgr_fyi_notification'
6422: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
6423:
6424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6481: -- Initialize the return status to success
6482: x_return_status := FND_API.G_RET_STS_SUCCESS;
6483:
6484: --Clear the global PL/SQL message table
6485: FND_MSG_PUB.initialize;
6486:
6487: log_message('Inside mass_process_approval_result_wf 2');
6488:
6489: ---------------------------------------------------
6586: ------------------------------------------------------------------
6587: -- IF the number of messages is 1 then fetch the message code from
6588: -- the stack and return its text
6589: ------------------------------------------------------------------
6590: x_msg_count := FND_MSG_PUB.Count_Msg;
6591:
6592: IF x_msg_count = 1 THEN
6593: pa_interface_utils_pub.get_messages
6594: ( p_encoded => FND_API.G_TRUE
6600: -- Reset the error stack when returning to the calling program
6601: PA_DEBUG.Reset_Err_Stack;
6602:
6603: -- If g_error_exists is TRUE then set the x_return_status to 'E'
6604: IF FND_MSG_PUB.Count_Msg >0 THEN
6605: x_return_status := FND_API.G_RET_STS_ERROR;
6606: END IF;
6607:
6608: EXCEPTION
6608: EXCEPTION
6609: WHEN OTHERS THEN
6610:
6611: -- Set the excetption Message and the stack
6612: FND_MSG_PUB.add_exc_msg
6613: ( p_pkg_name => 'PA_ASGMT_WFSTD.process_approval_result_wf'
6614: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
6615:
6616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6796: ,x_msg_data => l_msg_data);
6797:
6798: log_message('After Calling process res fyi');
6799:
6800: IF FND_MSG_PUB.Count_Msg > 0 THEN
6801:
6802: log_message('Error in res_fyi');
6803:
6804: ROLLBACK TO UPDATE_APPROVAL_STATUS;
7365: -- Initialize the return status to success
7366: x_return_status := FND_API.G_RET_STS_SUCCESS;
7367:
7368: --Clear the global PL/SQL message table
7369: FND_MSG_PUB.initialize;
7370: x_msg_count := 0;
7371:
7372: log_message('Inside submitter notification');
7373:
7726: wf_engine.threshold := l_save_threshold;
7727:
7728: -- IF the number of messages is 1 then fetch the message code from
7729: -- the stack and return its text
7730: x_msg_count := FND_MSG_PUB.Count_Msg;
7731:
7732: IF x_msg_count = 1 THEN
7733: pa_interface_utils_pub.get_messages
7734: ( p_encoded => FND_API.G_TRUE
7740: -- Reset the error stack when returning to the calling program
7741: PA_DEBUG.Reset_Err_Stack;
7742:
7743: -- If g_error_exists is TRUE then set the x_return_status to 'E'
7744: IF FND_MSG_PUB.Count_Msg >0 THEN
7745: x_return_status := FND_API.G_RET_STS_ERROR;
7746: END IF;
7747:
7748: EXCEPTION
7753: --Setting the original value
7754: wf_engine.threshold := l_save_threshold;
7755:
7756: -- Set the excetption Message and the stack
7757: FND_MSG_PUB.add_exc_msg
7758: ( p_pkg_name => 'PA_ASGMT_WFSTD.process_submitter_notification'
7759: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
7760:
7761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8105: IF l_assignment_id_tbl.COUNT > 0 THEN
8106:
8107: FOR i IN l_assignment_id_tbl.FIRST .. l_assignment_id_tbl.LAST LOOP
8108:
8109: FND_MSG_PUB.initialize;
8110:
8111: PA_UTILS.Add_Message( p_app_short_name => 'PA'
8112: ,p_msg_name => 'PA_PROCESS_ABORTED_SYSADMIN');
8113: