DBA Data[Home] [Help]

APPS.OKL_RXL_PVT dependencies on OKC_API

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

887: PROCEDURE validate_asset_vendor_id(
888: x_return_status OUT NOCOPY VARCHAR2,
889: p_asset_vendor_id IN NUMBER) IS
890:
891: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
892: l_asset_vendor_id NUMBER;
893: l_row_not_found BOOLEAN := FALSE;
894: CURSOR check_asset_vendor_id_csr(p_asset_vendor_id NUMBER) IS
895: SELECT 1

Line 902: x_return_status := OKC_API.G_RET_STS_SUCCESS;

898: vendor_id = p_asset_vendor_id;
899: BEGIN
900: IF ( p_asset_vendor_id IS NOT NULL ) THEN
901: -- initialize return status
902: x_return_status := OKC_API.G_RET_STS_SUCCESS;
903: OPEN check_asset_vendor_id_csr(p_asset_vendor_id );
904: FETCH check_asset_vendor_id_csr INTO l_asset_vendor_id ;
905: l_row_not_found := check_asset_vendor_id_csr%NOTFOUND;
906: CLOSE check_asset_vendor_id_csr;

Line 908: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'ASSET_VENDOR_ID');

904: FETCH check_asset_vendor_id_csr INTO l_asset_vendor_id ;
905: l_row_not_found := check_asset_vendor_id_csr%NOTFOUND;
906: CLOSE check_asset_vendor_id_csr;
907: IF l_row_not_found THEN
908: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'ASSET_VENDOR_ID');
909: x_return_status := OKC_API.G_RET_STS_ERROR;
910: END IF;
911: END IF;
912: EXCEPTION

Line 909: x_return_status := OKC_API.G_RET_STS_ERROR;

905: l_row_not_found := check_asset_vendor_id_csr%NOTFOUND;
906: CLOSE check_asset_vendor_id_csr;
907: IF l_row_not_found THEN
908: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'ASSET_VENDOR_ID');
909: x_return_status := OKC_API.G_RET_STS_ERROR;
910: END IF;
911: END IF;
912: EXCEPTION
913: WHEN G_EXCEPTION_HALT_VALIDATION THEN

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

915: -- with the next column
916: NULL;
917: WHEN OTHERS THEN
918: -- store SQL error message on message stack for caller
919: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
920: p_msg_name => g_unexpected_error,
921: p_token1 => g_sqlcode_token,
922: p_token1_value => SQLCODE,
923: p_token2 => g_sqlerrm_token,

Line 927: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

923: p_token2 => g_sqlerrm_token,
924: p_token2_value => SQLERRM);
925:
926: -- notify caller of an UNEXPECTED error
927: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
928: END validate_asset_vendor_id;
929: ------------------------------------------------
930: -- Validate_Attributes for: SUBSIDY_VENDOR_ID --
931: ------------------------------------------------

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

932: PROCEDURE validate_subsidy_vendor_id(
933: x_return_status OUT NOCOPY VARCHAR2,
934: p_subsidy_vendor_id IN NUMBER) IS
935:
936: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
937: l_subsidy_vendor_id NUMBER;
938: l_row_not_found BOOLEAN := FALSE;
939: CURSOR check_subsidy_vendor_id_csr(p_subsidy_vendor_id NUMBER) IS
940: SELECT 1

Line 947: x_return_status := OKC_API.G_RET_STS_SUCCESS;

943: vendor_id = p_subsidy_vendor_id;
944: BEGIN
945: IF ( p_subsidy_vendor_id IS NOT NULL) THEN
946: -- initialize return status
947: x_return_status := OKC_API.G_RET_STS_SUCCESS;
948: OPEN check_subsidy_vendor_id_csr(p_subsidy_vendor_id);
949: FETCH check_subsidy_vendor_id_csr INTO l_subsidy_vendor_id ;
950: l_row_not_found := check_subsidy_vendor_id_csr%NOTFOUND;
951: CLOSE check_subsidy_vendor_id_csr;

Line 953: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'SUBSIDY_VENDOR_ID');

949: FETCH check_subsidy_vendor_id_csr INTO l_subsidy_vendor_id ;
950: l_row_not_found := check_subsidy_vendor_id_csr%NOTFOUND;
951: CLOSE check_subsidy_vendor_id_csr;
952: IF l_row_not_found THEN
953: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'SUBSIDY_VENDOR_ID');
954: x_return_status := OKC_API.G_RET_STS_ERROR;
955: END IF;
956: END IF;
957: EXCEPTION

Line 954: x_return_status := OKC_API.G_RET_STS_ERROR;

950: l_row_not_found := check_subsidy_vendor_id_csr%NOTFOUND;
951: CLOSE check_subsidy_vendor_id_csr;
952: IF l_row_not_found THEN
953: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'SUBSIDY_VENDOR_ID');
954: x_return_status := OKC_API.G_RET_STS_ERROR;
955: END IF;
956: END IF;
957: EXCEPTION
958: WHEN G_EXCEPTION_HALT_VALIDATION THEN

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

960: -- with the next column
961: NULL;
962: WHEN OTHERS THEN
963: -- store SQL error message on message stack for caller
964: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
965: p_msg_name => g_unexpected_error,
966: p_token1 => g_sqlcode_token,
967: p_token1_value => SQLCODE,
968: p_token2 => g_sqlerrm_token,

Line 972: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

968: p_token2 => g_sqlerrm_token,
969: p_token2_value => SQLERRM);
970:
971: -- notify caller of an UNEXPECTED error
972: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
973: END validate_subsidy_vendor_id;
974: -- added by zrehman Bug#6707320 for Party Merge impact on Accounting sources tables end
975: ---------------------------------------
976: -- Validate_Attributes for: LANGUAGE --