DBA Data[Home] [Help]

APPS.OKL_VP_OA_WF dependencies on OKL_API

Line 5: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;

1: PACKAGE BODY okl_vp_oa_wf AS
2: /* $Header: OKLROAWB.pls 120.2 2006/09/29 12:13:15 ssdeshpa noship $ */
3:
4: G_NO_MATCHING_RECORD CONSTANT fnd_new_messages.message_name%TYPE DEFAULT 'OKL_LLA_NO_MATCHING_RECORD';
5: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
6:
7: G_OPERATING_AGRMNT_EVENT CONSTANT wf_events.name%TYPE DEFAULT 'oracle.apps.okl.la.vp.approve_operating_agreement';
8:
9: G_AGRMNT_APPROVAL_WF CONSTANT VARCHAR2(2) DEFAULT 'WF';

Line 69: x_return_status := OKL_API.G_RET_STS_SUCCESS;

65: SELECT user_name, description
66: FROM fnd_user
67: WHERE user_id = cp_user_id;
68: BEGIN
69: x_return_status := OKL_API.G_RET_STS_SUCCESS;
70: OPEN wf_users_csr(p_user_id);
71: FETCH wf_users_csr INTO x_name, x_description;
72: CLOSE wf_users_csr;
73: IF x_name IS NULL THEN

Line 84: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

80: END IF;
81: END IF;
82: EXCEPTION
83: WHEN OTHERS THEN
84: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
85: END l_get_agent;
86:
87: -- generates unique value for event key
88: FUNCTION get_item_key_wf RETURN NUMBER IS

Line 253: x_return_status := OKL_API.G_RET_STS_SUCCESS;

249: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_VP_OA_WF.RAISE_OA_EVENT_APPROVAL';
250: l_debug_enabled VARCHAR2(10);
251:
252: BEGIN
253: x_return_status := OKL_API.G_RET_STS_SUCCESS;
254:
255: l_debug_enabled := okl_debug_pub.check_log_enabled;
256:
257: IF(l_debug_enabled='Y') THEN

Line 262: x_return_status := OKL_API.START_ACTIVITY(

258: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRXXXB.pls call raise_oa_event_approval');
259: END IF;
260:
261: -- call START_ACTIVITY to create savepoint, check compatibility and initialize message list
262: x_return_status := OKL_API.START_ACTIVITY(
263: p_api_name => l_api_name
264: ,p_pkg_name => G_PKG_NAME
265: ,p_init_msg_list => p_init_msg_list
266: ,l_api_version => l_api_version

Line 271: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

267: ,p_api_version => p_api_version
268: ,p_api_type => g_api_type
269: ,x_return_status => x_return_status);
270: -- check if activity started successfully
271: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
273: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
274: RAISE OKL_API.G_EXCEPTION_ERROR;
275: END IF;

Line 272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

268: ,p_api_type => g_api_type
269: ,x_return_status => x_return_status);
270: -- check if activity started successfully
271: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
273: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
274: RAISE OKL_API.G_EXCEPTION_ERROR;
275: END IF;
276:

Line 273: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

269: ,x_return_status => x_return_status);
270: -- check if activity started successfully
271: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
273: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
274: RAISE OKL_API.G_EXCEPTION_ERROR;
275: END IF;
276:
277: l_get_agent(p_user_id => fnd_global.user_id

Line 274: RAISE OKL_API.G_EXCEPTION_ERROR;

270: -- check if activity started successfully
271: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
272: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
273: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
274: RAISE OKL_API.G_EXCEPTION_ERROR;
275: END IF;
276:
277: l_get_agent(p_user_id => fnd_global.user_id
278: ,x_return_status => x_return_status

Line 297: OKL_API.set_message(p_app_name => G_APP_NAME,

293: -- Get the Application ID
294: OPEN c_get_app_id_csr;
295: FETCH c_get_app_id_csr INTO l_application_id;
296: IF c_get_app_id_csr%NOTFOUND THEN
297: OKL_API.set_message(p_app_name => G_APP_NAME,
298: p_msg_name => G_NO_MATCHING_RECORD,
299: p_token1 => G_COL_NAME_TOKEN,
300: p_token1_value => 'Application id');
301: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 301: RAISE OKL_API.G_EXCEPTION_ERROR;

297: OKL_API.set_message(p_app_name => G_APP_NAME,
298: p_msg_name => G_NO_MATCHING_RECORD,
299: p_token1 => G_COL_NAME_TOKEN,
300: p_token1_value => 'Application id');
301: RAISE OKL_API.G_EXCEPTION_ERROR;
302: END IF;
303: CLOSE c_get_app_id_csr;
304:
305: -- Get the Transaction Type ID

Line 309: OKL_API.set_message(p_app_name => G_APP_NAME,

305: -- Get the Transaction Type ID
306: OPEN c_get_trx_type_csr(G_TRANS_APP_NAME_OA);
307: FETCH c_get_trx_type_csr INTO l_trans_type_id, l_trans_appl_id;
308: IF c_get_trx_type_csr%NOTFOUND THEN
309: OKL_API.set_message(p_app_name => G_APP_NAME,
310: p_msg_name => G_NO_MATCHING_RECORD,
311: p_token1 => G_COL_NAME_TOKEN,
312: p_token1_value => 'AME Transcation TYPE id, Application id');
313: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 313: RAISE OKL_API.G_EXCEPTION_ERROR;

309: OKL_API.set_message(p_app_name => G_APP_NAME,
310: p_msg_name => G_NO_MATCHING_RECORD,
311: p_token1 => G_COL_NAME_TOKEN,
312: p_token1_value => 'AME Transcation TYPE id, Application id');
313: RAISE OKL_API.G_EXCEPTION_ERROR;
314: END IF;
315: CLOSE c_get_trx_type_csr;
316: IF(l_application_id = l_trans_appl_id)THEN
317: wf_event.AddParameterToList(G_WF_ITM_APPLICATION_ID,l_application_id,l_parameter_list);

Line 358: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

354:
355: l_parameter_list.DELETE;
356: END IF;
357:
358: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
359:
360: IF(l_debug_enabled='Y') THEN
361: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRXXXB.pls call raise_oa_event_approval');
362: END IF;

Line 365: WHEN OKL_API.G_EXCEPTION_ERROR THEN

361: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRXXXB.pls call raise_oa_event_approval');
362: END IF;
363:
364: EXCEPTION
365: WHEN OKL_API.G_EXCEPTION_ERROR THEN
366: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
367: p_api_name => l_api_name,
368: p_pkg_name => G_PKG_NAME,
369: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 366: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

362: END IF;
363:
364: EXCEPTION
365: WHEN OKL_API.G_EXCEPTION_ERROR THEN
366: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
367: p_api_name => l_api_name,
368: p_pkg_name => G_PKG_NAME,
369: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
370: x_msg_count => x_msg_count,

Line 369: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

365: WHEN OKL_API.G_EXCEPTION_ERROR THEN
366: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
367: p_api_name => l_api_name,
368: p_pkg_name => G_PKG_NAME,
369: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
370: x_msg_count => x_msg_count,
371: x_msg_data => x_msg_data,
372: p_api_type => g_api_type);
373:

Line 374: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

370: x_msg_count => x_msg_count,
371: x_msg_data => x_msg_data,
372: p_api_type => g_api_type);
373:
374: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
375: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
376: p_api_name => l_api_name,
377: p_pkg_name => G_PKG_NAME,
378: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 375: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

371: x_msg_data => x_msg_data,
372: p_api_type => g_api_type);
373:
374: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
375: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
376: p_api_name => l_api_name,
377: p_pkg_name => G_PKG_NAME,
378: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
379: x_msg_count => x_msg_count,

Line 378: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

374: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
375: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
376: p_api_name => l_api_name,
377: p_pkg_name => G_PKG_NAME,
378: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
379: x_msg_count => x_msg_count,
380: x_msg_data => x_msg_data,
381: p_api_type => g_api_type);
382:

Line 384: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

380: x_msg_data => x_msg_data,
381: p_api_type => g_api_type);
382:
383: WHEN OTHERS THEN
384: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
385: p_api_name => l_api_name,
386: p_pkg_name => G_PKG_NAME,
387: p_exc_name => 'OTHERS',
388: x_msg_count => x_msg_count,

Line 534: ,p_init_msg_list => OKL_API.G_TRUE

530: aname => G_WF_ITM_AGREEMENT_ID);
531:
532: IF(G_WF_ITM_APPROVED_YN_YES = lv_approval_status OR lv_approval_status_ame = 'Y')THEN
533: okl_contract_status_pub.update_contract_status(p_api_version => '1.0'
534: ,p_init_msg_list => OKL_API.G_TRUE
535: ,x_return_status => x_return_status
536: ,x_msg_count => x_msg_count
537: ,x_msg_data => x_msg_data
538: ,p_khr_status => G_ACTIVE_STS_CODE

Line 548: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

544: l_module,
545: 'okl_contract_status_pub.update_contract_status G_ACTIVE_STS_CODE returned with status '||x_return_status||' x_msg_data '||x_msg_data
546: );
547: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
548: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;

Line 549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

545: 'okl_contract_status_pub.update_contract_status G_ACTIVE_STS_CODE returned with status '||x_return_status||' x_msg_data '||x_msg_data
546: );
547: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
548: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
553: ELSIF(G_WF_ITM_APPROVED_YN_NO = lv_approval_status OR lv_approval_status_ame = 'N')THEN

Line 550: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

546: );
547: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
548: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
553: ELSIF(G_WF_ITM_APPROVED_YN_NO = lv_approval_status OR lv_approval_status_ame = 'N')THEN
554: okl_contract_status_pub.update_contract_status(p_api_version => '1.0'

Line 551: RAISE OKL_API.G_EXCEPTION_ERROR;

547: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
548: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
553: ELSIF(G_WF_ITM_APPROVED_YN_NO = lv_approval_status OR lv_approval_status_ame = 'N')THEN
554: okl_contract_status_pub.update_contract_status(p_api_version => '1.0'
555: ,p_init_msg_list => OKL_API.G_TRUE

Line 555: ,p_init_msg_list => OKL_API.G_TRUE

551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
553: ELSIF(G_WF_ITM_APPROVED_YN_NO = lv_approval_status OR lv_approval_status_ame = 'N')THEN
554: okl_contract_status_pub.update_contract_status(p_api_version => '1.0'
555: ,p_init_msg_list => OKL_API.G_TRUE
556: ,x_return_status => x_return_status
557: ,x_msg_count => x_msg_count
558: ,x_msg_data => x_msg_data
559: ,p_khr_status => G_DECLINED_STS_CODE

Line 569: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

565: l_module,
566: 'okl_contract_status_pub.update_contract_status G_DECLINED_STS_CODE returned with status '||x_return_status||' x_msg_data '||x_msg_data
567: );
568: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
569: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
572: RAISE OKL_API.G_EXCEPTION_ERROR;
573: END IF;

Line 570: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

566: 'okl_contract_status_pub.update_contract_status G_DECLINED_STS_CODE returned with status '||x_return_status||' x_msg_data '||x_msg_data
567: );
568: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
569: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
572: RAISE OKL_API.G_EXCEPTION_ERROR;
573: END IF;
574: END IF;

Line 571: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

567: );
568: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
569: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
572: RAISE OKL_API.G_EXCEPTION_ERROR;
573: END IF;
574: END IF;
575:

Line 572: RAISE OKL_API.G_EXCEPTION_ERROR;

568: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
569: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
570: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
571: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
572: RAISE OKL_API.G_EXCEPTION_ERROR;
573: END IF;
574: END IF;
575:
576: resultout := 'COMPLETE:';