DBA Data[Home] [Help]

APPS.OKL_VP_PA_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_pa_wf AS
2: /* $Header: OKLRPAWB.pls 120.1 2006/07/21 13:13:18 akrangan 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_PROGRAM_AGRMNT_EVENT CONSTANT wf_events.name%TYPE DEFAULT 'oracle.apps.okl.la.vp.approve_program_agreement';
8:
9: G_AGRMNT_APPROVAL_WF CONSTANT VARCHAR2(2) DEFAULT 'WF';

Line 72: x_return_status := OKL_API.G_RET_STS_SUCCESS;

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

Line 87: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

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

Line 255: x_return_status := OKL_API.G_RET_STS_SUCCESS;

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

Line 264: x_return_status := OKL_API.START_ACTIVITY(

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

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

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

Line 274: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

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

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

Line 276: RAISE OKL_API.G_EXCEPTION_ERROR;

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

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

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

Line 303: RAISE OKL_API.G_EXCEPTION_ERROR;

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

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

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

Line 315: RAISE OKL_API.G_EXCEPTION_ERROR;

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

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

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

Line 367: WHEN OKL_API.G_EXCEPTION_ERROR THEN

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

Line 368: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

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

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

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

Line 376: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 377: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

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

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

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

Line 386: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

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

Line 535: ,p_init_msg_list => OKL_API.G_TRUE

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

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

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

Line 550: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

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

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

Line 552: RAISE OKL_API.G_EXCEPTION_ERROR;

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

Line 556: ,p_init_msg_list => OKL_API.G_TRUE

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

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

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

Line 571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

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

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

Line 573: RAISE OKL_API.G_EXCEPTION_ERROR;

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