eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_CONTRACT_LINE_ITEM_PVT dependencies on OKC_API

Line 260: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,

256: --Description : Returns Name, Description for a given role or all the roles
257: -- attached to a contract
258: --End of Comments
259: Procedure Validate_Link_Asset (p_api_version IN NUMBER,
260: p_init_msg_list IN VARCHAR2 default OKC_API.G_FALSE,
261: x_return_status OUT NOCOPY VARCHAR2,
262: x_msg_count OUT NOCOPY NUMBER,
263: x_msg_data OUT NOCOPY VARCHAR2,
264: p_chr_id IN NUMBER,

Line 299: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

295: l_id okl_k_lines.id%type;
296:
297: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Link_Asset';
298: l_api_version CONSTANT NUMBER := 1.0;
299: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
300:
301: CURSOR get_item_csr(p_chr_id NUMBER, p_parent_cle_id NUMBER, p_link_ast_id1 VARCHAR2, p_link_ast_id2 VARCHAR2) IS
302: SELECT link_ast.id
303: from okl_k_lines_full_v sub_line, okc_k_items_v link_ast

Line 328: If ( p_chr_id is null or p_chr_id = OKC_API.G_MISS_NUM)

324: If okl_context.get_okc_org_id is null then
325: okl_context.set_okc_org_context(p_chr_id => l_chr_id );
326: End If;
327:
328: If ( p_chr_id is null or p_chr_id = OKC_API.G_MISS_NUM)
329: Then
330: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ElsIf ( p_parent_cle_id is null or p_parent_cle_id = OKC_API.G_MISS_NUM)
332: Then

Line 330: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

326: End If;
327:
328: If ( p_chr_id is null or p_chr_id = OKC_API.G_MISS_NUM)
329: Then
330: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ElsIf ( p_parent_cle_id is null or p_parent_cle_id = OKC_API.G_MISS_NUM)
332: Then
333: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
334: ElsIf ( p_name is null or p_name = OKC_API.G_MISS_CHAR)

Line 331: ElsIf ( p_parent_cle_id is null or p_parent_cle_id = OKC_API.G_MISS_NUM)

327:
328: If ( p_chr_id is null or p_chr_id = OKC_API.G_MISS_NUM)
329: Then
330: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ElsIf ( p_parent_cle_id is null or p_parent_cle_id = OKC_API.G_MISS_NUM)
332: Then
333: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
334: ElsIf ( p_name is null or p_name = OKC_API.G_MISS_CHAR)
335: Then

Line 333: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

329: Then
330: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ElsIf ( p_parent_cle_id is null or p_parent_cle_id = OKC_API.G_MISS_NUM)
332: Then
333: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
334: ElsIf ( p_name is null or p_name = OKC_API.G_MISS_CHAR)
335: Then
336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
337: End If;

Line 334: ElsIf ( p_name is null or p_name = OKC_API.G_MISS_CHAR)

330: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
331: ElsIf ( p_parent_cle_id is null or p_parent_cle_id = OKC_API.G_MISS_NUM)
332: Then
333: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
334: ElsIf ( p_name is null or p_name = OKC_API.G_MISS_CHAR)
335: Then
336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
337: End If;
338:

Line 336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

332: Then
333: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
334: ElsIf ( p_name is null or p_name = OKC_API.G_MISS_CHAR)
335: Then
336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
337: End If;
338:
339: OPEN get_lty_code_csr(p_chr_id => p_chr_id,
340: p_cle_id => p_parent_cle_id );

Line 346: x_return_status := OKC_API.g_ret_sts_error;

342: FETCH get_lty_code_csr INTO l_lty_code;
343:
344: If get_lty_code_csr%NotFound Then
345:
346: x_return_status := OKC_API.g_ret_sts_error;
347: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
348: raise OKC_API.G_EXCEPTION_ERROR;
349:
350: End If;

Line 347: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

343:
344: If get_lty_code_csr%NotFound Then
345:
346: x_return_status := OKC_API.g_ret_sts_error;
347: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
348: raise OKC_API.G_EXCEPTION_ERROR;
349:
350: End If;
351:

Line 348: raise OKC_API.G_EXCEPTION_ERROR;

344: If get_lty_code_csr%NotFound Then
345:
346: x_return_status := OKC_API.g_ret_sts_error;
347: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
348: raise OKC_API.G_EXCEPTION_ERROR;
349:
350: End If;
351:
352: CLOSE get_lty_code_csr;

Line 373: x_return_status := OKC_API.g_ret_sts_error;

369:
370: FETCH okl_strmtyp_csr into l_id1,l_id2,l_name,l_description;
371:
372: If okl_strmtyp_csr%NotFound Then
373: x_return_status := OKC_API.g_ret_sts_error;
374: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
375: raise OKC_API.G_EXCEPTION_ERROR;
376: End If;
377:

Line 374: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

370: FETCH okl_strmtyp_csr into l_id1,l_id2,l_name,l_description;
371:
372: If okl_strmtyp_csr%NotFound Then
373: x_return_status := OKC_API.g_ret_sts_error;
374: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
375: raise OKC_API.G_EXCEPTION_ERROR;
376: End If;
377:
378: l_id11 := l_id1;

Line 375: raise OKC_API.G_EXCEPTION_ERROR;

371:
372: If okl_strmtyp_csr%NotFound Then
373: x_return_status := OKC_API.g_ret_sts_error;
374: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
375: raise OKC_API.G_EXCEPTION_ERROR;
376: End If;
377:
378: l_id11 := l_id1;
379: l_id22 := l_id2;

Line 384: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then

380:
381: FETCH okl_strmtyp_csr into l_id1,l_id2,l_name,l_description;
382: If okl_strmtyp_csr%Found Then
383:
384: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
385: x_return_status := OKC_API.g_ret_sts_error;
386: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
387: raise OKC_API.G_EXCEPTION_ERROR;
388: End If;

Line 385: x_return_status := OKC_API.g_ret_sts_error;

381: FETCH okl_strmtyp_csr into l_id1,l_id2,l_name,l_description;
382: If okl_strmtyp_csr%Found Then
383:
384: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
385: x_return_status := OKC_API.g_ret_sts_error;
386: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
387: raise OKC_API.G_EXCEPTION_ERROR;
388: End If;
389:

Line 386: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

382: If okl_strmtyp_csr%Found Then
383:
384: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
385: x_return_status := OKC_API.g_ret_sts_error;
386: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
387: raise OKC_API.G_EXCEPTION_ERROR;
388: End If;
389:
390: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

Line 387: raise OKC_API.G_EXCEPTION_ERROR;

383:
384: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
385: x_return_status := OKC_API.g_ret_sts_error;
386: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
387: raise OKC_API.G_EXCEPTION_ERROR;
388: End If;
389:
390: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
391: x_return_status := OKC_API.g_ret_sts_error;

Line 390: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

386: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
387: raise OKC_API.G_EXCEPTION_ERROR;
388: End If;
389:
390: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
391: x_return_status := OKC_API.g_ret_sts_error;
392: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
393: raise OKC_API.G_EXCEPTION_ERROR;
394: End If;

Line 391: x_return_status := OKC_API.g_ret_sts_error;

387: raise OKC_API.G_EXCEPTION_ERROR;
388: End If;
389:
390: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
391: x_return_status := OKC_API.g_ret_sts_error;
392: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
393: raise OKC_API.G_EXCEPTION_ERROR;
394: End If;
395:

Line 392: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

388: End If;
389:
390: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
391: x_return_status := OKC_API.g_ret_sts_error;
392: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
393: raise OKC_API.G_EXCEPTION_ERROR;
394: End If;
395:
396: Loop

Line 393: raise OKC_API.G_EXCEPTION_ERROR;

389:
390: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
391: x_return_status := OKC_API.g_ret_sts_error;
392: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
393: raise OKC_API.G_EXCEPTION_ERROR;
394: End If;
395:
396: Loop
397: If(l_id1 = p_id1 and l_id2 = p_id2) Then

Line 408: x_return_status := OKC_API.g_ret_sts_error;

404: Exit When okl_strmtyp_csr%NotFound;
405: End Loop;
406:
407: If row_count <> 1 Then
408: x_return_status := OKC_API.g_ret_sts_error;
409: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
410: raise OKC_API.G_EXCEPTION_ERROR;
411: End If;
412:

Line 409: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset

405: End Loop;
406:
407: If row_count <> 1 Then
408: x_return_status := OKC_API.g_ret_sts_error;
409: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
410: raise OKC_API.G_EXCEPTION_ERROR;
411: End If;
412:
413: End If;

Line 410: raise OKC_API.G_EXCEPTION_ERROR;

406:
407: If row_count <> 1 Then
408: x_return_status := OKC_API.g_ret_sts_error;
409: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
410: raise OKC_API.G_EXCEPTION_ERROR;
411: End If;
412:
413: End If;
414:

Line 440: x_return_status := OKC_API.g_ret_sts_error;

436:
437: FETCH okl_usage_csr into l_id1,l_id2,l_name,l_description;
438:
439: If okl_usage_csr%NotFound Then
440: x_return_status := OKC_API.g_ret_sts_error;
441: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
442: raise OKC_API.G_EXCEPTION_ERROR;
443: End If;
444:

Line 441: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

437: FETCH okl_usage_csr into l_id1,l_id2,l_name,l_description;
438:
439: If okl_usage_csr%NotFound Then
440: x_return_status := OKC_API.g_ret_sts_error;
441: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
442: raise OKC_API.G_EXCEPTION_ERROR;
443: End If;
444:
445: l_id11 := l_id1;

Line 442: raise OKC_API.G_EXCEPTION_ERROR;

438:
439: If okl_usage_csr%NotFound Then
440: x_return_status := OKC_API.g_ret_sts_error;
441: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
442: raise OKC_API.G_EXCEPTION_ERROR;
443: End If;
444:
445: l_id11 := l_id1;
446: l_id22 := l_id2;

Line 451: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then

447:
448: FETCH okl_usage_csr into l_id1,l_id2,l_name,l_description;
449: If okl_usage_csr%Found Then
450:
451: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
452: x_return_status := OKC_API.g_ret_sts_error;
453: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
454: raise OKC_API.G_EXCEPTION_ERROR;
455: End If;

Line 452: x_return_status := OKC_API.g_ret_sts_error;

448: FETCH okl_usage_csr into l_id1,l_id2,l_name,l_description;
449: If okl_usage_csr%Found Then
450:
451: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
452: x_return_status := OKC_API.g_ret_sts_error;
453: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
454: raise OKC_API.G_EXCEPTION_ERROR;
455: End If;
456:

Line 453: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

449: If okl_usage_csr%Found Then
450:
451: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
452: x_return_status := OKC_API.g_ret_sts_error;
453: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
454: raise OKC_API.G_EXCEPTION_ERROR;
455: End If;
456:
457: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

Line 454: raise OKC_API.G_EXCEPTION_ERROR;

450:
451: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
452: x_return_status := OKC_API.g_ret_sts_error;
453: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
454: raise OKC_API.G_EXCEPTION_ERROR;
455: End If;
456:
457: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
458: x_return_status := OKC_API.g_ret_sts_error;

Line 457: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

453: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
454: raise OKC_API.G_EXCEPTION_ERROR;
455: End If;
456:
457: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
458: x_return_status := OKC_API.g_ret_sts_error;
459: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
460: raise OKC_API.G_EXCEPTION_ERROR;
461: End If;

Line 458: x_return_status := OKC_API.g_ret_sts_error;

454: raise OKC_API.G_EXCEPTION_ERROR;
455: End If;
456:
457: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
458: x_return_status := OKC_API.g_ret_sts_error;
459: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
460: raise OKC_API.G_EXCEPTION_ERROR;
461: End If;
462:

Line 459: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

455: End If;
456:
457: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
458: x_return_status := OKC_API.g_ret_sts_error;
459: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
460: raise OKC_API.G_EXCEPTION_ERROR;
461: End If;
462:
463: Loop

Line 460: raise OKC_API.G_EXCEPTION_ERROR;

456:
457: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
458: x_return_status := OKC_API.g_ret_sts_error;
459: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
460: raise OKC_API.G_EXCEPTION_ERROR;
461: End If;
462:
463: Loop
464: If(l_id1 = p_id1 and l_id2 = p_id2) Then

Line 475: x_return_status := OKC_API.g_ret_sts_error;

471: Exit When okl_usage_csr%NotFound;
472: End Loop;
473:
474: If row_count <> 1 Then
475: x_return_status := OKC_API.g_ret_sts_error;
476: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
477: raise OKC_API.G_EXCEPTION_ERROR;
478: End If;
479:

Line 476: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset

472: End Loop;
473:
474: If row_count <> 1 Then
475: x_return_status := OKC_API.g_ret_sts_error;
476: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
477: raise OKC_API.G_EXCEPTION_ERROR;
478: End If;
479:
480: End If;

Line 477: raise OKC_API.G_EXCEPTION_ERROR;

473:
474: If row_count <> 1 Then
475: x_return_status := OKC_API.g_ret_sts_error;
476: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
477: raise OKC_API.G_EXCEPTION_ERROR;
478: End If;
479:
480: End If;
481:

Line 505: x_return_status := OKC_API.g_ret_sts_error;

501:
502: FETCH okx_asset_csr into l_id1,l_id2,l_name,l_description;
503:
504: If okx_asset_csr%NotFound Then
505: x_return_status := OKC_API.g_ret_sts_error;
506: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
507: raise OKC_API.G_EXCEPTION_ERROR;
508: End If;
509:

Line 506: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

502: FETCH okx_asset_csr into l_id1,l_id2,l_name,l_description;
503:
504: If okx_asset_csr%NotFound Then
505: x_return_status := OKC_API.g_ret_sts_error;
506: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
507: raise OKC_API.G_EXCEPTION_ERROR;
508: End If;
509:
510: l_id11 := l_id1;

Line 507: raise OKC_API.G_EXCEPTION_ERROR;

503:
504: If okx_asset_csr%NotFound Then
505: x_return_status := OKC_API.g_ret_sts_error;
506: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
507: raise OKC_API.G_EXCEPTION_ERROR;
508: End If;
509:
510: l_id11 := l_id1;
511: l_id22 := l_id2;

Line 516: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then

512:
513: FETCH okx_asset_csr into l_id1,l_id2,l_name,l_description;
514: If okx_asset_csr%Found Then
515:
516: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
517: x_return_status := OKC_API.g_ret_sts_error;
518: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
519: raise OKC_API.G_EXCEPTION_ERROR;
520: End If;

Line 517: x_return_status := OKC_API.g_ret_sts_error;

513: FETCH okx_asset_csr into l_id1,l_id2,l_name,l_description;
514: If okx_asset_csr%Found Then
515:
516: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
517: x_return_status := OKC_API.g_ret_sts_error;
518: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
519: raise OKC_API.G_EXCEPTION_ERROR;
520: End If;
521:

Line 518: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

514: If okx_asset_csr%Found Then
515:
516: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
517: x_return_status := OKC_API.g_ret_sts_error;
518: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
519: raise OKC_API.G_EXCEPTION_ERROR;
520: End If;
521:
522: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

Line 519: raise OKC_API.G_EXCEPTION_ERROR;

515:
516: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
517: x_return_status := OKC_API.g_ret_sts_error;
518: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
519: raise OKC_API.G_EXCEPTION_ERROR;
520: End If;
521:
522: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
523: x_return_status := OKC_API.g_ret_sts_error;

Line 522: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

518: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
519: raise OKC_API.G_EXCEPTION_ERROR;
520: End If;
521:
522: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
523: x_return_status := OKC_API.g_ret_sts_error;
524: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
525: raise OKC_API.G_EXCEPTION_ERROR;
526: End If;

Line 523: x_return_status := OKC_API.g_ret_sts_error;

519: raise OKC_API.G_EXCEPTION_ERROR;
520: End If;
521:
522: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
523: x_return_status := OKC_API.g_ret_sts_error;
524: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
525: raise OKC_API.G_EXCEPTION_ERROR;
526: End If;
527:

Line 524: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

520: End If;
521:
522: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
523: x_return_status := OKC_API.g_ret_sts_error;
524: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
525: raise OKC_API.G_EXCEPTION_ERROR;
526: End If;
527:
528: Loop

Line 525: raise OKC_API.G_EXCEPTION_ERROR;

521:
522: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
523: x_return_status := OKC_API.g_ret_sts_error;
524: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
525: raise OKC_API.G_EXCEPTION_ERROR;
526: End If;
527:
528: Loop
529: If(l_id1 = p_id1 and l_id2 = p_id2) Then

Line 540: x_return_status := OKC_API.g_ret_sts_error;

536: Exit When okx_asset_csr%NotFound;
537: End Loop;
538:
539: If row_count <> 1 Then
540: x_return_status := OKC_API.g_ret_sts_error;
541: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
542: raise OKC_API.G_EXCEPTION_ERROR;
543: End If;
544:

Line 541: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset

537: End Loop;
538:
539: If row_count <> 1 Then
540: x_return_status := OKC_API.g_ret_sts_error;
541: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
542: raise OKC_API.G_EXCEPTION_ERROR;
543: End If;
544:
545: End If;

Line 542: raise OKC_API.G_EXCEPTION_ERROR;

538:
539: If row_count <> 1 Then
540: x_return_status := OKC_API.g_ret_sts_error;
541: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
542: raise OKC_API.G_EXCEPTION_ERROR;
543: End If;
544:
545: End If;
546:

Line 573: x_return_status := OKC_API.g_ret_sts_error;

569:
570: FETCH okx_covasst_csr into l_id1,l_id2,l_name,l_description;
571:
572: If okx_covasst_csr%NotFound Then
573: x_return_status := OKC_API.g_ret_sts_error;
574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
575: raise OKC_API.G_EXCEPTION_ERROR;
576: End If;
577:

Line 574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

570: FETCH okx_covasst_csr into l_id1,l_id2,l_name,l_description;
571:
572: If okx_covasst_csr%NotFound Then
573: x_return_status := OKC_API.g_ret_sts_error;
574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
575: raise OKC_API.G_EXCEPTION_ERROR;
576: End If;
577:
578: l_id11 := l_id1;

Line 575: raise OKC_API.G_EXCEPTION_ERROR;

571:
572: If okx_covasst_csr%NotFound Then
573: x_return_status := OKC_API.g_ret_sts_error;
574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
575: raise OKC_API.G_EXCEPTION_ERROR;
576: End If;
577:
578: l_id11 := l_id1;
579: l_id22 := l_id2;

Line 584: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then

580:
581: FETCH okx_covasst_csr into l_id1,l_id2,l_name,l_description;
582: If okx_covasst_csr%Found Then
583:
584: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
585: x_return_status := OKC_API.g_ret_sts_error;
586: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
587: raise OKC_API.G_EXCEPTION_ERROR;
588: End If;

Line 585: x_return_status := OKC_API.g_ret_sts_error;

581: FETCH okx_covasst_csr into l_id1,l_id2,l_name,l_description;
582: If okx_covasst_csr%Found Then
583:
584: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
585: x_return_status := OKC_API.g_ret_sts_error;
586: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
587: raise OKC_API.G_EXCEPTION_ERROR;
588: End If;
589:

Line 586: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

582: If okx_covasst_csr%Found Then
583:
584: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
585: x_return_status := OKC_API.g_ret_sts_error;
586: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
587: raise OKC_API.G_EXCEPTION_ERROR;
588: End If;
589:
590: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

Line 587: raise OKC_API.G_EXCEPTION_ERROR;

583:
584: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
585: x_return_status := OKC_API.g_ret_sts_error;
586: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
587: raise OKC_API.G_EXCEPTION_ERROR;
588: End If;
589:
590: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
591: x_return_status := OKC_API.g_ret_sts_error;

Line 590: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

586: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
587: raise OKC_API.G_EXCEPTION_ERROR;
588: End If;
589:
590: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
591: x_return_status := OKC_API.g_ret_sts_error;
592: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
593: raise OKC_API.G_EXCEPTION_ERROR;
594: End If;

Line 591: x_return_status := OKC_API.g_ret_sts_error;

587: raise OKC_API.G_EXCEPTION_ERROR;
588: End If;
589:
590: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
591: x_return_status := OKC_API.g_ret_sts_error;
592: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
593: raise OKC_API.G_EXCEPTION_ERROR;
594: End If;
595:

Line 592: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

588: End If;
589:
590: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
591: x_return_status := OKC_API.g_ret_sts_error;
592: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
593: raise OKC_API.G_EXCEPTION_ERROR;
594: End If;
595:
596: Loop

Line 593: raise OKC_API.G_EXCEPTION_ERROR;

589:
590: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
591: x_return_status := OKC_API.g_ret_sts_error;
592: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
593: raise OKC_API.G_EXCEPTION_ERROR;
594: End If;
595:
596: Loop
597: If(l_id1 = p_id1 and l_id2 = p_id2) Then

Line 608: x_return_status := OKC_API.g_ret_sts_error;

604: Exit When okx_covasst_csr%NotFound;
605: End Loop;
606:
607: If row_count <> 1 Then
608: x_return_status := OKC_API.g_ret_sts_error;
609: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
610: raise OKC_API.G_EXCEPTION_ERROR;
611: End If;
612:

Line 609: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset

605: End Loop;
606:
607: If row_count <> 1 Then
608: x_return_status := OKC_API.g_ret_sts_error;
609: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
610: raise OKC_API.G_EXCEPTION_ERROR;
611: End If;
612:
613: End If;

Line 610: raise OKC_API.G_EXCEPTION_ERROR;

606:
607: If row_count <> 1 Then
608: x_return_status := OKC_API.g_ret_sts_error;
609: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
610: raise OKC_API.G_EXCEPTION_ERROR;
611: End If;
612:
613: End If;
614:

Line 638: x_return_status := OKC_API.g_ret_sts_error;

634:
635: FETCH okx_ib_item_csr into l_id1,l_id2,l_name,l_description;
636:
637: If okx_ib_item_csr%NotFound Then
638: x_return_status := OKC_API.g_ret_sts_error;
639: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
640: raise OKC_API.G_EXCEPTION_ERROR;
641: End If;
642:

Line 639: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

635: FETCH okx_ib_item_csr into l_id1,l_id2,l_name,l_description;
636:
637: If okx_ib_item_csr%NotFound Then
638: x_return_status := OKC_API.g_ret_sts_error;
639: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
640: raise OKC_API.G_EXCEPTION_ERROR;
641: End If;
642:
643: l_id11 := l_id1;

Line 640: raise OKC_API.G_EXCEPTION_ERROR;

636:
637: If okx_ib_item_csr%NotFound Then
638: x_return_status := OKC_API.g_ret_sts_error;
639: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
640: raise OKC_API.G_EXCEPTION_ERROR;
641: End If;
642:
643: l_id11 := l_id1;
644: l_id22 := l_id2;

Line 649: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then

645:
646: FETCH okx_ib_item_csr into l_id1,l_id2,l_name,l_description;
647: If okx_ib_item_csr%Found Then
648:
649: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
650: x_return_status := OKC_API.g_ret_sts_error;
651: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
652: raise OKC_API.G_EXCEPTION_ERROR;
653: End If;

Line 650: x_return_status := OKC_API.g_ret_sts_error;

646: FETCH okx_ib_item_csr into l_id1,l_id2,l_name,l_description;
647: If okx_ib_item_csr%Found Then
648:
649: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
650: x_return_status := OKC_API.g_ret_sts_error;
651: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
652: raise OKC_API.G_EXCEPTION_ERROR;
653: End If;
654:

Line 651: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

647: If okx_ib_item_csr%Found Then
648:
649: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
650: x_return_status := OKC_API.g_ret_sts_error;
651: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
652: raise OKC_API.G_EXCEPTION_ERROR;
653: End If;
654:
655: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

Line 652: raise OKC_API.G_EXCEPTION_ERROR;

648:
649: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
650: x_return_status := OKC_API.g_ret_sts_error;
651: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
652: raise OKC_API.G_EXCEPTION_ERROR;
653: End If;
654:
655: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
656: x_return_status := OKC_API.g_ret_sts_error;

Line 655: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

651: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
652: raise OKC_API.G_EXCEPTION_ERROR;
653: End If;
654:
655: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
656: x_return_status := OKC_API.g_ret_sts_error;
657: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
658: raise OKC_API.G_EXCEPTION_ERROR;
659: End If;

Line 656: x_return_status := OKC_API.g_ret_sts_error;

652: raise OKC_API.G_EXCEPTION_ERROR;
653: End If;
654:
655: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
656: x_return_status := OKC_API.g_ret_sts_error;
657: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
658: raise OKC_API.G_EXCEPTION_ERROR;
659: End If;
660:

Line 657: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

653: End If;
654:
655: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
656: x_return_status := OKC_API.g_ret_sts_error;
657: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
658: raise OKC_API.G_EXCEPTION_ERROR;
659: End If;
660:
661: Loop

Line 658: raise OKC_API.G_EXCEPTION_ERROR;

654:
655: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
656: x_return_status := OKC_API.g_ret_sts_error;
657: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
658: raise OKC_API.G_EXCEPTION_ERROR;
659: End If;
660:
661: Loop
662: If(l_id1 = p_id1 and l_id2 = p_id2) Then

Line 673: x_return_status := OKC_API.g_ret_sts_error;

669: Exit When okx_ib_item_csr%NotFound;
670: End Loop;
671:
672: If row_count <> 1 Then
673: x_return_status := OKC_API.g_ret_sts_error;
674: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
675: raise OKC_API.G_EXCEPTION_ERROR;
676: End If;
677:

Line 674: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset

670: End Loop;
671:
672: If row_count <> 1 Then
673: x_return_status := OKC_API.g_ret_sts_error;
674: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
675: raise OKC_API.G_EXCEPTION_ERROR;
676: End If;
677:
678: End If;

Line 675: raise OKC_API.G_EXCEPTION_ERROR;

671:
672: If row_count <> 1 Then
673: x_return_status := OKC_API.g_ret_sts_error;
674: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
675: raise OKC_API.G_EXCEPTION_ERROR;
676: End If;
677:
678: End If;
679:

Line 710: x_return_status := OKC_API.g_ret_sts_error;

706:
707: FETCH okx_service_csr into l_id1,l_id2,l_name,l_description;
708:
709: If okx_service_csr%NotFound Then
710: x_return_status := OKC_API.g_ret_sts_error;
711: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
712: raise OKC_API.G_EXCEPTION_ERROR;
713: End If;
714:

Line 711: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

707: FETCH okx_service_csr into l_id1,l_id2,l_name,l_description;
708:
709: If okx_service_csr%NotFound Then
710: x_return_status := OKC_API.g_ret_sts_error;
711: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
712: raise OKC_API.G_EXCEPTION_ERROR;
713: End If;
714:
715: l_id11 := l_id1;

Line 712: raise OKC_API.G_EXCEPTION_ERROR;

708:
709: If okx_service_csr%NotFound Then
710: x_return_status := OKC_API.g_ret_sts_error;
711: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
712: raise OKC_API.G_EXCEPTION_ERROR;
713: End If;
714:
715: l_id11 := l_id1;
716: l_id22 := l_id2;

Line 721: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then

717:
718: FETCH okx_service_csr into l_id1,l_id2,l_name,l_description;
719: If okx_service_csr%Found Then
720:
721: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
722: x_return_status := OKC_API.g_ret_sts_error;
723: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;

Line 722: x_return_status := OKC_API.g_ret_sts_error;

718: FETCH okx_service_csr into l_id1,l_id2,l_name,l_description;
719: If okx_service_csr%Found Then
720:
721: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
722: x_return_status := OKC_API.g_ret_sts_error;
723: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:

Line 723: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

719: If okx_service_csr%Found Then
720:
721: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
722: x_return_status := OKC_API.g_ret_sts_error;
723: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:
727: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

Line 724: raise OKC_API.G_EXCEPTION_ERROR;

720:
721: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
722: x_return_status := OKC_API.g_ret_sts_error;
723: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:
727: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
728: x_return_status := OKC_API.g_ret_sts_error;

Line 727: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

723: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:
727: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
728: x_return_status := OKC_API.g_ret_sts_error;
729: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
730: raise OKC_API.G_EXCEPTION_ERROR;
731: End If;

Line 728: x_return_status := OKC_API.g_ret_sts_error;

724: raise OKC_API.G_EXCEPTION_ERROR;
725: End If;
726:
727: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
728: x_return_status := OKC_API.g_ret_sts_error;
729: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
730: raise OKC_API.G_EXCEPTION_ERROR;
731: End If;
732:

Line 729: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

725: End If;
726:
727: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
728: x_return_status := OKC_API.g_ret_sts_error;
729: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
730: raise OKC_API.G_EXCEPTION_ERROR;
731: End If;
732:
733: Loop

Line 730: raise OKC_API.G_EXCEPTION_ERROR;

726:
727: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
728: x_return_status := OKC_API.g_ret_sts_error;
729: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
730: raise OKC_API.G_EXCEPTION_ERROR;
731: End If;
732:
733: Loop
734: If(l_id1 = p_id1 and l_id2 = p_id2) Then

Line 745: x_return_status := OKC_API.g_ret_sts_error;

741: Exit When okx_service_csr%NotFound;
742: End Loop;
743:
744: If row_count <> 1 Then
745: x_return_status := OKC_API.g_ret_sts_error;
746: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
747: raise OKC_API.G_EXCEPTION_ERROR;
748: End If;
749:

Line 746: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset

742: End Loop;
743:
744: If row_count <> 1 Then
745: x_return_status := OKC_API.g_ret_sts_error;
746: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
747: raise OKC_API.G_EXCEPTION_ERROR;
748: End If;
749:
750: End If;

Line 747: raise OKC_API.G_EXCEPTION_ERROR;

743:
744: If row_count <> 1 Then
745: x_return_status := OKC_API.g_ret_sts_error;
746: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
747: raise OKC_API.G_EXCEPTION_ERROR;
748: End If;
749:
750: End If;
751:

Line 775: x_return_status := OKC_API.g_ret_sts_error;

771:
772: FETCH okx_sysitem_csr into l_id1,l_id2,l_name,l_description;
773:
774: If okx_sysitem_csr%NotFound Then
775: x_return_status := OKC_API.g_ret_sts_error;
776: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
777: raise OKC_API.G_EXCEPTION_ERROR;
778: End If;
779:

Line 776: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

772: FETCH okx_sysitem_csr into l_id1,l_id2,l_name,l_description;
773:
774: If okx_sysitem_csr%NotFound Then
775: x_return_status := OKC_API.g_ret_sts_error;
776: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
777: raise OKC_API.G_EXCEPTION_ERROR;
778: End If;
779:
780: l_id11 := l_id1;

Line 777: raise OKC_API.G_EXCEPTION_ERROR;

773:
774: If okx_sysitem_csr%NotFound Then
775: x_return_status := OKC_API.g_ret_sts_error;
776: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
777: raise OKC_API.G_EXCEPTION_ERROR;
778: End If;
779:
780: l_id11 := l_id1;
781: l_id22 := l_id2;

Line 786: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then

782:
783: FETCH okx_sysitem_csr into l_id1,l_id2,l_name,l_description;
784: If okx_sysitem_csr%Found Then
785:
786: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
787: x_return_status := OKC_API.g_ret_sts_error;
788: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
789: raise OKC_API.G_EXCEPTION_ERROR;
790: End If;

Line 787: x_return_status := OKC_API.g_ret_sts_error;

783: FETCH okx_sysitem_csr into l_id1,l_id2,l_name,l_description;
784: If okx_sysitem_csr%Found Then
785:
786: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
787: x_return_status := OKC_API.g_ret_sts_error;
788: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
789: raise OKC_API.G_EXCEPTION_ERROR;
790: End If;
791:

Line 788: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

784: If okx_sysitem_csr%Found Then
785:
786: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
787: x_return_status := OKC_API.g_ret_sts_error;
788: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
789: raise OKC_API.G_EXCEPTION_ERROR;
790: End If;
791:
792: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

Line 789: raise OKC_API.G_EXCEPTION_ERROR;

785:
786: If( p_id1 is null or p_id1 = OKC_API.G_MISS_CHAR) then
787: x_return_status := OKC_API.g_ret_sts_error;
788: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
789: raise OKC_API.G_EXCEPTION_ERROR;
790: End If;
791:
792: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
793: x_return_status := OKC_API.g_ret_sts_error;

Line 792: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then

788: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
789: raise OKC_API.G_EXCEPTION_ERROR;
790: End If;
791:
792: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
793: x_return_status := OKC_API.g_ret_sts_error;
794: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
795: raise OKC_API.G_EXCEPTION_ERROR;
796: End If;

Line 793: x_return_status := OKC_API.g_ret_sts_error;

789: raise OKC_API.G_EXCEPTION_ERROR;
790: End If;
791:
792: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
793: x_return_status := OKC_API.g_ret_sts_error;
794: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
795: raise OKC_API.G_EXCEPTION_ERROR;
796: End If;
797:

Line 794: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov

790: End If;
791:
792: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
793: x_return_status := OKC_API.g_ret_sts_error;
794: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
795: raise OKC_API.G_EXCEPTION_ERROR;
796: End If;
797:
798: Loop

Line 795: raise OKC_API.G_EXCEPTION_ERROR;

791:
792: If( p_id2 is null or p_id2 = OKC_API.G_MISS_CHAR) then
793: x_return_status := OKC_API.g_ret_sts_error;
794: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset from lov
795: raise OKC_API.G_EXCEPTION_ERROR;
796: End If;
797:
798: Loop
799: If(l_id1 = p_id1 and l_id2 = p_id2) Then

Line 810: x_return_status := OKC_API.g_ret_sts_error;

806: Exit When okx_sysitem_csr%NotFound;
807: End Loop;
808:
809: If row_count <> 1 Then
810: x_return_status := OKC_API.g_ret_sts_error;
811: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
812: raise OKC_API.G_EXCEPTION_ERROR;
813: End If;
814:

Line 811: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset

807: End Loop;
808:
809: If row_count <> 1 Then
810: x_return_status := OKC_API.g_ret_sts_error;
811: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
812: raise OKC_API.G_EXCEPTION_ERROR;
813: End If;
814:
815: End If;

Line 812: raise OKC_API.G_EXCEPTION_ERROR;

808:
809: If row_count <> 1 Then
810: x_return_status := OKC_API.g_ret_sts_error;
811: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED'); -- duplicate values found; pl. select an asset
812: raise OKC_API.G_EXCEPTION_ERROR;
813: End If;
814:
815: End If;
816:

Line 830: x_return_status := OKC_API.g_ret_sts_error;

826: Fetch get_item_csr into l_id;
827:
828: If get_item_csr%Found Then
829: Close get_item_csr;
830: x_return_status := OKC_API.g_ret_sts_error;
831: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_NUMBER'); -- duplicate values found; pl. select an asset
832: raise OKC_API.G_EXCEPTION_ERROR;
833: End If;
834:

Line 831: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_NUMBER'); -- duplicate values found; pl. select an asset

827:
828: If get_item_csr%Found Then
829: Close get_item_csr;
830: x_return_status := OKC_API.g_ret_sts_error;
831: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_NUMBER'); -- duplicate values found; pl. select an asset
832: raise OKC_API.G_EXCEPTION_ERROR;
833: End If;
834:
835: Close get_item_csr;

Line 832: raise OKC_API.G_EXCEPTION_ERROR;

828: If get_item_csr%Found Then
829: Close get_item_csr;
830: x_return_status := OKC_API.g_ret_sts_error;
831: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_NUMBER'); -- duplicate values found; pl. select an asset
832: raise OKC_API.G_EXCEPTION_ERROR;
833: End If;
834:
835: Close get_item_csr;
836:

Line 837: x_return_status := OKC_API.G_RET_STS_SUCCESS;

833: End If;
834:
835: Close get_item_csr;
836:
837: x_return_status := OKC_API.G_RET_STS_SUCCESS;
838:
839:
840: EXCEPTION
841: when OKC_API.G_EXCEPTION_ERROR then

Line 841: when OKC_API.G_EXCEPTION_ERROR then

837: x_return_status := OKC_API.G_RET_STS_SUCCESS;
838:
839:
840: EXCEPTION
841: when OKC_API.G_EXCEPTION_ERROR then
842: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
843: p_api_name => l_api_name,
844: p_pkg_name => g_pkg_name,
845: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 842: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

838:
839:
840: EXCEPTION
841: when OKC_API.G_EXCEPTION_ERROR then
842: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
843: p_api_name => l_api_name,
844: p_pkg_name => g_pkg_name,
845: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
846: x_msg_count => x_msg_count,

Line 845: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

841: when OKC_API.G_EXCEPTION_ERROR then
842: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
843: p_api_name => l_api_name,
844: p_pkg_name => g_pkg_name,
845: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
846: x_msg_count => x_msg_count,
847: x_msg_data => x_msg_data,
848: p_api_type => g_api_type);
849:

Line 878: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

874: IF okx_sysitem_csr%ISOPEN THEN
875: CLOSE okx_sysitem_csr;
876: END IF;
877:
878: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
879: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
880: p_api_name => l_api_name,
881: p_pkg_name => g_pkg_name,
882: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 879: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

875: CLOSE okx_sysitem_csr;
876: END IF;
877:
878: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
879: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
880: p_api_name => l_api_name,
881: p_pkg_name => g_pkg_name,
882: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
883: x_msg_count => x_msg_count,

Line 882: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

878: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
879: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
880: p_api_name => l_api_name,
881: p_pkg_name => g_pkg_name,
882: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
883: x_msg_count => x_msg_count,
884: x_msg_data => x_msg_data,
885: p_api_type => g_api_type);
886:

Line 916: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

912: CLOSE okx_sysitem_csr;
913: END IF;
914:
915: when OTHERS then
916: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
917: p_api_name => l_api_name,
918: p_pkg_name => g_pkg_name,
919: p_exc_name => 'OTHERS',
920: x_msg_count => x_msg_count,

Line 955: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

951: End Validate_Link_Asset;
952:
953: PROCEDURE delete_contract_line_item(
954: p_api_version IN NUMBER,
955: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
956: x_return_status OUT NOCOPY VARCHAR2,
957: x_msg_count OUT NOCOPY NUMBER,
958: x_msg_data OUT NOCOPY VARCHAR2,
959: p_line_item_tbl IN line_item_tbl_type

Line 964: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

960: ) IS
961:
962: l_api_name CONSTANT VARCHAR2(30) := 'delete_contract_line_item';
963: l_api_version CONSTANT NUMBER := 1.0;
964: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
965: i NUMBER;
966: l_chr_id NUMBER;
967:
968: lp_clev_tbl OKL_OKC_MIGRATION_PVT.clev_tbl_type;

Line 978: x_return_status := OKC_API.START_ACTIVITY(

974: lx_klev_tbl OKL_KLE_PVT.klev_tbl_type;
975:
976: BEGIN
977:
978: x_return_status := OKC_API.START_ACTIVITY(
979: p_api_name => l_api_name,
980: p_pkg_name => g_pkg_name,
981: p_init_msg_list => p_init_msg_list,
982: l_api_version => l_api_version,

Line 988: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

984: p_api_type => g_api_type,
985: x_return_status => x_return_status);
986:
987: -- check if activity started successfully
988: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
991: raise OKC_API.G_EXCEPTION_ERROR;
992: End If;

Line 989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

985: x_return_status => x_return_status);
986:
987: -- check if activity started successfully
988: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
991: raise OKC_API.G_EXCEPTION_ERROR;
992: End If;
993:

Line 990: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

986:
987: -- check if activity started successfully
988: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
991: raise OKC_API.G_EXCEPTION_ERROR;
992: End If;
993:
994: If (p_line_item_tbl.COUNT > 0) Then

Line 991: raise OKC_API.G_EXCEPTION_ERROR;

987: -- check if activity started successfully
988: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
989: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
991: raise OKC_API.G_EXCEPTION_ERROR;
992: End If;
993:
994: If (p_line_item_tbl.COUNT > 0) Then
995:

Line 1047: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1043: p_clev_tbl => lp_clev_tbl,
1044: p_klev_tbl => lp_klev_tbl,
1045: p_cimv_tbl => lp_cimv_tbl);
1046:
1047: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1048: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1050: raise OKC_API.G_EXCEPTION_ERROR;
1051: End If;

Line 1048: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1044: p_klev_tbl => lp_klev_tbl,
1045: p_cimv_tbl => lp_cimv_tbl);
1046:
1047: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1048: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1050: raise OKC_API.G_EXCEPTION_ERROR;
1051: End If;
1052:

Line 1049: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1045: p_cimv_tbl => lp_cimv_tbl);
1046:
1047: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1048: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1050: raise OKC_API.G_EXCEPTION_ERROR;
1051: End If;
1052:
1053: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

Line 1050: raise OKC_API.G_EXCEPTION_ERROR;

1046:
1047: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1048: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1050: raise OKC_API.G_EXCEPTION_ERROR;
1051: End If;
1052:
1053: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1054:

Line 1053: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

1049: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1050: raise OKC_API.G_EXCEPTION_ERROR;
1051: End If;
1052:
1053: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1054:
1055: EXCEPTION
1056: when OKC_API.G_EXCEPTION_ERROR then
1057: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 1056: when OKC_API.G_EXCEPTION_ERROR then

1052:
1053: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1054:
1055: EXCEPTION
1056: when OKC_API.G_EXCEPTION_ERROR then
1057: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1058: p_api_name => l_api_name,
1059: p_pkg_name => g_pkg_name,
1060: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1057: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1053: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1054:
1055: EXCEPTION
1056: when OKC_API.G_EXCEPTION_ERROR then
1057: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1058: p_api_name => l_api_name,
1059: p_pkg_name => g_pkg_name,
1060: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1061: x_msg_count => x_msg_count,

Line 1060: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1056: when OKC_API.G_EXCEPTION_ERROR then
1057: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1058: p_api_name => l_api_name,
1059: p_pkg_name => g_pkg_name,
1060: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1061: x_msg_count => x_msg_count,
1062: x_msg_data => x_msg_data,
1063: p_api_type => g_api_type);
1064:

Line 1065: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1061: x_msg_count => x_msg_count,
1062: x_msg_data => x_msg_data,
1063: p_api_type => g_api_type);
1064:
1065: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1066: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1067: p_api_name => l_api_name,
1068: p_pkg_name => g_pkg_name,
1069: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1066: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1062: x_msg_data => x_msg_data,
1063: p_api_type => g_api_type);
1064:
1065: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1066: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1067: p_api_name => l_api_name,
1068: p_pkg_name => g_pkg_name,
1069: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1070: x_msg_count => x_msg_count,

Line 1069: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1065: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1066: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1067: p_api_name => l_api_name,
1068: p_pkg_name => g_pkg_name,
1069: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1070: x_msg_count => x_msg_count,
1071: x_msg_data => x_msg_data,
1072: p_api_type => g_api_type);
1073:

Line 1075: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1071: x_msg_data => x_msg_data,
1072: p_api_type => g_api_type);
1073:
1074: when OTHERS then
1075: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1076: p_api_name => l_api_name,
1077: p_pkg_name => g_pkg_name,
1078: p_exc_name => 'OTHERS',
1079: x_msg_count => x_msg_count,

Line 1087: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1083: END;
1084:
1085: PROCEDURE create_contract_line_item(
1086: p_api_version IN NUMBER,
1087: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1088: x_return_status OUT NOCOPY VARCHAR2,
1089: x_msg_count OUT NOCOPY NUMBER,
1090: x_msg_data OUT NOCOPY VARCHAR2,
1091: p_line_item_tbl IN line_item_tbl_type,

Line 1097: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1093: ) IS
1094:
1095: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_line_item';
1096: l_api_version CONSTANT NUMBER := 1.0;
1097: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1098: i NUMBER;
1099: l_chr_id NUMBER;
1100: l_parent_cle_id NUMBER;
1101: l_cnt number := 0;

Line 1177: x_return_status := OKC_API.START_ACTIVITY(

1173: --Bug#3877032
1174:
1175: BEGIN
1176:
1177: x_return_status := OKC_API.START_ACTIVITY(
1178: p_api_name => l_api_name,
1179: p_pkg_name => g_pkg_name,
1180: p_init_msg_list => p_init_msg_list,
1181: l_api_version => l_api_version,

Line 1187: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1183: p_api_type => g_api_type,
1184: x_return_status => x_return_status);
1185:
1186: -- check if activity started successfully
1187: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1188: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1189: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1190: raise OKC_API.G_EXCEPTION_ERROR;
1191: End If;

Line 1188: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1184: x_return_status => x_return_status);
1185:
1186: -- check if activity started successfully
1187: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1188: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1189: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1190: raise OKC_API.G_EXCEPTION_ERROR;
1191: End If;
1192:

Line 1189: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

1185:
1186: -- check if activity started successfully
1187: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1188: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1189: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1190: raise OKC_API.G_EXCEPTION_ERROR;
1191: End If;
1192:
1193:

Line 1190: raise OKC_API.G_EXCEPTION_ERROR;

1186: -- check if activity started successfully
1187: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1188: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1189: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1190: raise OKC_API.G_EXCEPTION_ERROR;
1191: End If;
1192:
1193:
1194: If (p_line_item_tbl.COUNT > 0) Then

Line 1234: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN

1230: fetch get_fee_type_csr into l_fee_type;
1231: close get_fee_type_csr;
1232: LOOP
1233: -- Not null Validation for Asset Number
1234: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN
1235: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1236: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1237: x_return_status := OKC_API.g_ret_sts_error;
1238: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1235: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

1231: close get_fee_type_csr;
1232: LOOP
1233: -- Not null Validation for Asset Number
1234: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN
1235: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1236: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1237: x_return_status := OKC_API.g_ret_sts_error;
1238: RAISE OKC_API.G_EXCEPTION_ERROR;
1239: END IF;

Line 1237: x_return_status := OKC_API.g_ret_sts_error;

1233: -- Not null Validation for Asset Number
1234: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN
1235: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1236: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1237: x_return_status := OKC_API.g_ret_sts_error;
1238: RAISE OKC_API.G_EXCEPTION_ERROR;
1239: END IF;
1240:
1241: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then

Line 1238: RAISE OKC_API.G_EXCEPTION_ERROR;

1234: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN
1235: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1236: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1237: x_return_status := OKC_API.g_ret_sts_error;
1238: RAISE OKC_API.G_EXCEPTION_ERROR;
1239: END IF;
1240:
1241: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then
1242:

Line 1244: IF (p_line_item_tbl(i).capital_amount IS NULL OR p_line_item_tbl(i).capital_amount = OKC_API.G_MISS_NUM) THEN

1240:
1241: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then
1242:
1243: -- Not null Validation for capital Amount
1244: IF (p_line_item_tbl(i).capital_amount IS NULL OR p_line_item_tbl(i).capital_amount = OKC_API.G_MISS_NUM) THEN
1245: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1246: OKC_API.SET_MESSAGE( p_app_name => g_app_name
1247: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1248: , p_token1 => 'COL_NAME'

Line 1246: OKC_API.SET_MESSAGE( p_app_name => g_app_name

1242:
1243: -- Not null Validation for capital Amount
1244: IF (p_line_item_tbl(i).capital_amount IS NULL OR p_line_item_tbl(i).capital_amount = OKC_API.G_MISS_NUM) THEN
1245: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1246: OKC_API.SET_MESSAGE( p_app_name => g_app_name
1247: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1248: , p_token1 => 'COL_NAME'
1249: , p_token1_value => l_ak_prompt
1250: );

Line 1251: x_return_status := OKC_API.g_ret_sts_error;

1247: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1248: , p_token1 => 'COL_NAME'
1249: , p_token1_value => l_ak_prompt
1250: );
1251: x_return_status := OKC_API.g_ret_sts_error;
1252: RAISE OKC_API.G_EXCEPTION_ERROR;
1253: END IF;
1254:
1255: --Bug#4664176

Line 1252: RAISE OKC_API.G_EXCEPTION_ERROR;

1248: , p_token1 => 'COL_NAME'
1249: , p_token1_value => l_ak_prompt
1250: );
1251: x_return_status := OKC_API.g_ret_sts_error;
1252: RAISE OKC_API.G_EXCEPTION_ERROR;
1253: END IF;
1254:
1255: --Bug#4664176
1256: --Bug#4635028

Line 1265: IF(l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM) THEN

1261: l_amount := p_line_item_tbl(i).capital_amount;
1262: END IF;
1263:
1264: -- Not null Validation for Amount
1265: IF(l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM) THEN
1266: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1267: OKC_API.SET_MESSAGE(p_app_name => g_app_name
1268: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1269: , p_token1 => 'COL_NAME'

Line 1267: OKC_API.SET_MESSAGE(p_app_name => g_app_name

1263:
1264: -- Not null Validation for Amount
1265: IF(l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM) THEN
1266: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1267: OKC_API.SET_MESSAGE(p_app_name => g_app_name
1268: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1269: , p_token1 => 'COL_NAME'
1270: , p_token1_value => l_ak_prompt
1271: );

Line 1272: x_return_status := OKC_API.g_ret_sts_error;

1268: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1269: , p_token1 => 'COL_NAME'
1270: , p_token1_value => l_ak_prompt
1271: );
1272: x_return_status := OKC_API.g_ret_sts_error;
1273: RAISE OKC_API.G_EXCEPTION_ERROR;
1274:
1275: END IF;
1276: END IF;

Line 1273: RAISE OKC_API.G_EXCEPTION_ERROR;

1269: , p_token1 => 'COL_NAME'
1270: , p_token1_value => l_ak_prompt
1271: );
1272: x_return_status := OKC_API.g_ret_sts_error;
1273: RAISE OKC_API.G_EXCEPTION_ERROR;
1274:
1275: END IF;
1276: END IF;
1277:

Line 1286: x_return_status := OKC_API.g_ret_sts_error;

1282: fetch get_link_fee_asset_csr into l_item_id1, l_item_id2;
1283: close get_link_fee_asset_csr;
1284:
1285: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1286: x_return_status := OKC_API.g_ret_sts_error;
1287: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1288: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1289: , p_token1 => 'COL_NAME'
1290: , p_token1_value => l_ak_prompt

Line 1288: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'

1284:
1285: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1286: x_return_status := OKC_API.g_ret_sts_error;
1287: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1288: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1289: , p_token1 => 'COL_NAME'
1290: , p_token1_value => l_ak_prompt
1291: );
1292: raise OKC_API.G_EXCEPTION_ERROR;

Line 1292: raise OKC_API.G_EXCEPTION_ERROR;

1288: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1289: , p_token1 => 'COL_NAME'
1290: , p_token1_value => l_ak_prompt
1291: );
1292: raise OKC_API.G_EXCEPTION_ERROR;
1293: End If;
1294:
1295: lp_cimv_tbl(i).object1_id1 := l_item_id1;
1296: lp_cimv_tbl(i).object1_id2 := l_item_id2;

Line 1311: x_return_status := OKC_API.g_ret_sts_error;

1307: open get_link_service_asset_csr(l_chr_id, l_parent_cle_id, p_line_item_tbl(i).name);
1308: fetch get_link_service_asset_csr into l_item_id1, l_item_id2;
1309: close get_link_service_asset_csr;
1310: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1311: x_return_status := OKC_API.g_ret_sts_error;
1312: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1313: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1314: , p_token1 => 'COL_NAME'
1315: , p_token1_value => l_ak_prompt

Line 1313: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'

1309: close get_link_service_asset_csr;
1310: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1311: x_return_status := OKC_API.g_ret_sts_error;
1312: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1313: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1314: , p_token1 => 'COL_NAME'
1315: , p_token1_value => l_ak_prompt
1316:
1317: );

Line 1318: raise OKC_API.G_EXCEPTION_ERROR;

1314: , p_token1 => 'COL_NAME'
1315: , p_token1_value => l_ak_prompt
1316:
1317: );
1318: raise OKC_API.G_EXCEPTION_ERROR;
1319: End If;
1320: lp_cimv_tbl(i).object1_id1 := l_item_id1;
1321: lp_cimv_tbl(i).object1_id2 := l_item_id2;
1322: Else

Line 1398: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1394: x_clev_tbl => lx_clev_tbl,
1395: x_klev_tbl => lx_klev_tbl,
1396: x_cimv_tbl => lx_cimv_tbl);
1397:
1398: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1399: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1400: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1401: raise OKC_API.G_EXCEPTION_ERROR;
1402: END IF;

Line 1399: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1395: x_klev_tbl => lx_klev_tbl,
1396: x_cimv_tbl => lx_cimv_tbl);
1397:
1398: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1399: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1400: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1401: raise OKC_API.G_EXCEPTION_ERROR;
1402: END IF;
1403: ELSE

Line 1400: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then

1396: x_cimv_tbl => lx_cimv_tbl);
1397:
1398: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1399: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1400: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1401: raise OKC_API.G_EXCEPTION_ERROR;
1402: END IF;
1403: ELSE
1404:

Line 1401: raise OKC_API.G_EXCEPTION_ERROR;

1397:
1398: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1399: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1400: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1401: raise OKC_API.G_EXCEPTION_ERROR;
1402: END IF;
1403: ELSE
1404:
1405: okl_service_integration_pub.create_cov_asset_line(

Line 1419: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1415: x_clev_tbl => lx_clev_tbl,
1416: x_klev_tbl => lx_klev_tbl,
1417: x_cimv_tbl => lx_cimv_tbl);
1418:
1419: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1420: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1421: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1422: raise OKC_API.G_EXCEPTION_ERROR;
1423: End If;

Line 1420: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1416: x_klev_tbl => lx_klev_tbl,
1417: x_cimv_tbl => lx_cimv_tbl);
1418:
1419: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1420: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1421: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1422: raise OKC_API.G_EXCEPTION_ERROR;
1423: End If;
1424: End If;

Line 1421: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1417: x_cimv_tbl => lx_cimv_tbl);
1418:
1419: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1420: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1421: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1422: raise OKC_API.G_EXCEPTION_ERROR;
1423: End If;
1424: End If;
1425: Elsif l_lty_code = 'LINK_FEE_ASSET' Then

Line 1422: raise OKC_API.G_EXCEPTION_ERROR;

1418:
1419: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1420: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1421: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1422: raise OKC_API.G_EXCEPTION_ERROR;
1423: End If;
1424: End If;
1425: Elsif l_lty_code = 'LINK_FEE_ASSET' Then
1426: create_contract_line_item(

Line 1439: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1435: x_clev_tbl => lx_clev_tbl,
1436: x_klev_tbl => lx_klev_tbl,
1437: x_cimv_tbl => lx_cimv_tbl);
1438:
1439: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1440: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1441: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1442: raise OKC_API.G_EXCEPTION_ERROR;
1443: End If;

Line 1440: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1436: x_klev_tbl => lx_klev_tbl,
1437: x_cimv_tbl => lx_cimv_tbl);
1438:
1439: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1440: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1441: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1442: raise OKC_API.G_EXCEPTION_ERROR;
1443: End If;
1444:

Line 1441: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1437: x_cimv_tbl => lx_cimv_tbl);
1438:
1439: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1440: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1441: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1442: raise OKC_API.G_EXCEPTION_ERROR;
1443: End If;
1444:
1445: --Bug# 3877032

Line 1442: raise OKC_API.G_EXCEPTION_ERROR;

1438:
1439: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1440: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1441: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1442: raise OKC_API.G_EXCEPTION_ERROR;
1443: End If;
1444:
1445: --Bug# 3877032
1446: --update capital amount field

Line 1465: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1461: p_formula_name => 'LINE_CAP_AMNT',
1462: p_contract_id => lx_cimv_tbl(i).dnz_chr_id,
1463: p_line_id => lx_cimv_tbl(i).object1_id1,
1464: x_value => l_fin_klev_rec.capital_amount);
1465: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1466: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1468: raise OKC_API.G_EXCEPTION_ERROR;
1469: End If;

Line 1466: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1462: p_contract_id => lx_cimv_tbl(i).dnz_chr_id,
1463: p_line_id => lx_cimv_tbl(i).object1_id1,
1464: x_value => l_fin_klev_rec.capital_amount);
1465: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1466: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1468: raise OKC_API.G_EXCEPTION_ERROR;
1469: End If;
1470:

Line 1467: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1463: p_line_id => lx_cimv_tbl(i).object1_id1,
1464: x_value => l_fin_klev_rec.capital_amount);
1465: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1466: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1468: raise OKC_API.G_EXCEPTION_ERROR;
1469: End If;
1470:
1471: okl_contract_pub.update_contract_line(p_api_version => p_api_version,

Line 1468: raise OKC_API.G_EXCEPTION_ERROR;

1464: x_value => l_fin_klev_rec.capital_amount);
1465: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1466: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1468: raise OKC_API.G_EXCEPTION_ERROR;
1469: End If;
1470:
1471: okl_contract_pub.update_contract_line(p_api_version => p_api_version,
1472: p_init_msg_list => p_init_msg_list,

Line 1480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1476: p_clev_rec => l_fin_clev_rec,
1477: p_klev_rec => l_fin_klev_rec,
1478: x_clev_rec => lx_fin_clev_rec,
1479: x_klev_rec => lx_fin_klev_rec);
1480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: End If;

Line 1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1477: p_klev_rec => l_fin_klev_rec,
1478: x_clev_rec => lx_fin_clev_rec,
1479: x_klev_rec => lx_fin_klev_rec);
1480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: End If;
1485:

Line 1482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1478: x_clev_rec => lx_fin_clev_rec,
1479: x_klev_rec => lx_fin_klev_rec);
1480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: End If;
1485:
1486: --Bug# 4899328

Line 1483: raise OKC_API.G_EXCEPTION_ERROR;

1479: x_klev_rec => lx_fin_klev_rec);
1480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: End If;
1485:
1486: --Bug# 4899328
1487: -- Recalculate Asset depreciation cost when there

Line 1534: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

1530: END LOOP;
1531: End If;
1532:
1533:
1534: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1535:
1536: EXCEPTION
1537: when OKC_API.G_EXCEPTION_ERROR then
1538: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 1537: when OKC_API.G_EXCEPTION_ERROR then

1533:
1534: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1535:
1536: EXCEPTION
1537: when OKC_API.G_EXCEPTION_ERROR then
1538: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1539: p_api_name => l_api_name,
1540: p_pkg_name => g_pkg_name,
1541: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1538: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1534: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1535:
1536: EXCEPTION
1537: when OKC_API.G_EXCEPTION_ERROR then
1538: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1539: p_api_name => l_api_name,
1540: p_pkg_name => g_pkg_name,
1541: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1542: x_msg_count => x_msg_count,

Line 1541: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1537: when OKC_API.G_EXCEPTION_ERROR then
1538: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1539: p_api_name => l_api_name,
1540: p_pkg_name => g_pkg_name,
1541: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1542: x_msg_count => x_msg_count,
1543: x_msg_data => x_msg_data,
1544: p_api_type => g_api_type);
1545:

Line 1546: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1542: x_msg_count => x_msg_count,
1543: x_msg_data => x_msg_data,
1544: p_api_type => g_api_type);
1545:
1546: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1547: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1548: p_api_name => l_api_name,
1549: p_pkg_name => g_pkg_name,
1550: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1547: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1543: x_msg_data => x_msg_data,
1544: p_api_type => g_api_type);
1545:
1546: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1547: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1548: p_api_name => l_api_name,
1549: p_pkg_name => g_pkg_name,
1550: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1551: x_msg_count => x_msg_count,

Line 1550: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1546: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1547: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1548: p_api_name => l_api_name,
1549: p_pkg_name => g_pkg_name,
1550: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1551: x_msg_count => x_msg_count,
1552: x_msg_data => x_msg_data,
1553: p_api_type => g_api_type);
1554:

Line 1556: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1552: x_msg_data => x_msg_data,
1553: p_api_type => g_api_type);
1554:
1555: when OTHERS then
1556: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1557: p_api_name => l_api_name,
1558: p_pkg_name => g_pkg_name,
1559: p_exc_name => 'OTHERS',
1560: x_msg_count => x_msg_count,

Line 1568: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1564: END;
1565:
1566: PROCEDURE update_contract_line_item(
1567: p_api_version IN NUMBER,
1568: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1569: x_return_status OUT NOCOPY VARCHAR2,
1570: x_msg_count OUT NOCOPY NUMBER,
1571: x_msg_data OUT NOCOPY VARCHAR2,
1572: p_line_item_tbl IN line_item_tbl_type,

Line 1578: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1574: ) IS
1575:
1576: l_api_name CONSTANT VARCHAR2(30) := 'update_contract_line_item';
1577: l_api_version CONSTANT NUMBER := 1.0;
1578: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1579: i NUMBER;
1580: l_chr_id NUMBER;
1581: l_parent_cle_id NUMBER;
1582: l_cnt number := 0;

Line 1670: x_return_status := OKC_API.START_ACTIVITY(

1666:
1667: BEGIN
1668:
1669:
1670: x_return_status := OKC_API.START_ACTIVITY(
1671: p_api_name => l_api_name,
1672: p_pkg_name => g_pkg_name,
1673: p_init_msg_list => p_init_msg_list,
1674: l_api_version => l_api_version,

Line 1680: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1676: p_api_type => g_api_type,
1677: x_return_status => x_return_status);
1678:
1679: -- check if activity started successfully
1680: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;

Line 1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1677: x_return_status => x_return_status);
1678:
1679: -- check if activity started successfully
1680: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;
1685:

Line 1682: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

1678:
1679: -- check if activity started successfully
1680: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;
1685:
1686: If (p_line_item_tbl.COUNT > 0) Then

Line 1683: raise OKC_API.G_EXCEPTION_ERROR;

1679: -- check if activity started successfully
1680: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;
1685:
1686: If (p_line_item_tbl.COUNT > 0) Then
1687:

Line 1729: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN

1725: LOOP
1726:
1727:
1728: -- Not null Validation for Asset Number
1729: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN
1730:
1731: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1732: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1733: x_return_status := OKC_API.g_ret_sts_error;

Line 1731: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

1727:
1728: -- Not null Validation for Asset Number
1729: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN
1730:
1731: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1732: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1733: x_return_status := OKC_API.g_ret_sts_error;
1734: RAISE OKC_API.G_EXCEPTION_ERROR;
1735:

Line 1733: x_return_status := OKC_API.g_ret_sts_error;

1729: IF (p_line_item_tbl(i).name = OKC_API.G_MISS_CHAR OR p_line_item_tbl(i).name IS NULL) THEN
1730:
1731: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1732: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1733: x_return_status := OKC_API.g_ret_sts_error;
1734: RAISE OKC_API.G_EXCEPTION_ERROR;
1735:
1736: END IF;
1737:

Line 1734: RAISE OKC_API.G_EXCEPTION_ERROR;

1730:
1731: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
1732: p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
1733: x_return_status := OKC_API.g_ret_sts_error;
1734: RAISE OKC_API.G_EXCEPTION_ERROR;
1735:
1736: END IF;
1737:
1738: IF(l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then

Line 1741: IF (p_line_item_tbl(i).capital_amount IS NULL OR p_line_item_tbl(i).capital_amount = OKC_API.G_MISS_NUM) THEN

1737:
1738: IF(l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then
1739:
1740: -- Not null Validation for capitol Amount
1741: IF (p_line_item_tbl(i).capital_amount IS NULL OR p_line_item_tbl(i).capital_amount = OKC_API.G_MISS_NUM) THEN
1742:
1743: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1744: OKC_API.SET_MESSAGE( p_app_name => g_app_name
1745: , p_msg_name => 'OKL_AMOUNT_FORMAT'

Line 1744: OKC_API.SET_MESSAGE( p_app_name => g_app_name

1740: -- Not null Validation for capitol Amount
1741: IF (p_line_item_tbl(i).capital_amount IS NULL OR p_line_item_tbl(i).capital_amount = OKC_API.G_MISS_NUM) THEN
1742:
1743: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1744: OKC_API.SET_MESSAGE( p_app_name => g_app_name
1745: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1746: , p_token1 => 'COL_NAME'
1747: , p_token1_value => l_ak_prompt
1748: );

Line 1749: x_return_status := OKC_API.g_ret_sts_error;

1745: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1746: , p_token1 => 'COL_NAME'
1747: , p_token1_value => l_ak_prompt
1748: );
1749: x_return_status := OKC_API.g_ret_sts_error;
1750: RAISE OKC_API.G_EXCEPTION_ERROR;
1751:
1752: END IF;
1753:

Line 1750: RAISE OKC_API.G_EXCEPTION_ERROR;

1746: , p_token1 => 'COL_NAME'
1747: , p_token1_value => l_ak_prompt
1748: );
1749: x_return_status := OKC_API.g_ret_sts_error;
1750: RAISE OKC_API.G_EXCEPTION_ERROR;
1751:
1752: END IF;
1753:
1754: --Bug#4664176

Line 1764: IF (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM) THEN

1760: l_amount := p_line_item_tbl(i).capital_amount;
1761: END IF;
1762:
1763: -- Not null Validation for Amount
1764: IF (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM) THEN
1765:
1766: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1767: OKC_API.SET_MESSAGE( p_app_name => g_app_name
1768: , p_msg_name => 'OKL_AMOUNT_FORMAT'

Line 1767: OKC_API.SET_MESSAGE( p_app_name => g_app_name

1763: -- Not null Validation for Amount
1764: IF (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM) THEN
1765:
1766: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
1767: OKC_API.SET_MESSAGE( p_app_name => g_app_name
1768: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1769: , p_token1 => 'COL_NAME'
1770: , p_token1_value => l_ak_prompt
1771: );

Line 1772: x_return_status := OKC_API.g_ret_sts_error;

1768: , p_msg_name => 'OKL_AMOUNT_FORMAT'
1769: , p_token1 => 'COL_NAME'
1770: , p_token1_value => l_ak_prompt
1771: );
1772: x_return_status := OKC_API.g_ret_sts_error;
1773: RAISE OKC_API.G_EXCEPTION_ERROR;
1774:
1775: END IF;
1776:

Line 1773: RAISE OKC_API.G_EXCEPTION_ERROR;

1769: , p_token1 => 'COL_NAME'
1770: , p_token1_value => l_ak_prompt
1771: );
1772: x_return_status := OKC_API.g_ret_sts_error;
1773: RAISE OKC_API.G_EXCEPTION_ERROR;
1774:
1775: END IF;
1776:
1777: END IF;

Line 1788: x_return_status := OKC_API.g_ret_sts_error;

1784: fetch get_link_fee_asset_csr into l_item_id1, l_item_id2;
1785: close get_link_fee_asset_csr;
1786:
1787: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1788: x_return_status := OKC_API.g_ret_sts_error;
1789: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1790: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1791: , p_token1 => 'COL_NAME'
1792: , p_token1_value => l_ak_prompt

Line 1790: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'

1786:
1787: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1788: x_return_status := OKC_API.g_ret_sts_error;
1789: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1790: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1791: , p_token1 => 'COL_NAME'
1792: , p_token1_value => l_ak_prompt
1793:
1794: );

Line 1795: raise OKC_API.G_EXCEPTION_ERROR;

1791: , p_token1 => 'COL_NAME'
1792: , p_token1_value => l_ak_prompt
1793:
1794: );
1795: raise OKC_API.G_EXCEPTION_ERROR;
1796: End If;
1797:
1798: ElsIf(l_lty_code = 'LINK_SERV_ASSET') Then -- do the validation for service link asset
1799:

Line 1817: x_return_status := OKC_API.g_ret_sts_error;

1813: close get_link_service_asset_csr;
1814:
1815: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1816:
1817: x_return_status := OKC_API.g_ret_sts_error;
1818: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1819: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1820: , p_token1 => 'COL_NAME'
1821: , p_token1_value => l_ak_prompt

Line 1819: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'

1815: If(l_item_id1 is null or l_item_id2 is null) Then -- through error message
1816:
1817: x_return_status := OKC_API.g_ret_sts_error;
1818: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_ASSET');
1819: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
1820: , p_token1 => 'COL_NAME'
1821: , p_token1_value => l_ak_prompt
1822:
1823: );

Line 1824: raise OKC_API.G_EXCEPTION_ERROR;

1820: , p_token1 => 'COL_NAME'
1821: , p_token1_value => l_ak_prompt
1822:
1823: );
1824: raise OKC_API.G_EXCEPTION_ERROR;
1825:
1826: End If;
1827:
1828: End If;

Line 1903: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1899: x_klev_tbl => lx_klev_tbl,
1900: x_cimv_tbl => lx_cimv_tbl
1901: );
1902:
1903: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1904: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1905: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1906: raise OKC_API.G_EXCEPTION_ERROR;
1907: END IF;

Line 1904: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1900: x_cimv_tbl => lx_cimv_tbl
1901: );
1902:
1903: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1904: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1905: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1906: raise OKC_API.G_EXCEPTION_ERROR;
1907: END IF;
1908:

Line 1905: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then

1901: );
1902:
1903: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1904: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1905: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1906: raise OKC_API.G_EXCEPTION_ERROR;
1907: END IF;
1908:
1909: ELSE

Line 1906: raise OKC_API.G_EXCEPTION_ERROR;

1902:
1903: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1904: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1905: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) then
1906: raise OKC_API.G_EXCEPTION_ERROR;
1907: END IF;
1908:
1909: ELSE
1910:

Line 1925: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1921: x_clev_tbl => lx_clev_tbl,
1922: x_klev_tbl => lx_klev_tbl,
1923: x_cimv_tbl => lx_cimv_tbl);
1924:
1925: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1926: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1927: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1928: raise OKC_API.G_EXCEPTION_ERROR;
1929: End If;

Line 1926: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1922: x_klev_tbl => lx_klev_tbl,
1923: x_cimv_tbl => lx_cimv_tbl);
1924:
1925: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1926: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1927: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1928: raise OKC_API.G_EXCEPTION_ERROR;
1929: End If;
1930:

Line 1927: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1923: x_cimv_tbl => lx_cimv_tbl);
1924:
1925: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1926: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1927: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1928: raise OKC_API.G_EXCEPTION_ERROR;
1929: End If;
1930:
1931: End If;

Line 1928: raise OKC_API.G_EXCEPTION_ERROR;

1924:
1925: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1926: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1927: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1928: raise OKC_API.G_EXCEPTION_ERROR;
1929: End If;
1930:
1931: End If;
1932:

Line 1959: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1955: x_clev_tbl => lx_clev_tbl,
1956: x_klev_tbl => lx_klev_tbl,
1957: x_cimv_tbl => lx_cimv_tbl);
1958:
1959: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1960: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1961: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1962: raise OKC_API.G_EXCEPTION_ERROR;
1963: End If;

Line 1960: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1956: x_klev_tbl => lx_klev_tbl,
1957: x_cimv_tbl => lx_cimv_tbl);
1958:
1959: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1960: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1961: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1962: raise OKC_API.G_EXCEPTION_ERROR;
1963: End If;
1964:

Line 1961: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1957: x_cimv_tbl => lx_cimv_tbl);
1958:
1959: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1960: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1961: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1962: raise OKC_API.G_EXCEPTION_ERROR;
1963: End If;
1964:
1965: --Bug# 3877032

Line 1962: raise OKC_API.G_EXCEPTION_ERROR;

1958:
1959: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1960: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1961: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1962: raise OKC_API.G_EXCEPTION_ERROR;
1963: End If;
1964:
1965: --Bug# 3877032
1966: --update capital amount field

Line 1987: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1983: p_formula_name => 'LINE_CAP_AMNT',
1984: p_contract_id => lx_cimv_tbl(i).dnz_chr_id,
1985: p_line_id => to_number(lx_cimv_tbl(i).object1_id1),
1986: x_value => l_fin_klev_rec.capital_amount);
1987: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1988: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1990: raise OKC_API.G_EXCEPTION_ERROR;
1991: End If;

Line 1988: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1984: p_contract_id => lx_cimv_tbl(i).dnz_chr_id,
1985: p_line_id => to_number(lx_cimv_tbl(i).object1_id1),
1986: x_value => l_fin_klev_rec.capital_amount);
1987: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1988: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1990: raise OKC_API.G_EXCEPTION_ERROR;
1991: End If;
1992:

Line 1989: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1985: p_line_id => to_number(lx_cimv_tbl(i).object1_id1),
1986: x_value => l_fin_klev_rec.capital_amount);
1987: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1988: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1990: raise OKC_API.G_EXCEPTION_ERROR;
1991: End If;
1992:
1993: okl_contract_pub.update_contract_line(p_api_version => p_api_version,

Line 1990: raise OKC_API.G_EXCEPTION_ERROR;

1986: x_value => l_fin_klev_rec.capital_amount);
1987: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1988: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1989: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1990: raise OKC_API.G_EXCEPTION_ERROR;
1991: End If;
1992:
1993: okl_contract_pub.update_contract_line(p_api_version => p_api_version,
1994: p_init_msg_list => p_init_msg_list,

Line 2002: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1998: p_clev_rec => l_fin_clev_rec,
1999: p_klev_rec => l_fin_klev_rec,
2000: x_clev_rec => lx_fin_clev_rec,
2001: x_klev_rec => lx_fin_klev_rec);
2002: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2003: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2004: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2005: raise OKC_API.G_EXCEPTION_ERROR;
2006: End If;

Line 2003: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1999: p_klev_rec => l_fin_klev_rec,
2000: x_clev_rec => lx_fin_clev_rec,
2001: x_klev_rec => lx_fin_klev_rec);
2002: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2003: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2004: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2005: raise OKC_API.G_EXCEPTION_ERROR;
2006: End If;
2007:

Line 2004: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

2000: x_clev_rec => lx_fin_clev_rec,
2001: x_klev_rec => lx_fin_klev_rec);
2002: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2003: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2004: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2005: raise OKC_API.G_EXCEPTION_ERROR;
2006: End If;
2007:
2008: --Bug# 4899328

Line 2005: raise OKC_API.G_EXCEPTION_ERROR;

2001: x_klev_rec => lx_fin_klev_rec);
2002: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2003: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2004: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2005: raise OKC_API.G_EXCEPTION_ERROR;
2006: End If;
2007:
2008: --Bug# 4899328
2009: -- Recalculate Asset depreciation cost when there

Line 2046: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

2042: p_formula_name => 'LINE_CAP_AMNT',
2043: p_contract_id => l_fin_clev_tbl(j).dnz_chr_id,
2044: p_line_id => l_fin_clev_tbl(j).id,
2045: x_value => l_fin_klev_tbl(j).capital_amount);
2046: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2047: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2048: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2049: raise OKC_API.G_EXCEPTION_ERROR;
2050: End If;

Line 2047: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2043: p_contract_id => l_fin_clev_tbl(j).dnz_chr_id,
2044: p_line_id => l_fin_clev_tbl(j).id,
2045: x_value => l_fin_klev_tbl(j).capital_amount);
2046: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2047: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2048: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2049: raise OKC_API.G_EXCEPTION_ERROR;
2050: End If;
2051: End Loop;

Line 2048: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

2044: p_line_id => l_fin_clev_tbl(j).id,
2045: x_value => l_fin_klev_tbl(j).capital_amount);
2046: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2047: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2048: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2049: raise OKC_API.G_EXCEPTION_ERROR;
2050: End If;
2051: End Loop;
2052:

Line 2049: raise OKC_API.G_EXCEPTION_ERROR;

2045: x_value => l_fin_klev_tbl(j).capital_amount);
2046: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2047: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2048: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2049: raise OKC_API.G_EXCEPTION_ERROR;
2050: End If;
2051: End Loop;
2052:
2053: okl_contract_pub.update_contract_line(p_api_version => p_api_version,

Line 2063: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

2059: p_klev_tbl => l_fin_klev_tbl,
2060: x_clev_tbl => lx_fin_clev_tbl,
2061: x_klev_tbl => lx_fin_klev_tbl);
2062:
2063: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2066: raise OKC_API.G_EXCEPTION_ERROR;
2067: End If;

Line 2064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2060: x_clev_tbl => lx_fin_clev_tbl,
2061: x_klev_tbl => lx_fin_klev_tbl);
2062:
2063: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2066: raise OKC_API.G_EXCEPTION_ERROR;
2067: End If;
2068:

Line 2065: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

2061: x_klev_tbl => lx_fin_klev_tbl);
2062:
2063: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2066: raise OKC_API.G_EXCEPTION_ERROR;
2067: End If;
2068:
2069: --Bug# 4899328

Line 2066: raise OKC_API.G_EXCEPTION_ERROR;

2062:
2063: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2065: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2066: raise OKC_API.G_EXCEPTION_ERROR;
2067: End If;
2068:
2069: --Bug# 4899328
2070: -- Recalculate Asset depreciation cost when there

Line 2098: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

2094:
2095:
2096: End If;
2097:
2098: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2099:
2100: EXCEPTION
2101: when OKC_API.G_EXCEPTION_ERROR then
2102: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 2101: when OKC_API.G_EXCEPTION_ERROR then

2097:
2098: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2099:
2100: EXCEPTION
2101: when OKC_API.G_EXCEPTION_ERROR then
2102: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2103: p_api_name => l_api_name,
2104: p_pkg_name => g_pkg_name,
2105: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 2102: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2098: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2099:
2100: EXCEPTION
2101: when OKC_API.G_EXCEPTION_ERROR then
2102: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2103: p_api_name => l_api_name,
2104: p_pkg_name => g_pkg_name,
2105: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2106: x_msg_count => x_msg_count,

Line 2105: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

2101: when OKC_API.G_EXCEPTION_ERROR then
2102: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2103: p_api_name => l_api_name,
2104: p_pkg_name => g_pkg_name,
2105: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2106: x_msg_count => x_msg_count,
2107: x_msg_data => x_msg_data,
2108: p_api_type => g_api_type);
2109:

Line 2110: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

2106: x_msg_count => x_msg_count,
2107: x_msg_data => x_msg_data,
2108: p_api_type => g_api_type);
2109:
2110: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2111: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2112: p_api_name => l_api_name,
2113: p_pkg_name => g_pkg_name,
2114: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2111: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2107: x_msg_data => x_msg_data,
2108: p_api_type => g_api_type);
2109:
2110: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2111: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2112: p_api_name => l_api_name,
2113: p_pkg_name => g_pkg_name,
2114: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2115: x_msg_count => x_msg_count,

Line 2114: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

2110: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2111: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2112: p_api_name => l_api_name,
2113: p_pkg_name => g_pkg_name,
2114: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2115: x_msg_count => x_msg_count,
2116: x_msg_data => x_msg_data,
2117: p_api_type => g_api_type);
2118:

Line 2120: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2116: x_msg_data => x_msg_data,
2117: p_api_type => g_api_type);
2118:
2119: when OTHERS then
2120: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2121: p_api_name => l_api_name,
2122: p_pkg_name => g_pkg_name,
2123: p_exc_name => 'OTHERS',
2124: x_msg_count => x_msg_count,

Line 2132: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2128: END;
2129:
2130: PROCEDURE create_contract_line_item(
2131: p_api_version IN NUMBER,
2132: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2133: x_return_status OUT NOCOPY VARCHAR2,
2134: x_msg_count OUT NOCOPY NUMBER,
2135: x_msg_data OUT NOCOPY VARCHAR2,
2136: p_clev_rec IN clev_rec_type,

Line 2152: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2148: l_amt_ak_prompt AK_ATTRIBUTES_VL.attribute_label_long%type;
2149:
2150: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_line_item';
2151: l_api_version CONSTANT NUMBER := 1.0;
2152: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2153:
2154: CURSOR get_k_dates_csr(l_id NUMBER) IS
2155: select chr.start_date, chr.end_date
2156: from okc_k_lines_b chr

Line 2185: x_return_status := OKC_API.START_ACTIVITY(

2181: -- udhenuko Modification End.
2182: /*
2183: -- call START_ACTIVITY to create savepoint, check compatibility
2184: -- and initialize message list
2185: x_return_status := OKC_API.START_ACTIVITY(
2186: p_api_name => l_api_name,
2187: p_pkg_name => g_pkg_name,
2188: p_init_msg_list => p_init_msg_list,
2189: l_api_version => l_api_version,

Line 2195: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

2191: p_api_type => g_api_type,
2192: x_return_status => x_return_status);
2193:
2194: -- check if activity started successfully
2195: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2197: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2198: raise OKC_API.G_EXCEPTION_ERROR;
2199: End If;

Line 2196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2192: x_return_status => x_return_status);
2193:
2194: -- check if activity started successfully
2195: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2197: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2198: raise OKC_API.G_EXCEPTION_ERROR;
2199: End If;
2200: */

Line 2197: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

2193:
2194: -- check if activity started successfully
2195: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2197: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2198: raise OKC_API.G_EXCEPTION_ERROR;
2199: End If;
2200: */
2201:

Line 2198: raise OKC_API.G_EXCEPTION_ERROR;

2194: -- check if activity started successfully
2195: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2197: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2198: raise OKC_API.G_EXCEPTION_ERROR;
2199: End If;
2200: */
2201:
2202: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then

Line 2205: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND

2201:
2202: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then
2203:
2204: -- Not null Validation for Asset Number
2205: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2206: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2207: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2208: x_return_status := OKC_API.g_ret_sts_error;
2209: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 2206: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN

2202: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then
2203:
2204: -- Not null Validation for Asset Number
2205: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2206: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2207: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2208: x_return_status := OKC_API.g_ret_sts_error;
2209: RAISE OKC_API.G_EXCEPTION_ERROR;
2210: END IF;

Line 2207: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

2203:
2204: -- Not null Validation for Asset Number
2205: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2206: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2207: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2208: x_return_status := OKC_API.g_ret_sts_error;
2209: RAISE OKC_API.G_EXCEPTION_ERROR;
2210: END IF;
2211:

Line 2208: x_return_status := OKC_API.g_ret_sts_error;

2204: -- Not null Validation for Asset Number
2205: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2206: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2207: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2208: x_return_status := OKC_API.g_ret_sts_error;
2209: RAISE OKC_API.G_EXCEPTION_ERROR;
2210: END IF;
2211:
2212: -- Not null Validation for Amount

Line 2209: RAISE OKC_API.G_EXCEPTION_ERROR;

2205: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2206: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2207: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2208: x_return_status := OKC_API.g_ret_sts_error;
2209: RAISE OKC_API.G_EXCEPTION_ERROR;
2210: END IF;
2211:
2212: -- Not null Validation for Amount
2213: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND

Line 2213: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND

2209: RAISE OKC_API.G_EXCEPTION_ERROR;
2210: END IF;
2211:
2212: -- Not null Validation for Amount
2213: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2214: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN
2215:
2216: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2217: OKC_API.SET_MESSAGE( p_app_name => g_app_name

Line 2214: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN

2210: END IF;
2211:
2212: -- Not null Validation for Amount
2213: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2214: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN
2215:
2216: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2217: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2218: , p_msg_name => 'OKL_AMOUNT_FORMAT'

Line 2217: OKC_API.SET_MESSAGE( p_app_name => g_app_name

2213: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2214: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN
2215:
2216: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2217: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2218: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2219: , p_token1 => 'COL_NAME'
2220: , p_token1_value => l_amt_ak_prompt
2221: );

Line 2222: x_return_status := OKC_API.g_ret_sts_error;

2218: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2219: , p_token1 => 'COL_NAME'
2220: , p_token1_value => l_amt_ak_prompt
2221: );
2222: x_return_status := OKC_API.g_ret_sts_error;
2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;
2225:
2226: --Bug#4664176

Line 2223: RAISE OKC_API.G_EXCEPTION_ERROR;

2219: , p_token1 => 'COL_NAME'
2220: , p_token1_value => l_amt_ak_prompt
2221: );
2222: x_return_status := OKC_API.g_ret_sts_error;
2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;
2225:
2226: --Bug#4664176
2227: --Bug#4635028

Line 2238: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND

2234: l_amount := l_klev_rec.amount;
2235: END IF;
2236:
2237: -- Not null Validation for Asset Number
2238: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2239: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2240:
2241: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2242: x_return_status := OKC_API.g_ret_sts_error;

Line 2239: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN

2235: END IF;
2236:
2237: -- Not null Validation for Asset Number
2238: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2239: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2240:
2241: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2242: x_return_status := OKC_API.g_ret_sts_error;
2243: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 2241: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

2237: -- Not null Validation for Asset Number
2238: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2239: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2240:
2241: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2242: x_return_status := OKC_API.g_ret_sts_error;
2243: RAISE OKC_API.G_EXCEPTION_ERROR;
2244:
2245: END IF;

Line 2242: x_return_status := OKC_API.g_ret_sts_error;

2238: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2239: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2240:
2241: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2242: x_return_status := OKC_API.g_ret_sts_error;
2243: RAISE OKC_API.G_EXCEPTION_ERROR;
2244:
2245: END IF;
2246:

Line 2243: RAISE OKC_API.G_EXCEPTION_ERROR;

2239: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2240:
2241: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2242: x_return_status := OKC_API.g_ret_sts_error;
2243: RAISE OKC_API.G_EXCEPTION_ERROR;
2244:
2245: END IF;
2246:
2247: -- Not null Validation for Amount

Line 2248: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND

2244:
2245: END IF;
2246:
2247: -- Not null Validation for Amount
2248: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2249: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN
2250:
2251: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2252: OKC_API.SET_MESSAGE( p_app_name => g_app_name

Line 2249: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN

2245: END IF;
2246:
2247: -- Not null Validation for Amount
2248: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2249: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN
2250:
2251: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2252: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2253: , p_msg_name => 'OKL_AMOUNT_FORMAT'

Line 2252: OKC_API.SET_MESSAGE( p_app_name => g_app_name

2248: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2249: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN
2250:
2251: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2252: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2253: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2254: , p_token1 => 'COL_NAME'
2255: , p_token1_value => l_amt_ak_prompt
2256: );

Line 2257: x_return_status := OKC_API.g_ret_sts_error;

2253: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2254: , p_token1 => 'COL_NAME'
2255: , p_token1_value => l_amt_ak_prompt
2256: );
2257: x_return_status := OKC_API.g_ret_sts_error;
2258: RAISE OKC_API.G_EXCEPTION_ERROR;
2259:
2260: END IF;
2261:

Line 2258: RAISE OKC_API.G_EXCEPTION_ERROR;

2254: , p_token1 => 'COL_NAME'
2255: , p_token1_value => l_amt_ak_prompt
2256: );
2257: x_return_status := OKC_API.g_ret_sts_error;
2258: RAISE OKC_API.G_EXCEPTION_ERROR;
2259:
2260: END IF;
2261:
2262: END IF;

Line 2279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2275: p_name => l_clev_rec.name,
2276: p_object_code => l_cimv_rec.jtot_object1_code
2277: );
2278:
2279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2280: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2282: raise OKC_API.G_EXCEPTION_ERROR;
2283: END IF;

Line 2280: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2276: p_object_code => l_cimv_rec.jtot_object1_code
2277: );
2278:
2279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2280: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2282: raise OKC_API.G_EXCEPTION_ERROR;
2283: END IF;
2284:

Line 2281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2277: );
2278:
2279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2280: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2282: raise OKC_API.G_EXCEPTION_ERROR;
2283: END IF;
2284:
2285: open get_k_dates_csr(l_clev_rec.cle_id);

Line 2282: raise OKC_API.G_EXCEPTION_ERROR;

2278:
2279: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2280: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2281: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2282: raise OKC_API.G_EXCEPTION_ERROR;
2283: END IF;
2284:
2285: open get_k_dates_csr(l_clev_rec.cle_id);
2286: fetch get_k_dates_csr into l_start_date, l_end_date;

Line 2303: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2299: p_klev_rec => l_klev_rec,
2300: x_clev_rec => x_clev_rec,
2301: x_klev_rec => x_klev_rec);
2302:
2303: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2304: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2305: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2306: raise OKC_API.G_EXCEPTION_ERROR;
2307: END IF;

Line 2304: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2300: x_clev_rec => x_clev_rec,
2301: x_klev_rec => x_klev_rec);
2302:
2303: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2304: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2305: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2306: raise OKC_API.G_EXCEPTION_ERROR;
2307: END IF;
2308:

Line 2305: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2301: x_klev_rec => x_klev_rec);
2302:
2303: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2304: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2305: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2306: raise OKC_API.G_EXCEPTION_ERROR;
2307: END IF;
2308:
2309: l_cimv_rec.cle_id := x_clev_rec.id;

Line 2306: raise OKC_API.G_EXCEPTION_ERROR;

2302:
2303: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2304: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2305: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2306: raise OKC_API.G_EXCEPTION_ERROR;
2307: END IF;
2308:
2309: l_cimv_rec.cle_id := x_clev_rec.id;
2310:

Line 2324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

2320: p_cimv_rec => l_cimv_rec,
2321: x_cimv_rec => x_cimv_rec);
2322:
2323: -- check return status
2324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2327: raise OKC_API.G_EXCEPTION_ERROR;
2328: End If;

Line 2325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2321: x_cimv_rec => x_cimv_rec);
2322:
2323: -- check return status
2324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2327: raise OKC_API.G_EXCEPTION_ERROR;
2328: End If;
2329: /*

Line 2326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

2322:
2323: -- check return status
2324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2327: raise OKC_API.G_EXCEPTION_ERROR;
2328: End If;
2329: /*
2330: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

Line 2327: raise OKC_API.G_EXCEPTION_ERROR;

2323: -- check return status
2324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2327: raise OKC_API.G_EXCEPTION_ERROR;
2328: End If;
2329: /*
2330: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2331: */

Line 2330: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

2326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2327: raise OKC_API.G_EXCEPTION_ERROR;
2328: End If;
2329: /*
2330: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2331: */
2332:
2333: EXCEPTION
2334: when OKC_API.G_EXCEPTION_ERROR then

Line 2334: when OKC_API.G_EXCEPTION_ERROR then

2330: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2331: */
2332:
2333: EXCEPTION
2334: when OKC_API.G_EXCEPTION_ERROR then
2335: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2336: p_api_name => l_api_name,
2337: p_pkg_name => g_pkg_name,
2338: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 2335: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2331: */
2332:
2333: EXCEPTION
2334: when OKC_API.G_EXCEPTION_ERROR then
2335: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2336: p_api_name => l_api_name,
2337: p_pkg_name => g_pkg_name,
2338: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2339: x_msg_count => x_msg_count,

Line 2338: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

2334: when OKC_API.G_EXCEPTION_ERROR then
2335: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2336: p_api_name => l_api_name,
2337: p_pkg_name => g_pkg_name,
2338: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2339: x_msg_count => x_msg_count,
2340: x_msg_data => x_msg_data,
2341: p_api_type => g_api_type);
2342:

Line 2343: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

2339: x_msg_count => x_msg_count,
2340: x_msg_data => x_msg_data,
2341: p_api_type => g_api_type);
2342:
2343: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2344: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2345: p_api_name => l_api_name,
2346: p_pkg_name => g_pkg_name,
2347: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2344: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2340: x_msg_data => x_msg_data,
2341: p_api_type => g_api_type);
2342:
2343: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2344: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2345: p_api_name => l_api_name,
2346: p_pkg_name => g_pkg_name,
2347: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2348: x_msg_count => x_msg_count,

Line 2347: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

2343: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2344: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2345: p_api_name => l_api_name,
2346: p_pkg_name => g_pkg_name,
2347: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2348: x_msg_count => x_msg_count,
2349: x_msg_data => x_msg_data,
2350: p_api_type => g_api_type);
2351:

Line 2353: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2349: x_msg_data => x_msg_data,
2350: p_api_type => g_api_type);
2351:
2352: when OTHERS then
2353: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2354: p_api_name => l_api_name,
2355: p_pkg_name => g_pkg_name,
2356: p_exc_name => 'OTHERS',
2357: x_msg_count => x_msg_count,

Line 2372: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2368: -- Version : 1.0
2369: -- End of comments
2370: PROCEDURE create_contract_line_item(
2371: p_api_version IN NUMBER,
2372: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2373: x_return_status OUT NOCOPY VARCHAR2,
2374: x_msg_count OUT NOCOPY NUMBER,
2375: x_msg_data OUT NOCOPY VARCHAR2,
2376: p_clev_tbl IN clev_tbl_type,

Line 2385: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2381: x_cimv_tbl OUT NOCOPY cimv_tbl_type) IS
2382:
2383: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_line_item';
2384: l_api_version CONSTANT NUMBER := 1.0;
2385: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2386: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2387: i NUMBER;
2388: l_klev_tbl klev_tbl_type := p_klev_tbl;
2389: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

Line 2386: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2382:
2383: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_line_item';
2384: l_api_version CONSTANT NUMBER := 1.0;
2385: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2386: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2387: i NUMBER;
2388: l_klev_tbl klev_tbl_type := p_klev_tbl;
2389: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
2390: BEGIN

Line 2395: x_return_status := OKC_API.START_ACTIVITY(

2391:
2392: /*
2393: -- call START_ACTIVITY to create savepoint, check compatibility
2394: -- and initialize message list
2395: x_return_status := OKC_API.START_ACTIVITY(
2396: p_api_name => l_api_name,
2397: p_pkg_name => g_pkg_name,
2398: p_init_msg_list => p_init_msg_list,
2399: l_api_version => l_api_version,

Line 2405: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

2401: p_api_type => g_api_type,
2402: x_return_status => x_return_status);
2403:
2404: -- check if activity started successfully
2405: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2406: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2407: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2408: raise OKC_API.G_EXCEPTION_ERROR;
2409: End If;

Line 2406: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2402: x_return_status => x_return_status);
2403:
2404: -- check if activity started successfully
2405: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2406: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2407: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2408: raise OKC_API.G_EXCEPTION_ERROR;
2409: End If;
2410: */

Line 2407: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

2403:
2404: -- check if activity started successfully
2405: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2406: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2407: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2408: raise OKC_API.G_EXCEPTION_ERROR;
2409: End If;
2410: */
2411:

Line 2408: raise OKC_API.G_EXCEPTION_ERROR;

2404: -- check if activity started successfully
2405: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2406: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2407: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2408: raise OKC_API.G_EXCEPTION_ERROR;
2409: End If;
2410: */
2411:
2412: If (p_clev_tbl.COUNT > 0) Then

Line 2429: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

2425: x_clev_rec => x_clev_tbl(i),
2426: x_klev_rec => x_klev_tbl(i),
2427: x_cimv_rec => x_cimv_tbl(i));
2428:
2429: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2430: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2431: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2432: raise OKC_API.G_EXCEPTION_ERROR;
2433: End If;

Line 2430: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2426: x_klev_rec => x_klev_tbl(i),
2427: x_cimv_rec => x_cimv_tbl(i));
2428:
2429: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2430: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2431: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2432: raise OKC_API.G_EXCEPTION_ERROR;
2433: End If;
2434:

Line 2431: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

2427: x_cimv_rec => x_cimv_tbl(i));
2428:
2429: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2430: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2431: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2432: raise OKC_API.G_EXCEPTION_ERROR;
2433: End If;
2434:
2435: EXIT WHEN (i = p_clev_tbl.LAST);

Line 2432: raise OKC_API.G_EXCEPTION_ERROR;

2428:
2429: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2430: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2431: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2432: raise OKC_API.G_EXCEPTION_ERROR;
2433: End If;
2434:
2435: EXIT WHEN (i = p_clev_tbl.LAST);
2436: i := p_clev_tbl.NEXT(i);

Line 2442: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

2438:
2439: End If;
2440:
2441: /*
2442: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
2443: x_msg_data => x_msg_data);
2444: */
2445:
2446: EXCEPTION

Line 2447: when OKC_API.G_EXCEPTION_ERROR then

2443: x_msg_data => x_msg_data);
2444: */
2445:
2446: EXCEPTION
2447: when OKC_API.G_EXCEPTION_ERROR then
2448: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2449: p_api_name => l_api_name,
2450: p_pkg_name => g_pkg_name,
2451: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 2448: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2444: */
2445:
2446: EXCEPTION
2447: when OKC_API.G_EXCEPTION_ERROR then
2448: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2449: p_api_name => l_api_name,
2450: p_pkg_name => g_pkg_name,
2451: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2452: x_msg_count => x_msg_count,

Line 2451: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

2447: when OKC_API.G_EXCEPTION_ERROR then
2448: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2449: p_api_name => l_api_name,
2450: p_pkg_name => g_pkg_name,
2451: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2452: x_msg_count => x_msg_count,
2453: x_msg_data => x_msg_data,
2454: p_api_type => g_api_type);
2455:

Line 2456: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

2452: x_msg_count => x_msg_count,
2453: x_msg_data => x_msg_data,
2454: p_api_type => g_api_type);
2455:
2456: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2457: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2458: p_api_name => l_api_name,
2459: p_pkg_name => g_pkg_name,
2460: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2457: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2453: x_msg_data => x_msg_data,
2454: p_api_type => g_api_type);
2455:
2456: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2457: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2458: p_api_name => l_api_name,
2459: p_pkg_name => g_pkg_name,
2460: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2461: x_msg_count => x_msg_count,

Line 2460: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

2456: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2457: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2458: p_api_name => l_api_name,
2459: p_pkg_name => g_pkg_name,
2460: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2461: x_msg_count => x_msg_count,
2462: x_msg_data => x_msg_data,
2463: p_api_type => g_api_type);
2464:

Line 2466: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2462: x_msg_data => x_msg_data,
2463: p_api_type => g_api_type);
2464:
2465: when OTHERS then
2466: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2467: p_api_name => l_api_name,
2468: p_pkg_name => g_pkg_name,
2469: p_exc_name => 'OTHERS',
2470: x_msg_count => x_msg_count,

Line 2487: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2483: -- Version : 1.0
2484: -- End of comments
2485: PROCEDURE update_contract_line_item(
2486: p_api_version IN NUMBER,
2487: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2488: x_return_status OUT NOCOPY VARCHAR2,
2489: x_msg_count OUT NOCOPY NUMBER,
2490: x_msg_data OUT NOCOPY VARCHAR2,
2491: p_clev_rec IN clev_rec_type,

Line 2507: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2503: l_amt_ak_prompt AK_ATTRIBUTES_VL.attribute_label_long%type;
2504:
2505: l_api_name CONSTANT VARCHAR2(30) := 'update_contract_line_item';
2506: l_api_version CONSTANT NUMBER := 1.0;
2507: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2508:
2509: CURSOR get_k_dates_csr(l_id NUMBER) IS
2510: select chr.start_date, chr.end_date
2511: from okc_k_lines_b chr

Line 2547: x_return_status := OKC_API.START_ACTIVITY(

2543: -- udhenuko Modification End.
2544: /*
2545: -- call START_ACTIVITY to create savepoint, check compatibility
2546: -- and initialize message list
2547: x_return_status := OKC_API.START_ACTIVITY(
2548: p_api_name => l_api_name,
2549: p_pkg_name => g_pkg_name,
2550: p_init_msg_list => p_init_msg_list,
2551: l_api_version => l_api_version,

Line 2557: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

2553: p_api_type => g_api_type,
2554: x_return_status => x_return_status);
2555:
2556: -- check if activity started successfully
2557: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2558: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2559: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2560: raise OKC_API.G_EXCEPTION_ERROR;
2561: End If;

Line 2558: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2554: x_return_status => x_return_status);
2555:
2556: -- check if activity started successfully
2557: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2558: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2559: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2560: raise OKC_API.G_EXCEPTION_ERROR;
2561: End If;
2562: */

Line 2559: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

2555:
2556: -- check if activity started successfully
2557: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2558: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2559: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2560: raise OKC_API.G_EXCEPTION_ERROR;
2561: End If;
2562: */
2563:

Line 2560: raise OKC_API.G_EXCEPTION_ERROR;

2556: -- check if activity started successfully
2557: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2558: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2559: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2560: raise OKC_API.G_EXCEPTION_ERROR;
2561: End If;
2562: */
2563:
2564: l_fee_type := null;

Line 2572: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND

2568:
2569: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then
2570:
2571: -- Not null Validation for Asset Number
2572: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2573: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2575: x_return_status := OKC_API.g_ret_sts_error;
2576: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 2573: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN

2569: IF( l_fee_type is not null and l_fee_type = 'CAPITALIZED') Then
2570:
2571: -- Not null Validation for Asset Number
2572: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2573: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2575: x_return_status := OKC_API.g_ret_sts_error;
2576: RAISE OKC_API.G_EXCEPTION_ERROR;
2577: END IF;

Line 2574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

2570:
2571: -- Not null Validation for Asset Number
2572: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2573: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2575: x_return_status := OKC_API.g_ret_sts_error;
2576: RAISE OKC_API.G_EXCEPTION_ERROR;
2577: END IF;
2578:

Line 2575: x_return_status := OKC_API.g_ret_sts_error;

2571: -- Not null Validation for Asset Number
2572: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2573: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2575: x_return_status := OKC_API.g_ret_sts_error;
2576: RAISE OKC_API.G_EXCEPTION_ERROR;
2577: END IF;
2578:
2579: -- Not null Validation for Amount

Line 2576: RAISE OKC_API.G_EXCEPTION_ERROR;

2572: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2573: (l_klev_rec.capital_amount IS NOT NULL OR l_klev_rec.capital_amount <> OKC_API.G_MISS_NUM)) THEN
2574: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2575: x_return_status := OKC_API.g_ret_sts_error;
2576: RAISE OKC_API.G_EXCEPTION_ERROR;
2577: END IF;
2578:
2579: -- Not null Validation for Amount
2580: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND

Line 2580: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND

2576: RAISE OKC_API.G_EXCEPTION_ERROR;
2577: END IF;
2578:
2579: -- Not null Validation for Amount
2580: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2581: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN
2582:
2583: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2584: OKC_API.SET_MESSAGE( p_app_name => g_app_name

Line 2581: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN

2577: END IF;
2578:
2579: -- Not null Validation for Amount
2580: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2581: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN
2582:
2583: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2584: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2585: , p_msg_name => 'OKL_AMOUNT_FORMAT'

Line 2584: OKC_API.SET_MESSAGE( p_app_name => g_app_name

2580: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2581: (l_klev_rec.capital_amount IS NULL OR l_klev_rec.capital_amount = OKC_API.G_MISS_NUM)) THEN
2582:
2583: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2584: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2585: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2586: , p_token1 => 'COL_NAME'
2587: , p_token1_value => l_amt_ak_prompt
2588: );

Line 2589: x_return_status := OKC_API.g_ret_sts_error;

2585: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2586: , p_token1 => 'COL_NAME'
2587: , p_token1_value => l_amt_ak_prompt
2588: );
2589: x_return_status := OKC_API.g_ret_sts_error;
2590: RAISE OKC_API.G_EXCEPTION_ERROR;
2591: END IF;
2592:
2593: --Bug#4664176

Line 2590: RAISE OKC_API.G_EXCEPTION_ERROR;

2586: , p_token1 => 'COL_NAME'
2587: , p_token1_value => l_amt_ak_prompt
2588: );
2589: x_return_status := OKC_API.g_ret_sts_error;
2590: RAISE OKC_API.G_EXCEPTION_ERROR;
2591: END IF;
2592:
2593: --Bug#4664176
2594: --Bug#4635028

Line 2605: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND

2601: l_amount := l_klev_rec.amount;
2602: END IF;
2603:
2604: -- Not null Validation for Asset Number
2605: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2606: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2607:
2608: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2609: x_return_status := OKC_API.g_ret_sts_error;

Line 2606: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN

2602: END IF;
2603:
2604: -- Not null Validation for Asset Number
2605: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2606: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2607:
2608: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2609: x_return_status := OKC_API.g_ret_sts_error;
2610: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 2608: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');

2604: -- Not null Validation for Asset Number
2605: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2606: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2607:
2608: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2609: x_return_status := OKC_API.g_ret_sts_error;
2610: RAISE OKC_API.G_EXCEPTION_ERROR;
2611:
2612: END IF;

Line 2609: x_return_status := OKC_API.g_ret_sts_error;

2605: IF ((l_clev_rec.name = OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NULL) AND
2606: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2607:
2608: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2609: x_return_status := OKC_API.g_ret_sts_error;
2610: RAISE OKC_API.G_EXCEPTION_ERROR;
2611:
2612: END IF;
2613:

Line 2610: RAISE OKC_API.G_EXCEPTION_ERROR;

2606: (l_amount IS NOT NULL OR l_amount <> OKC_API.G_MISS_NUM)) THEN
2607:
2608: OKC_API.SET_MESSAGE(p_app_name => g_app_name, p_msg_name => 'OKL_LLA_ASSET_REQUIRED');
2609: x_return_status := OKC_API.g_ret_sts_error;
2610: RAISE OKC_API.G_EXCEPTION_ERROR;
2611:
2612: END IF;
2613:
2614: -- Not null Validation for Amount

Line 2615: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND

2611:
2612: END IF;
2613:
2614: -- Not null Validation for Amount
2615: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2616: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN
2617:
2618: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2619: OKC_API.SET_MESSAGE( p_app_name => g_app_name

Line 2616: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN

2612: END IF;
2613:
2614: -- Not null Validation for Amount
2615: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2616: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN
2617:
2618: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2619: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2620: , p_msg_name => 'OKL_AMOUNT_FORMAT'

Line 2619: OKC_API.SET_MESSAGE( p_app_name => g_app_name

2615: IF ((l_clev_rec.name <> OKC_API.G_MISS_CHAR OR l_clev_rec.name IS NOT NULL) AND
2616: (l_amount IS NULL OR l_amount = OKC_API.G_MISS_NUM)) THEN
2617:
2618: l_amt_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_AMOUNT');
2619: OKC_API.SET_MESSAGE( p_app_name => g_app_name
2620: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2621: , p_token1 => 'COL_NAME'
2622: , p_token1_value => l_amt_ak_prompt
2623: );

Line 2624: x_return_status := OKC_API.g_ret_sts_error;

2620: , p_msg_name => 'OKL_AMOUNT_FORMAT'
2621: , p_token1 => 'COL_NAME'
2622: , p_token1_value => l_amt_ak_prompt
2623: );
2624: x_return_status := OKC_API.g_ret_sts_error;
2625: RAISE OKC_API.G_EXCEPTION_ERROR;
2626:
2627: END IF;
2628:

Line 2625: RAISE OKC_API.G_EXCEPTION_ERROR;

2621: , p_token1 => 'COL_NAME'
2622: , p_token1_value => l_amt_ak_prompt
2623: );
2624: x_return_status := OKC_API.g_ret_sts_error;
2625: RAISE OKC_API.G_EXCEPTION_ERROR;
2626:
2627: END IF;
2628:
2629: END IF;

Line 2645: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2641: p_name => l_clev_rec.name,
2642: p_object_code => l_cimv_rec.jtot_object1_code
2643: );
2644:
2645: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2646: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2647: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2648: raise OKC_API.G_EXCEPTION_ERROR;
2649: END IF;

Line 2646: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2642: p_object_code => l_cimv_rec.jtot_object1_code
2643: );
2644:
2645: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2646: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2647: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2648: raise OKC_API.G_EXCEPTION_ERROR;
2649: END IF;
2650: */

Line 2647: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2643: );
2644:
2645: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2646: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2647: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2648: raise OKC_API.G_EXCEPTION_ERROR;
2649: END IF;
2650: */
2651:

Line 2648: raise OKC_API.G_EXCEPTION_ERROR;

2644:
2645: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2646: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2647: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2648: raise OKC_API.G_EXCEPTION_ERROR;
2649: END IF;
2650: */
2651:
2652: -- Bug# 6598350

Line 2682: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2678: x_clev_rec => x_clev_rec,
2679: x_klev_rec => x_klev_rec
2680: );
2681:
2682: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2683: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2684: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2685: raise OKC_API.G_EXCEPTION_ERROR;
2686: END IF;

Line 2683: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2679: x_klev_rec => x_klev_rec
2680: );
2681:
2682: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2683: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2684: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2685: raise OKC_API.G_EXCEPTION_ERROR;
2686: END IF;
2687:

Line 2684: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2680: );
2681:
2682: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2683: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2684: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2685: raise OKC_API.G_EXCEPTION_ERROR;
2686: END IF;
2687:
2688: --

Line 2685: raise OKC_API.G_EXCEPTION_ERROR;

2681:
2682: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2683: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2684: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2685: raise OKC_API.G_EXCEPTION_ERROR;
2686: END IF;
2687:
2688: --
2689: -- call procedure in complex API

Line 2701: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

2697: p_cimv_rec => l_cimv_rec,
2698: x_cimv_rec => x_cimv_rec);
2699:
2700: -- check return status
2701: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2702: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2704: raise OKC_API.G_EXCEPTION_ERROR;
2705: End If;

Line 2702: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2698: x_cimv_rec => x_cimv_rec);
2699:
2700: -- check return status
2701: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2702: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2704: raise OKC_API.G_EXCEPTION_ERROR;
2705: End If;
2706:

Line 2703: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

2699:
2700: -- check return status
2701: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2702: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2704: raise OKC_API.G_EXCEPTION_ERROR;
2705: End If;
2706:
2707: -- Bug# 6598350

Line 2704: raise OKC_API.G_EXCEPTION_ERROR;

2700: -- check return status
2701: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2702: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2704: raise OKC_API.G_EXCEPTION_ERROR;
2705: End If;
2706:
2707: -- Bug# 6598350
2708: -- When the service line start date is changed, update the

Line 2734: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

2730: END IF;
2731: -- Bug# 6598350
2732:
2733: /*
2734: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2735: */
2736:
2737: EXCEPTION
2738: when OKC_API.G_EXCEPTION_ERROR then

Line 2738: when OKC_API.G_EXCEPTION_ERROR then

2734: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
2735: */
2736:
2737: EXCEPTION
2738: when OKC_API.G_EXCEPTION_ERROR then
2739: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2740: p_api_name => l_api_name,
2741: p_pkg_name => g_pkg_name,
2742: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 2739: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2735: */
2736:
2737: EXCEPTION
2738: when OKC_API.G_EXCEPTION_ERROR then
2739: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2740: p_api_name => l_api_name,
2741: p_pkg_name => g_pkg_name,
2742: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2743: x_msg_count => x_msg_count,

Line 2742: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

2738: when OKC_API.G_EXCEPTION_ERROR then
2739: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2740: p_api_name => l_api_name,
2741: p_pkg_name => g_pkg_name,
2742: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2743: x_msg_count => x_msg_count,
2744: x_msg_data => x_msg_data,
2745: p_api_type => g_api_type);
2746:

Line 2747: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

2743: x_msg_count => x_msg_count,
2744: x_msg_data => x_msg_data,
2745: p_api_type => g_api_type);
2746:
2747: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2748: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2749: p_api_name => l_api_name,
2750: p_pkg_name => g_pkg_name,
2751: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2748: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2744: x_msg_data => x_msg_data,
2745: p_api_type => g_api_type);
2746:
2747: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2748: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2749: p_api_name => l_api_name,
2750: p_pkg_name => g_pkg_name,
2751: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2752: x_msg_count => x_msg_count,

Line 2751: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

2747: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2748: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2749: p_api_name => l_api_name,
2750: p_pkg_name => g_pkg_name,
2751: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2752: x_msg_count => x_msg_count,
2753: x_msg_data => x_msg_data,
2754: p_api_type => g_api_type);
2755:

Line 2757: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2753: x_msg_data => x_msg_data,
2754: p_api_type => g_api_type);
2755:
2756: when OTHERS then
2757: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2758: p_api_name => l_api_name,
2759: p_pkg_name => g_pkg_name,
2760: p_exc_name => 'OTHERS',
2761: x_msg_count => x_msg_count,

Line 2777: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2773: -- Version : 1.0
2774: -- End of comments
2775: PROCEDURE update_contract_line_item(
2776: p_api_version IN NUMBER,
2777: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2778: x_return_status OUT NOCOPY VARCHAR2,
2779: x_msg_count OUT NOCOPY NUMBER,
2780: x_msg_data OUT NOCOPY VARCHAR2,
2781: p_clev_tbl IN clev_tbl_type,

Line 2790: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2786: x_cimv_tbl OUT NOCOPY cimv_tbl_type) IS
2787:
2788: l_api_name CONSTANT VARCHAR2(30) := 'update_contract_line_item';
2789: l_api_version CONSTANT NUMBER := 1.0;
2790: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2791: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2792: i NUMBER;
2793: l_klev_tbl klev_tbl_type := p_klev_tbl;
2794: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

Line 2791: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2787:
2788: l_api_name CONSTANT VARCHAR2(30) := 'update_contract_line_item';
2789: l_api_version CONSTANT NUMBER := 1.0;
2790: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2791: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2792: i NUMBER;
2793: l_klev_tbl klev_tbl_type := p_klev_tbl;
2794: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
2795: BEGIN

Line 2799: x_return_status := OKC_API.START_ACTIVITY(

2795: BEGIN
2796: /*
2797: -- call START_ACTIVITY to create savepoint, check compatibility
2798: -- and initialize message list
2799: x_return_status := OKC_API.START_ACTIVITY(
2800: p_api_name => l_api_name,
2801: p_pkg_name => g_pkg_name,
2802: p_init_msg_list => p_init_msg_list,
2803: l_api_version => l_api_version,

Line 2809: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

2805: p_api_type => g_api_type,
2806: x_return_status => x_return_status);
2807:
2808: -- check if activity started successfully
2809: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2810: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2812: raise OKC_API.G_EXCEPTION_ERROR;
2813: End If;

Line 2810: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2806: x_return_status => x_return_status);
2807:
2808: -- check if activity started successfully
2809: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2810: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2812: raise OKC_API.G_EXCEPTION_ERROR;
2813: End If;
2814: */

Line 2811: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

2807:
2808: -- check if activity started successfully
2809: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2810: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2812: raise OKC_API.G_EXCEPTION_ERROR;
2813: End If;
2814: */
2815:

Line 2812: raise OKC_API.G_EXCEPTION_ERROR;

2808: -- check if activity started successfully
2809: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2810: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2811: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
2812: raise OKC_API.G_EXCEPTION_ERROR;
2813: End If;
2814: */
2815:
2816: If (p_clev_tbl.COUNT > 0) Then

Line 2833: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

2829: x_clev_rec => x_clev_tbl(i),
2830: x_klev_rec => x_klev_tbl(i),
2831: x_cimv_rec => x_cimv_tbl(i));
2832:
2833: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2834: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2835: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2836: raise OKC_API.G_EXCEPTION_ERROR;
2837: End If;

Line 2834: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2830: x_klev_rec => x_klev_tbl(i),
2831: x_cimv_rec => x_cimv_tbl(i));
2832:
2833: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2834: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2835: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2836: raise OKC_API.G_EXCEPTION_ERROR;
2837: End If;
2838:

Line 2835: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

2831: x_cimv_rec => x_cimv_tbl(i));
2832:
2833: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2834: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2835: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2836: raise OKC_API.G_EXCEPTION_ERROR;
2837: End If;
2838:
2839: EXIT WHEN (i = p_clev_tbl.LAST);

Line 2836: raise OKC_API.G_EXCEPTION_ERROR;

2832:
2833: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2834: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2835: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2836: raise OKC_API.G_EXCEPTION_ERROR;
2837: End If;
2838:
2839: EXIT WHEN (i = p_clev_tbl.LAST);
2840: i := p_clev_tbl.NEXT(i);

Line 2846: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

2842:
2843: End If;
2844:
2845: /*
2846: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
2847: x_msg_data => x_msg_data);
2848: */
2849:
2850: EXCEPTION

Line 2851: when OKC_API.G_EXCEPTION_ERROR then

2847: x_msg_data => x_msg_data);
2848: */
2849:
2850: EXCEPTION
2851: when OKC_API.G_EXCEPTION_ERROR then
2852: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2853: p_api_name => l_api_name,
2854: p_pkg_name => g_pkg_name,
2855: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 2852: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2848: */
2849:
2850: EXCEPTION
2851: when OKC_API.G_EXCEPTION_ERROR then
2852: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2853: p_api_name => l_api_name,
2854: p_pkg_name => g_pkg_name,
2855: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2856: x_msg_count => x_msg_count,

Line 2855: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

2851: when OKC_API.G_EXCEPTION_ERROR then
2852: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2853: p_api_name => l_api_name,
2854: p_pkg_name => g_pkg_name,
2855: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2856: x_msg_count => x_msg_count,
2857: x_msg_data => x_msg_data,
2858: p_api_type => g_api_type);
2859:

Line 2860: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

2856: x_msg_count => x_msg_count,
2857: x_msg_data => x_msg_data,
2858: p_api_type => g_api_type);
2859:
2860: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2861: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2862: p_api_name => l_api_name,
2863: p_pkg_name => g_pkg_name,
2864: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2861: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2857: x_msg_data => x_msg_data,
2858: p_api_type => g_api_type);
2859:
2860: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2861: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2862: p_api_name => l_api_name,
2863: p_pkg_name => g_pkg_name,
2864: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2865: x_msg_count => x_msg_count,

Line 2864: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

2860: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2861: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2862: p_api_name => l_api_name,
2863: p_pkg_name => g_pkg_name,
2864: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2865: x_msg_count => x_msg_count,
2866: x_msg_data => x_msg_data,
2867: p_api_type => g_api_type);
2868:

Line 2870: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

2866: x_msg_data => x_msg_data,
2867: p_api_type => g_api_type);
2868:
2869: when OTHERS then
2870: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2871: p_api_name => l_api_name,
2872: p_pkg_name => g_pkg_name,
2873: p_exc_name => 'OTHERS',
2874: x_msg_count => x_msg_count,

Line 2883: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2879:
2880:
2881: PROCEDURE delete_contract_line_item(
2882: p_api_version IN NUMBER,
2883: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2884: x_return_status OUT NOCOPY VARCHAR2,
2885: x_msg_count OUT NOCOPY NUMBER,
2886: x_msg_data OUT NOCOPY VARCHAR2,
2887: p_clev_rec IN clev_rec_type,

Line 2938: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2934: l_cimv_rec cimv_rec_type;
2935:
2936: l_api_name CONSTANT VARCHAR2(30) := 'delete_contract_line_item';
2937: l_api_version CONSTANT NUMBER := 1.0;
2938: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2939:
2940: --Bug# 3877032 : cursor to determine if linked asset line
2941: -- corresponding to CAPITALIZED fee is being deleted
2942: cursor l_cap_fee_asst_csr (p_cle_id in number,

Line 2996: x_return_status := OKC_API.START_ACTIVITY(

2992: BEGIN
2993: /*
2994: -- call START_ACTIVITY to create savepoint, check compatibility
2995: -- and initialize message list
2996: x_return_status := OKC_API.START_ACTIVITY(
2997: p_api_name => l_api_name,
2998: p_pkg_name => g_pkg_name,
2999: p_init_msg_list => p_init_msg_list,
3000: l_api_version => l_api_version,

Line 3006: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

3002: p_api_type => g_api_type,
3003: x_return_status => x_return_status);
3004:
3005: -- check if activity started successfully
3006: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3007: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3008: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3009: raise OKC_API.G_EXCEPTION_ERROR;
3010: End If;

Line 3007: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3003: x_return_status => x_return_status);
3004:
3005: -- check if activity started successfully
3006: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3007: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3008: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3009: raise OKC_API.G_EXCEPTION_ERROR;
3010: End If;
3011: */

Line 3008: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

3004:
3005: -- check if activity started successfully
3006: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3007: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3008: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3009: raise OKC_API.G_EXCEPTION_ERROR;
3010: End If;
3011: */
3012:

Line 3009: raise OKC_API.G_EXCEPTION_ERROR;

3005: -- check if activity started successfully
3006: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3007: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3008: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3009: raise OKC_API.G_EXCEPTION_ERROR;
3010: End If;
3011: */
3012:
3013: --Bug# 4899328

Line 3069: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

3065: x_msg_data => x_msg_data,
3066: p_cimv_rec => l_cimv_rec);
3067:
3068: -- check return status
3069: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3070: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3071: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3072: raise OKC_API.G_EXCEPTION_ERROR;
3073: End If;

Line 3070: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3066: p_cimv_rec => l_cimv_rec);
3067:
3068: -- check return status
3069: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3070: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3071: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3072: raise OKC_API.G_EXCEPTION_ERROR;
3073: End If;
3074:

Line 3071: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

3067:
3068: -- check return status
3069: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3070: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3071: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3072: raise OKC_API.G_EXCEPTION_ERROR;
3073: End If;
3074:
3075: okl_contract_pvt.delete_contract_line(

Line 3072: raise OKC_API.G_EXCEPTION_ERROR;

3068: -- check return status
3069: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3070: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3071: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3072: raise OKC_API.G_EXCEPTION_ERROR;
3073: End If;
3074:
3075: okl_contract_pvt.delete_contract_line(
3076: p_api_version => p_api_version,

Line 3085: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3081: p_clev_rec => l_clev_rec,
3082: p_klev_rec => l_klev_rec
3083: );
3084:
3085: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3086: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3087: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3088: raise OKC_API.G_EXCEPTION_ERROR;
3089: END IF;

Line 3086: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3082: p_klev_rec => l_klev_rec
3083: );
3084:
3085: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3086: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3087: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3088: raise OKC_API.G_EXCEPTION_ERROR;
3089: END IF;
3090:

Line 3087: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

3083: );
3084:
3085: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3086: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3087: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3088: raise OKC_API.G_EXCEPTION_ERROR;
3089: END IF;
3090:
3091: --Bug# 3877032

Line 3088: raise OKC_API.G_EXCEPTION_ERROR;

3084:
3085: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3086: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3087: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3088: raise OKC_API.G_EXCEPTION_ERROR;
3089: END IF;
3090:
3091: --Bug# 3877032
3092: If l_fin_klev_tbl.COUNT > 0 then

Line 3104: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

3100: p_formula_name => 'LINE_CAP_AMNT',
3101: p_contract_id => l_fin_clev_tbl(i).dnz_chr_id,
3102: p_line_id => l_fin_clev_tbl(i).id,
3103: x_value => l_fin_klev_tbl(i).capital_amount);
3104: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3105: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3106: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3107: raise OKC_API.G_EXCEPTION_ERROR;
3108: End If;

Line 3105: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3101: p_contract_id => l_fin_clev_tbl(i).dnz_chr_id,
3102: p_line_id => l_fin_clev_tbl(i).id,
3103: x_value => l_fin_klev_tbl(i).capital_amount);
3104: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3105: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3106: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3107: raise OKC_API.G_EXCEPTION_ERROR;
3108: End If;
3109: End Loop;

Line 3106: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

3102: p_line_id => l_fin_clev_tbl(i).id,
3103: x_value => l_fin_klev_tbl(i).capital_amount);
3104: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3105: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3106: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3107: raise OKC_API.G_EXCEPTION_ERROR;
3108: End If;
3109: End Loop;
3110:

Line 3107: raise OKC_API.G_EXCEPTION_ERROR;

3103: x_value => l_fin_klev_tbl(i).capital_amount);
3104: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3105: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3106: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3107: raise OKC_API.G_EXCEPTION_ERROR;
3108: End If;
3109: End Loop;
3110:
3111: okl_contract_pub.update_contract_line(p_api_version => p_api_version,

Line 3121: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

3117: p_klev_tbl => l_fin_klev_tbl,
3118: x_clev_tbl => lx_fin_clev_tbl,
3119: x_klev_tbl => lx_fin_klev_tbl);
3120:
3121: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3122: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3123: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3124: raise OKC_API.G_EXCEPTION_ERROR;
3125: End If;

Line 3122: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3118: x_clev_tbl => lx_fin_clev_tbl,
3119: x_klev_tbl => lx_fin_klev_tbl);
3120:
3121: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3122: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3123: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3124: raise OKC_API.G_EXCEPTION_ERROR;
3125: End If;
3126:

Line 3123: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

3119: x_klev_tbl => lx_fin_klev_tbl);
3120:
3121: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3122: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3123: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3124: raise OKC_API.G_EXCEPTION_ERROR;
3125: End If;
3126:
3127: --Bug# 4899328

Line 3124: raise OKC_API.G_EXCEPTION_ERROR;

3120:
3121: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3122: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3123: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3124: raise OKC_API.G_EXCEPTION_ERROR;
3125: End If;
3126:
3127: --Bug# 4899328
3128: -- Recalculate Asset depreciation cost when there

Line 3203: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

3199: -- END, Code change to enable Business Event
3200: */
3201:
3202: /*
3203: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
3204: */
3205:
3206: EXCEPTION
3207: when OKC_API.G_EXCEPTION_ERROR then

Line 3207: when OKC_API.G_EXCEPTION_ERROR then

3203: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
3204: */
3205:
3206: EXCEPTION
3207: when OKC_API.G_EXCEPTION_ERROR then
3208: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3209: p_api_name => l_api_name,
3210: p_pkg_name => g_pkg_name,
3211: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 3208: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

3204: */
3205:
3206: EXCEPTION
3207: when OKC_API.G_EXCEPTION_ERROR then
3208: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3209: p_api_name => l_api_name,
3210: p_pkg_name => g_pkg_name,
3211: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
3212: x_msg_count => x_msg_count,

Line 3211: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

3207: when OKC_API.G_EXCEPTION_ERROR then
3208: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3209: p_api_name => l_api_name,
3210: p_pkg_name => g_pkg_name,
3211: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
3212: x_msg_count => x_msg_count,
3213: x_msg_data => x_msg_data,
3214: p_api_type => g_api_type);
3215:

Line 3216: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

3212: x_msg_count => x_msg_count,
3213: x_msg_data => x_msg_data,
3214: p_api_type => g_api_type);
3215:
3216: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
3217: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3218: p_api_name => l_api_name,
3219: p_pkg_name => g_pkg_name,
3220: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 3217: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

3213: x_msg_data => x_msg_data,
3214: p_api_type => g_api_type);
3215:
3216: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
3217: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3218: p_api_name => l_api_name,
3219: p_pkg_name => g_pkg_name,
3220: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
3221: x_msg_count => x_msg_count,

Line 3220: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

3216: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
3217: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3218: p_api_name => l_api_name,
3219: p_pkg_name => g_pkg_name,
3220: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
3221: x_msg_count => x_msg_count,
3222: x_msg_data => x_msg_data,
3223: p_api_type => g_api_type);
3224:

Line 3226: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

3222: x_msg_data => x_msg_data,
3223: p_api_type => g_api_type);
3224:
3225: when OTHERS then
3226: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3227: p_api_name => l_api_name,
3228: p_pkg_name => g_pkg_name,
3229: p_exc_name => 'OTHERS',
3230: x_msg_count => x_msg_count,

Line 3245: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

3241: -- Version : 1.0
3242: -- End of comments
3243: PROCEDURE delete_contract_line_item(
3244: p_api_version IN NUMBER,
3245: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3246: x_return_status OUT NOCOPY VARCHAR2,
3247: x_msg_count OUT NOCOPY NUMBER,
3248: x_msg_data OUT NOCOPY VARCHAR2,
3249: p_clev_tbl IN clev_tbl_type,

Line 3255: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

3251: p_cimv_tbl IN cimv_tbl_type) IS
3252:
3253: l_api_name CONSTANT VARCHAR2(30) := 'delete_contract_line_item';
3254: l_api_version CONSTANT NUMBER := 1.0;
3255: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3256: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3257: i NUMBER;
3258: l_klev_tbl klev_tbl_type := p_klev_tbl;
3259: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

Line 3256: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

3252:
3253: l_api_name CONSTANT VARCHAR2(30) := 'delete_contract_line_item';
3254: l_api_version CONSTANT NUMBER := 1.0;
3255: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3256: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3257: i NUMBER;
3258: l_klev_tbl klev_tbl_type := p_klev_tbl;
3259: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
3260: BEGIN

Line 3264: x_return_status := OKC_API.START_ACTIVITY(

3260: BEGIN
3261: /*
3262: -- call START_ACTIVITY to create savepoint, check compatibility
3263: -- and initialize message list
3264: x_return_status := OKC_API.START_ACTIVITY(
3265: p_api_name => l_api_name,
3266: p_pkg_name => g_pkg_name,
3267: p_init_msg_list => p_init_msg_list,
3268: l_api_version => l_api_version,

Line 3274: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

3270: p_api_type => g_api_type,
3271: x_return_status => x_return_status);
3272:
3273: -- check if activity started successfully
3274: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3275: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3276: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3277: raise OKC_API.G_EXCEPTION_ERROR;
3278: End If;

Line 3275: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3271: x_return_status => x_return_status);
3272:
3273: -- check if activity started successfully
3274: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3275: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3276: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3277: raise OKC_API.G_EXCEPTION_ERROR;
3278: End If;
3279: */

Line 3276: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

3272:
3273: -- check if activity started successfully
3274: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3275: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3276: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3277: raise OKC_API.G_EXCEPTION_ERROR;
3278: End If;
3279: */
3280:

Line 3277: raise OKC_API.G_EXCEPTION_ERROR;

3273: -- check if activity started successfully
3274: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
3275: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3276: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
3277: raise OKC_API.G_EXCEPTION_ERROR;
3278: End If;
3279: */
3280:
3281: If (p_clev_tbl.COUNT > 0) Then

Line 3295: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

3291: p_clev_rec => p_clev_tbl(i),
3292: p_klev_rec => l_klev_tbl(i),
3293: p_cimv_rec => l_cimv_tbl(i));
3294:
3295: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3296: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3297: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3298: raise OKC_API.G_EXCEPTION_ERROR;
3299: End If;

Line 3296: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3292: p_klev_rec => l_klev_tbl(i),
3293: p_cimv_rec => l_cimv_tbl(i));
3294:
3295: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3296: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3297: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3298: raise OKC_API.G_EXCEPTION_ERROR;
3299: End If;
3300:

Line 3297: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

3293: p_cimv_rec => l_cimv_tbl(i));
3294:
3295: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3296: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3297: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3298: raise OKC_API.G_EXCEPTION_ERROR;
3299: End If;
3300:
3301: EXIT WHEN (i = p_clev_tbl.LAST);

Line 3298: raise OKC_API.G_EXCEPTION_ERROR;

3294:
3295: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
3296: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3297: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
3298: raise OKC_API.G_EXCEPTION_ERROR;
3299: End If;
3300:
3301: EXIT WHEN (i = p_clev_tbl.LAST);
3302: i := p_clev_tbl.NEXT(i);

Line 3308: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

3304:
3305: End If;
3306:
3307: /*
3308: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
3309: x_msg_data => x_msg_data);
3310: */
3311:
3312: EXCEPTION

Line 3313: when OKC_API.G_EXCEPTION_ERROR then

3309: x_msg_data => x_msg_data);
3310: */
3311:
3312: EXCEPTION
3313: when OKC_API.G_EXCEPTION_ERROR then
3314: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3315: p_api_name => l_api_name,
3316: p_pkg_name => g_pkg_name,
3317: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 3314: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

3310: */
3311:
3312: EXCEPTION
3313: when OKC_API.G_EXCEPTION_ERROR then
3314: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3315: p_api_name => l_api_name,
3316: p_pkg_name => g_pkg_name,
3317: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
3318: x_msg_count => x_msg_count,

Line 3317: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

3313: when OKC_API.G_EXCEPTION_ERROR then
3314: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3315: p_api_name => l_api_name,
3316: p_pkg_name => g_pkg_name,
3317: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
3318: x_msg_count => x_msg_count,
3319: x_msg_data => x_msg_data,
3320: p_api_type => g_api_type);
3321:

Line 3322: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

3318: x_msg_count => x_msg_count,
3319: x_msg_data => x_msg_data,
3320: p_api_type => g_api_type);
3321:
3322: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
3323: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3324: p_api_name => l_api_name,
3325: p_pkg_name => g_pkg_name,
3326: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 3323: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

3319: x_msg_data => x_msg_data,
3320: p_api_type => g_api_type);
3321:
3322: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
3323: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3324: p_api_name => l_api_name,
3325: p_pkg_name => g_pkg_name,
3326: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
3327: x_msg_count => x_msg_count,

Line 3326: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

3322: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
3323: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3324: p_api_name => l_api_name,
3325: p_pkg_name => g_pkg_name,
3326: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
3327: x_msg_count => x_msg_count,
3328: x_msg_data => x_msg_data,
3329: p_api_type => g_api_type);
3330:

Line 3332: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

3328: x_msg_data => x_msg_data,
3329: p_api_type => g_api_type);
3330:
3331: when OTHERS then
3332: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
3333: p_api_name => l_api_name,
3334: p_pkg_name => g_pkg_name,
3335: p_exc_name => 'OTHERS',
3336: x_msg_count => x_msg_count,