APPS.OKL_CFP_PVT dependencies on OKC_API

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

396: ---------------------------------
397: PROCEDURE validate_id(
398: p_cfpv_rec IN cfpv_rec_type,
399: x_return_status OUT NOCOPY VARCHAR2) IS
400: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
401: BEGIN
402: IF (p_cfpv_rec.id = OKL_API.G_MISS_NUM OR p_cfpv_rec.id IS NULL)
403: THEN
404: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

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

422: -------------------------------------
423: PROCEDURE validate_cfo_id(
424: p_cfpv_rec IN cfpv_rec_type,
425: x_return_status OUT NOCOPY VARCHAR2) IS
426: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
427: l_dummy_var VARCHAR2(1) := '?';
428:
429: CURSOR okl_cfpv_cfov_fk_csr (p_id IN NUMBER) IS
430: SELECT 'x'

Line 446: OKC_API.set_message(g_app_name,

442: FETCH okl_cfpv_cfov_fk_csr into l_dummy_var ;
443: CLOSE okl_cfpv_cfov_fk_csr ;
444: -- still set to default means data was not found
445: IF ( l_dummy_var = '?' ) THEN
446: OKC_API.set_message(g_app_name,
447: g_no_parent_record,
448: g_col_name_token,
449: 'cfo_id',
450: g_child_table_token ,

Line 454: l_return_status := OKC_API.G_RET_STS_ERROR;

450: g_child_table_token ,
451: 'OKL_CF_OBJECT_PERIODS_V',
452: g_parent_table_token ,
453: 'OKL_CASH_FLOW_OBJECTS_V');
454: l_return_status := OKC_API.G_RET_STS_ERROR;
455:
456: END IF;
457: END IF;
458: x_return_status := l_return_status;

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

472: ---------------------------------------
473: PROCEDURE validate_ptp_code(
474: p_cfpv_rec IN cfpv_rec_type,
475: x_return_status OUT NOCOPY VARCHAR2) IS
476: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
477:
478: l_dummy_var VARCHAR2(1) := '?';
479:
480:

Line 508: l_return_status := OKC_API.G_RET_STS_ERROR;

504: g_child_table_token ,
505: 'OKL_CF_OBJECT_PERIODS_V',
506: g_parent_table_token ,
507: 'FND_LOOKUP_VALUES');
508: l_return_status := OKC_API.G_RET_STS_ERROR;
509:
510: END IF;
511: END IF;
512: x_return_status := l_return_status;

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

526: -----------------------------------------
527: PROCEDURE validate_start_date(
528: p_cfpv_rec IN cfpv_rec_type,
529: x_return_status OUT NOCOPY VARCHAR2) IS
530: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
531: BEGIN
532:
533: IF (p_cfpv_rec.start_date = OKL_API.G_MISS_DATE OR p_cfpv_rec.start_date IS NULL)
534: THEN

Line 570: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

566: -- ***
567: -- id
568: -- ***
569: validate_id(p_cfpv_rec, l_return_status);
570: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
572: x_return_status := l_return_status;
573: RAISE G_EXCEPTION_HALT_VALIDATION;
574: ELSE

Line 571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

567: -- id
568: -- ***
569: validate_id(p_cfpv_rec, l_return_status);
570: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
572: x_return_status := l_return_status;
573: RAISE G_EXCEPTION_HALT_VALIDATION;
574: ELSE
575: x_return_status := l_return_status;

Line 583: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

579: -- ***
580: -- cfo_id
581: -- ***
582: validate_cfo_id(p_cfpv_rec, l_return_status);
583: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
585: x_return_status := l_return_status;
586: RAISE G_EXCEPTION_HALT_VALIDATION;
587: ELSE

Line 584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

580: -- cfo_id
581: -- ***
582: validate_cfo_id(p_cfpv_rec, l_return_status);
583: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
584: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
585: x_return_status := l_return_status;
586: RAISE G_EXCEPTION_HALT_VALIDATION;
587: ELSE
588: x_return_status := l_return_status;

Line 596: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

592: -- ***
593: -- ptp_code
594: -- ***
595: validate_ptp_code(p_cfpv_rec, l_return_status);
596: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
597: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
598: x_return_status := l_return_status;
599: RAISE G_EXCEPTION_HALT_VALIDATION;
600: ELSE

Line 597: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

593: -- ptp_code
594: -- ***
595: validate_ptp_code(p_cfpv_rec, l_return_status);
596: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
597: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
598: x_return_status := l_return_status;
599: RAISE G_EXCEPTION_HALT_VALIDATION;
600: ELSE
601: x_return_status := l_return_status;

Line 609: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

605: -- ***
606: -- start_date
607: -- ***
608: validate_start_date(p_cfpv_rec, l_return_status);
609: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
610: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
611: x_return_status := l_return_status;
612: RAISE G_EXCEPTION_HALT_VALIDATION;
613: ELSE

Line 610: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

606: -- start_date
607: -- ***
608: validate_start_date(p_cfpv_rec, l_return_status);
609: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
610: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
611: x_return_status := l_return_status;
612: RAISE G_EXCEPTION_HALT_VALIDATION;
613: ELSE
614: x_return_status := l_return_status;