1: PACKAGE BODY Okl_Sec_Concurrent_Pvt AS
2: /* $Header: OKLRSZOB.pls 120.8 2007/12/21 14:11:06 kthiruva noship $ */
3: ----------------------------------------------------------------------------
4: -- Global Message Constants
5: ----------------------------------------------------------------------------
732: ,p_khr_id => l_chr_id
733: );
734:
735: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
736: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_UNEXPECTED_ERROR));
737: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
738: ELSIF (l_return_Status = G_RET_STS_ERROR) THEN
739: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_EXPECTED_ERROR));
740: RAISE G_EXCEPTION_ERROR;
735: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
736: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_UNEXPECTED_ERROR));
737: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
738: ELSIF (l_return_Status = G_RET_STS_ERROR) THEN
739: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_EXPECTED_ERROR));
740: RAISE G_EXCEPTION_ERROR;
741: END IF;
742:
743: ELSE
750: ,p_khr_id => l_chr_id
751: );
752:
753: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
754: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_UNEXPECTED_ERROR));
755: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
756: ELSIF (l_return_Status = G_RET_STS_ERROR) THEN
757: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_EXPECTED_ERROR));
758: RAISE G_EXCEPTION_ERROR;
753: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
754: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_UNEXPECTED_ERROR));
755: RAISE G_EXCEPTION_UNEXPECTED_ERROR;
756: ELSIF (l_return_Status = G_RET_STS_ERROR) THEN
757: FND_FILE.PUT_LINE(FND_FILE.LOG, get_message(l_api_name,'Okl_Sec_Concurrent_Pvt.Activate_Agreement',G_EXPECTED_ERROR));
758: RAISE G_EXCEPTION_ERROR;
759: END IF;
760:
761: END IF;
830: -- fmiao bug: 4748514 end
831:
832:
833:
834: END Okl_Sec_Concurrent_Pvt;