APPS.OKL_RULE_PUB dependencies on OKL_API

Line 249: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then

245:
246: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
247: -- edit points for lease contract are any modifications between statuses
248: -- 'PASSED' and 'APPROVED'
249: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then
250:
251: okl_contract_status_pub.cascade_lease_status_edit
252: (p_api_version => p_api_version,
253: p_init_msg_list => p_init_msg_list,

Line 269: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then

265: End If;
266:
267: -- Start 14-Sep-2005 Manu
268: --Flip status of the PROGRAM agreement from 'PASSED' to 'INCOMPLETE'
269: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then
270: OPEN lc_category_csr (p_chr_id => x_rulv_rec.dnz_chr_id);
271: FETCH lc_category_csr INTO l_scs_code;
272: CLOSE lc_category_csr;
273: IF (l_scs_code = 'PROGRAM' ) THEN

Line 501: x_return_status := OKL_API.G_RET_STS_SUCCESS;

497: WHERE id = p_chr_id;
498: l_scs_code OKC_K_HEADERS_V.SCS_CODE%TYPE;
499: -- End 14-Sep-2005 Manu
500: BEGIN
501: x_return_status := OKL_API.G_RET_STS_SUCCESS;
502: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
503: p_init_msg_list,
504: '_PUB',
505: x_return_status);

Line 570: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then

566: If p_edit_mode = 'Y' then
567: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
568: -- edit points for lease contract are any modifications between statuses
569: -- 'PASSED' and 'APPROVED'
570: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then
571:
572: okl_contract_status_pub.cascade_lease_status_edit
573: (p_api_version => p_api_version,
574: p_init_msg_list => p_init_msg_list,

Line 590: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then

586: End If;
587:
588: -- Start 14-Sep-2005 Manu
589: --Flip status of the PROGRAM agreement from 'PASSED' to 'INCOMPLETE'
590: If (x_rulv_rec.dnz_chr_id is not NULL) AND (x_rulv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) Then
591: OPEN lc_category_csr (p_chr_id => x_rulv_rec.dnz_chr_id);
592: FETCH lc_category_csr INTO l_scs_code;
593: CLOSE lc_category_csr;
594: IF (l_scs_code = 'PROGRAM' ) THEN

Line 662: x_return_status := OKL_API.G_RET_STS_SUCCESS;

658: l_rulv_rec_okc_out okc_rulv_rec_type;
659: l_clob clob;
660:
661: BEGIN
662: x_return_status := OKL_API.G_RET_STS_SUCCESS;
663: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
664: p_init_msg_list,
665: '_PUB',
666: x_return_status);

Line 1018: If (p_rulv_rec.dnz_chr_id is NULL OR p_rulv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN

1014:
1015: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
1016: -- edit points for lease contract are any modifications between statuses
1017: -- 'PASSED' and 'APPROVED'
1018: If (p_rulv_rec.dnz_chr_id is NULL OR p_rulv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN
1019: Open chr_id_crs(p_rul_id => p_rulv_rec.id);
1020: Fetch chr_id_crs into l_dnz_chr_id;
1021: If chr_id_crs%NOTFOUND THEN
1022: null;

Line 1029: If (l_dnz_chr_id is not NULL AND l_dnz_chr_id <> OKL_API.G_MISS_NUM) Then

1025: Else
1026: l_dnz_chr_id := p_rulv_rec.dnz_chr_id;
1027: End If;
1028:
1029: If (l_dnz_chr_id is not NULL AND l_dnz_chr_id <> OKL_API.G_MISS_NUM) Then
1030:
1031: okl_contract_status_pub.cascade_lease_status_edit
1032: (p_api_version => p_api_version,
1033: p_init_msg_list => p_init_msg_list,

Line 1049: If (l_dnz_chr_id is not NULL) AND (l_dnz_chr_id <> OKL_API.G_MISS_NUM) Then

1045: End If;
1046:
1047: -- Start 14-Sep-2005 Manu
1048: --Flip status of the PROGRAM agreement from 'PASSED' to 'INCOMPLETE'
1049: If (l_dnz_chr_id is not NULL) AND (l_dnz_chr_id <> OKL_API.G_MISS_NUM) Then
1050: OPEN lc_category_csr (p_chr_id => l_dnz_chr_id);
1051: FETCH lc_category_csr INTO l_scs_code;
1052: CLOSE lc_category_csr;
1053: IF (l_scs_code = 'PROGRAM' ) THEN