[Home] [Help]
163: err_stack VARCHAR2(32000);
164:
165: BEGIN
166: -- Initialize return status to SUCCESS
167: l_return_status := FND_API.G_RET_STS_SUCCESS;
168:
169: -- Get the new workflow process ID
170: OPEN l_WorkflowProcID_csr;
171: FETCH l_WorkflowProcID_csr INTO l_wf_process_id;
263: -- completes since only function activities are used.
264: WF_ENGINE.StartProcess(l_itemtype, l_itemkey );
265:
266: /************************************************************
267: IF FND_API.To_Boolean(p_commit ) THEN
268: --COMMIT WORK;
269: END IF;
270: ************************************************************/
271: -- Get all the OUT or IN OUT variables from the Workflow
400: -- End of comments
401: -- --------------------------------------------------------------------------
402: PROCEDURE Cancel_Workflow (
403: p_api_version IN NUMBER
404: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
405: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
406: , p_return_status out nocopy VARCHAR2
407: , p_msg_count out nocopy NUMBER
408: , p_msg_data out nocopy VARCHAR2
401: -- --------------------------------------------------------------------------
402: PROCEDURE Cancel_Workflow (
403: p_api_version IN NUMBER
404: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
405: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
406: , p_return_status out nocopy VARCHAR2
407: , p_msg_count out nocopy NUMBER
408: , p_msg_data out nocopy VARCHAR2
409: , p_call_ID IN NUMBER
421: -- API Savepoint
422: SAVEPOINT Cancel_Workflow_PUB;
423:
424: -- Check version number
425: IF NOT FND_API.Compatible_API_Call(
426: l_api_version,
427: p_api_version,
428: l_api_name,
429: G_PKG_NAME ) THEN
426: l_api_version,
427: p_api_version,
428: l_api_name,
429: G_PKG_NAME ) THEN
430: raise FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432:
433: IF FND_API.to_Boolean( p_init_msg_list ) THEN
434: FND_MSG_PUB.initialize;
429: G_PKG_NAME ) THEN
430: raise FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432:
433: IF FND_API.to_Boolean( p_init_msg_list ) THEN
434: FND_MSG_PUB.initialize;
435: END IF;
436:
437: -- Initialize return status to SUCCESS
434: FND_MSG_PUB.initialize;
435: END IF;
436:
437: -- Initialize return status to SUCCESS
438: p_return_status := FND_API.G_RET_STS_SUCCESS;
439:
440: /**********************************************************************
441: --
442: -- Make sure that the item is still active
455:
456: EXCEPTION
457: WHEN l_NOT_ACTIVE THEN
458: ROLLBACK TO Cancel_Workflow_PUB;
459: p_return_status := FND_API.G_RET_STS_ERROR;
460: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
461: FND_MESSAGE.SET_NAME('CCT', 'CCT_ROUTING_WFLOW_NOT_ACTIVE');
462: FND_MSG_PUB.Add;
463: END IF;
463: END IF;
464: FND_MSG_PUB.Count_And_Get(
465: p_count => p_msg_count,
466: p_data => p_msg_data,
467: p_encoded => FND_API.G_FALSE );
468:
469: WHEN OTHERS THEN
470: ROLLBACK TO Cancel_Workflow_PUB;
471: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467: p_encoded => FND_API.G_FALSE );
468:
469: WHEN OTHERS THEN
470: ROLLBACK TO Cancel_Workflow_PUB;
471: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
472: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
473: FND_MESSAGE.SET_NAME('CCT', 'CCT_ROUTING_WFLOW_NOT_ACTIVE');
474: FND_MSG_PUB.Add;
475: END IF;
475: END IF;
476: FND_MSG_PUB.Count_And_Get(
477: p_count => p_msg_count,
478: p_data => p_msg_data,
479: p_encoded => FND_API.G_FALSE );
480:
481: END Cancel_Workflow;
482:
483:
872:
873: BEGIN
874: --dbms_output.put_line('p_call_id '|| p_call_id);
875: -- Initialize return status to SUCCESS
876: l_return_status := FND_API.G_RET_STS_SUCCESS;
877: -- Get the new workflow process ID
878: OPEN l_WorkflowProcID_csr;
879: FETCH l_WorkflowProcID_csr INTO l_wf_process_id;
880: CLOSE l_WorkflowProcID_csr;