[Home] [Help]
745: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
746: -- select the ID of the parent record from the parent table
747: CURSOR l_iptv_csr IS
748: SELECT 'x'
749: FROM fnd_lookups
750: WHERE lookup_code = p_iptv_rec.ipt_type
751: AND LOOKUP_TYPE = 'OKL_INSURANCE_PRODUCT_TYPE';
752: begin
753: --data is required
764: FETCH l_iptv_csr into l_dummy_var;
765: CLOSE l_iptv_csr;
766: -- if l_dummy_var is still set to default ,data was not found
767: IF (l_dummy_var ='?') THEN
768: OKC_API.set_message(G_APP_NAME,G_NO_PARENT_RECORD,G_COL_NAME_TOKEN,'Insurance Type',g_child_table_token,'OKL_INS_PRODUCTS_V',g_parent_table_token,'FND_LOOKUPS');
769:
770: --notify caller of an error
771: x_return_status := OKC_API.G_RET_STS_ERROR;
772: END IF;
905: l_dummy_var VARCHAR2(1) :='?';
906: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
907: CURSOR l_fact_code_csr IS
908: SELECT 'x'
909: FROM fnd_lookups
910: WHERE lookup_code = p_iptv_rec.factor_code
911: AND LOOKUP_TYPE = 'OKL_INSURANCE_FACTOR';
912: begin
913: --data is required
930: FETCH l_fact_code_csr into l_dummy_var;
931: CLOSE l_fact_code_csr;
932: -- if l_dummy_var is still set to default ,data was not found
933: IF (l_dummy_var ='?') THEN
934: OKC_API.set_message(G_APP_NAME,G_NO_PARENT_RECORD,G_COL_NAME_TOKEN,'Insurance Type',g_child_table_token,'OKL_INS_PRODUCTS_V',g_parent_table_token,'FND_LOOKUPS');
935:
936: --notify caller of an error
937: x_return_status := OKC_API.G_RET_STS_ERROR;
938: END IF;