549:
550: -- replace g_miss_char/num/date with current column values
551: Complete_Claim_Type_Rec(p_claim_rec, l_claim_rec);
552:
553: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
554: Check_Claim_Type_Items(
555: p_claim_rec => l_claim_rec,
556: p_validation_mode => JTF_PLSQL_API.g_update,
557: x_return_status => l_return_status
552:
553: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
554: Check_Claim_Type_Items(
555: p_claim_rec => l_claim_rec,
556: p_validation_mode => JTF_PLSQL_API.g_update,
557: x_return_status => l_return_status
558: );
559:
560: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
564: END IF;
565: END IF;
566:
567:
568: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_record THEN
569: Check_Claim_Type_Record(
570: p_claim_rec => p_claim_rec,
571: p_complete_rec => l_claim_rec,
572: x_return_status => l_return_status
747: IF OZF_DEBUG_HIGH_ON THEN
748: OZF_Utility_PVT.debug_message(l_full_name||': check items');
749: END IF;
750:
751: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
752: Check_Claim_Type_Items(
753: p_claim_rec => p_claim_rec,
754: p_validation_mode => JTF_PLSQL_API.g_create,
755: x_return_status => l_return_status
750:
751: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
752: Check_Claim_Type_Items(
753: p_claim_rec => p_claim_rec,
754: p_validation_mode => JTF_PLSQL_API.g_create,
755: x_return_status => l_return_status
756: );
757:
758: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
765: IF OZF_DEBUG_HIGH_ON THEN
766: OZF_Utility_PVT.debug_message(l_full_name||': check record');
767: END IF;
768:
769: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_record THEN
770: Check_Claim_Type_Record(
771: p_claim_rec => p_claim_rec,
772: p_complete_rec => NULL,
773: x_return_status => l_return_status
927: -- 06/27/2000 Michelle Chang Create.
928: ---------------------------------------------------------------------
929: PROCEDURE Check_Claim_Type_Uk_Items(
930: p_claim_rec IN claim_rec_type
931: ,p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create
932: ,x_return_status OUT NOCOPY VARCHAR2
933: )
934: IS
935: l_valid_flag VARCHAR2(1);
938: x_return_status := FND_API.g_ret_sts_success;
939:
940: -- For Create_Claim_Type, when claim_type_id is passed in, we need to
941: -- check if this claim_type_id is unique.
942: IF p_validation_mode = JTF_PLSQL_API.g_create
943: AND p_claim_rec.claim_type_id IS NOT NULL
944: THEN
945: IF OZF_Utility_PVT.check_uniqueness(
946: 'ozf_claim_types_VL',
1111: -- HISTORY
1112: -- 06/27/2000 Michelle Chang Create.
1113: ---------------------------------------------------------------------
1114: PROCEDURE Check_Claim_Type_Items(
1115: p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create
1116: ,x_return_status OUT NOCOPY VARCHAR2
1117: ,p_claim_rec IN claim_rec_type
1118: )
1119: IS