APPS.OKL_TEL_PVT dependencies on OKC_API

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

759: PROCEDURE validate_supplier(
760: x_return_status OUT NOCOPY VARCHAR2,
761: p_subsidy_vendor_id IN NUMBER,
762: p_col_name VARCHAR2) IS
763: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
764: l_subsidy_vendor_id VARCHAR2(1);
765: l_row_not_found BOOLEAN := FALSE;
766: CURSOR c1(p_subsidy_vendor_id NUMBER) IS
767: SELECT '1'

Line 773: x_return_status := OKC_API.G_RET_STS_SUCCESS;

769: WHERE vendor_id = p_subsidy_vendor_id ;
770: BEGIN
771: IF ( p_subsidy_vendor_id IS NOT NULL) THEN
772: -- initialize return status
773: x_return_status := OKC_API.G_RET_STS_SUCCESS;
774: OPEN c1(p_subsidy_vendor_id );
775: FETCH c1 INTO l_subsidy_vendor_id;
776: l_row_not_found := c1%NOTFOUND;
777: CLOSE c1;

Line 779: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'p_col_name');

775: FETCH c1 INTO l_subsidy_vendor_id;
776: l_row_not_found := c1%NOTFOUND;
777: CLOSE c1;
778: IF l_row_not_found THEN
779: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'p_col_name');
780: x_return_status := OKC_API.G_RET_STS_ERROR;
781: END IF;
782: END IF;
783: EXCEPTION

Line 780: x_return_status := OKC_API.G_RET_STS_ERROR;

776: l_row_not_found := c1%NOTFOUND;
777: CLOSE c1;
778: IF l_row_not_found THEN
779: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'p_col_name');
780: x_return_status := OKC_API.G_RET_STS_ERROR;
781: END IF;
782: END IF;
783: EXCEPTION
784: WHEN G_EXCEPTION_HALT_VALIDATION THEN

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

787: NULL;
788:
789: WHEN OTHERS THEN
790: -- store SQL error message on message stack for caller
791: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
792:
793: p_msg_name => g_unexpected_error,
794: p_token1 => g_sqlcode_token,
795: p_token1_value => SQLCODE,

Line 800: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

796: p_token2 => g_sqlerrm_token,
797: p_token2_value => SQLERRM);
798:
799: -- notify caller of an UNEXPECTED error
800: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
801: END validate_supplier;
802: ----------------------------------------------------
803: -- Validate_Attributes for: vendor_site_id --
804: ----------------------------------------------------

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

804: ----------------------------------------------------
805: PROCEDURE validate_vendor_site(
806: x_return_status OUT NOCOPY VARCHAR2,
807: p_vendor_site_id IN NUMBER) IS
808: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
809: l_vendor_site_id VARCHAR2(1);
810: l_row_not_found BOOLEAN := FALSE;
811: CURSOR c1(p_vendor_site_id NUMBER) IS
812: SELECT '1'

Line 818: x_return_status := OKC_API.G_RET_STS_SUCCESS;

814: WHERE vendor_site_id = p_vendor_site_id ;
815: BEGIN
816: IF ( p_vendor_site_id IS NOT NULL) THEN
817: -- initialize return status
818: x_return_status := OKC_API.G_RET_STS_SUCCESS;
819: OPEN c1(p_vendor_site_id );
820: FETCH c1 INTO l_vendor_site_id;
821: l_row_not_found := c1%NOTFOUND;
822: CLOSE c1;

Line 824: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'PARTY_ID');

820: FETCH c1 INTO l_vendor_site_id;
821: l_row_not_found := c1%NOTFOUND;
822: CLOSE c1;
823: IF l_row_not_found THEN
824: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'PARTY_ID');
825: x_return_status := OKC_API.G_RET_STS_ERROR;
826: END IF;
827: END IF;
828: EXCEPTION

Line 825: x_return_status := OKC_API.G_RET_STS_ERROR;

821: l_row_not_found := c1%NOTFOUND;
822: CLOSE c1;
823: IF l_row_not_found THEN
824: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'PARTY_ID');
825: x_return_status := OKC_API.G_RET_STS_ERROR;
826: END IF;
827: END IF;
828: EXCEPTION
829: WHEN G_EXCEPTION_HALT_VALIDATION THEN

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

832: NULL;
833:
834: WHEN OTHERS THEN
835: -- store SQL error message on message stack for caller
836: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
837:
838: p_msg_name => g_unexpected_error,
839: p_token1 => g_sqlcode_token,
840: p_token1_value => SQLCODE,

Line 845: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

841: p_token2 => g_sqlerrm_token,
842: p_token2_value => SQLERRM);
843:
844: -- notify caller of an UNEXPECTED error
845: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
846: END validate_vendor_site;
847: ---------------------------------------------------------------------------
848: -- FUNCTION Validate_Attributes
849: ---------------------------------------------------------------------------