eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_SPLIT_CONTRACT_PVT dependencies on OKL_API

Line 10: G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;

6: G_NO_MATCHING_RECORD CONSTANT VARCHAR2(200) := 'OKL_LLA_NO_MATCHING_RECORD';
7: G_INVALID_CRITERIA CONSTANT VARCHAR2(200) := 'OKL_LLA_INVALID_CRITERIA';
8: G_COPY_HEADER CONSTANT VARCHAR2(200) := 'OKL_LLA_COPY_HEADER';
9: G_COPY_LINE CONSTANT VARCHAR2(200) := 'OKL_LLA_COPY_LINE';
10: G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
11: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
12: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
13: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
14: G_TOKEN_K_NUM CONSTANT VARCHAR2(200) := 'Contract Number';

Line 12: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;

8: G_COPY_HEADER CONSTANT VARCHAR2(200) := 'OKL_LLA_COPY_HEADER';
9: G_COPY_LINE CONSTANT VARCHAR2(200) := 'OKL_LLA_COPY_LINE';
10: G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
11: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
12: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
13: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
14: G_TOKEN_K_NUM CONSTANT VARCHAR2(200) := 'Contract Number';
15: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
16: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';

Line 13: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;

9: G_COPY_LINE CONSTANT VARCHAR2(200) := 'OKL_LLA_COPY_LINE';
10: G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
11: G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
12: G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
13: G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
14: G_TOKEN_K_NUM CONSTANT VARCHAR2(200) := 'Contract Number';
15: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
16: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
17: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';

Line 36: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;

32: -------------------------------------------------------------------------------------------------
33: -- GLOBAL VARIABLES
34: -------------------------------------------------------------------------------------------------
35: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_SPLIT_CONTRACT_PVT';
36: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
37: G_FIN_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FREE_FORM1';
38: G_FA_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FIXED_ASSET';
39: G_INST_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FREE_FORM2';
40: G_IB_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'INST_ITEM';

Line 67: TYPE g_chr_sts_rec IS RECORD (chr_id NUMBER := OKL_API.G_MISS_NUM,

63: SUBTYPE txdv_rec_type IS OKL_TXD_ASSETS_PUB.adpv_rec_type;
64: SUBTYPE itiv_rec_type IS OKL_TXL_ITM_INSTS_PUB.iipv_rec_type;
65: SUBTYPE itiv_tbl_type IS OKL_TXL_ITM_INSTS_PUB.iipv_tbl_type;
66: SUBTYPE rulv_rec_type IS OKL_RULE_PUB.rulv_rec_type;
67: TYPE g_chr_sts_rec IS RECORD (chr_id NUMBER := OKL_API.G_MISS_NUM,
68: sts_code OKC_K_LINES_B.STS_CODE%TYPE);
69: TYPE g_chr_sts_tbl IS TABLE OF g_chr_sts_rec
70: INDEX BY BINARY_INTEGER;
71:

Line 72: TYPE g_cle_amt_rec IS RECORD (cle_id NUMBER := OKL_API.G_MISS_NUM,

68: sts_code OKC_K_LINES_B.STS_CODE%TYPE);
69: TYPE g_chr_sts_tbl IS TABLE OF g_chr_sts_rec
70: INDEX BY BINARY_INTEGER;
71:
72: TYPE g_cle_amt_rec IS RECORD (cle_id NUMBER := OKL_API.G_MISS_NUM,
73: amount NUMBER := OKL_API.G_MISS_NUM,
74: orig_cle_id NUMBER := OKL_API.G_MISS_NUM);
75: TYPE g_cle_amt_tbl IS TABLE OF g_cle_amt_rec
76: INDEX BY BINARY_INTEGER;

Line 73: amount NUMBER := OKL_API.G_MISS_NUM,

69: TYPE g_chr_sts_tbl IS TABLE OF g_chr_sts_rec
70: INDEX BY BINARY_INTEGER;
71:
72: TYPE g_cle_amt_rec IS RECORD (cle_id NUMBER := OKL_API.G_MISS_NUM,
73: amount NUMBER := OKL_API.G_MISS_NUM,
74: orig_cle_id NUMBER := OKL_API.G_MISS_NUM);
75: TYPE g_cle_amt_tbl IS TABLE OF g_cle_amt_rec
76: INDEX BY BINARY_INTEGER;
77: lt_chr_sts_tbl g_chr_sts_tbl;

Line 74: orig_cle_id NUMBER := OKL_API.G_MISS_NUM);

70: INDEX BY BINARY_INTEGER;
71:
72: TYPE g_cle_amt_rec IS RECORD (cle_id NUMBER := OKL_API.G_MISS_NUM,
73: amount NUMBER := OKL_API.G_MISS_NUM,
74: orig_cle_id NUMBER := OKL_API.G_MISS_NUM);
75: TYPE g_cle_amt_tbl IS TABLE OF g_cle_amt_rec
76: INDEX BY BINARY_INTEGER;
77: lt_chr_sts_tbl g_chr_sts_tbl;
78: lt_new_cle_amt_tbl g_cle_amt_tbl;

Line 105: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

101: FUNCTION get_tasv_rec(p_tas_id IN NUMBER,
102: x_trxv_rec OUT NOCOPY trxv_rec_type)
103: RETURN VARCHAR2
104: IS
105: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
106: CURSOR c_trxv_rec(p_tas_id NUMBER)
107: IS
108: SELECT ID,
109: OBJECT_VERSION_NUMBER,

Line 178: x_return_status := OKL_API.G_RET_STS_ERROR;

174: x_trxv_rec.COMMENTS,
175: x_trxv_rec.REQ_ASSET_ID,
176: x_trxv_rec.TOTAL_MATCH_AMOUNT;
177: IF c_trxv_rec%NOTFOUND THEN
178: x_return_status := OKL_API.G_RET_STS_ERROR;
179: END IF;
180: CLOSE c_trxv_rec;
181: RETURN(x_return_status);
182: EXCEPTION

Line 185: OKL_API.set_message(

181: RETURN(x_return_status);
182: EXCEPTION
183: WHEN OTHERS THEN
184: -- store SQL error message on message stack for caller
185: OKL_API.set_message(
186: G_APP_NAME,
187: G_UNEXPECTED_ERROR,
188: G_SQLCODE_TOKEN,
189: SQLCODE,

Line 196: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

192: IF c_trxv_rec%ISOPEN THEN
193: CLOSE c_trxv_rec;
194: END IF;
195: -- notify caller of an UNEXPECTED error
196: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
197: RETURN(x_return_status);
198: END get_tasv_rec;
199: ----------------------------------------------------------------------------
200: -- FUNCTION get_rec for: OKC_K_ITEMS_V

Line 232: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

228: FROM okc_k_items_v cim
229: WHERE cim.dnz_chr_id = p_dnz_chr_id
230: AND cim.cle_id = p_cle_id;
231: l_okc_cimv_pk okc_cimv_pk_csr%ROWTYPE;
232: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
233: BEGIN
234: OPEN okc_cimv_pk_csr(p_cle_id,
235: p_dnz_chr_id);
236: FETCH okc_cimv_pk_csr INTO

Line 258: x_return_status := OKL_API.G_RET_STS_ERROR;

254: x_cimv_rec.LAST_UPDATED_BY,
255: x_cimv_rec.LAST_UPDATE_DATE,
256: x_cimv_rec.LAST_UPDATE_LOGIN;
257: IF okc_cimv_pk_csr%NOTFOUND THEN
258: x_return_status := OKL_API.G_RET_STS_ERROR;
259: END IF;
260: IF (okc_cimv_pk_csr%ROWCOUNT > 1) THEN
261: x_return_status := OKL_API.G_RET_STS_ERROR;
262: END IF;

Line 261: x_return_status := OKL_API.G_RET_STS_ERROR;

257: IF okc_cimv_pk_csr%NOTFOUND THEN
258: x_return_status := OKL_API.G_RET_STS_ERROR;
259: END IF;
260: IF (okc_cimv_pk_csr%ROWCOUNT > 1) THEN
261: x_return_status := OKL_API.G_RET_STS_ERROR;
262: END IF;
263: CLOSE okc_cimv_pk_csr;
264: RETURN(x_return_status);
265: EXCEPTION

Line 268: OKL_API.set_message(

264: RETURN(x_return_status);
265: EXCEPTION
266: WHEN OTHERS THEN
267: -- store SQL error message on message stack for caller
268: OKL_API.set_message(
269: G_APP_NAME,
270: G_UNEXPECTED_ERROR,
271: G_SQLCODE_TOKEN,
272: SQLCODE,

Line 276: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

272: SQLCODE,
273: G_SQLERRM_TOKEN,
274: SQLERRM);
275: -- notify caller of an UNEXPECTED error
276: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
277: -- if the cursor is open
278: IF okc_cimv_pk_csr%ISOPEN THEN
279: CLOSE okc_cimv_pk_csr;
280: END IF;

Line 368: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

364: LAST_UPDATE_DATE,
365: LAST_UPDATE_LOGIN
366: FROM okc_k_headers_v chrv
367: WHERE chrv.id = p_id;
368: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
369: BEGIN
370: OPEN okc_chrv_pk_csr (p_id);
371: FETCH okc_chrv_pk_csr INTO
372: x_chrv_rec.ID,

Line 451: x_return_status := OKL_API.G_RET_STS_ERROR;

447: x_chrv_rec.LAST_UPDATED_BY,
448: x_chrv_rec.LAST_UPDATE_DATE,
449: x_chrv_rec.LAST_UPDATE_LOGIN;
450: IF okc_chrv_pk_csr%NOTFOUND THEN
451: x_return_status := OKL_API.G_RET_STS_ERROR;
452: END IF;
453: CLOSE okc_chrv_pk_csr;
454: RETURN(x_return_status);
455: EXCEPTION

Line 458: OKL_API.set_message(

454: RETURN(x_return_status);
455: EXCEPTION
456: WHEN OTHERS THEN
457: -- store SQL error message on message stack for caller
458: OKL_API.set_message(
459: G_APP_NAME,
460: G_UNEXPECTED_ERROR,
461: G_SQLCODE_TOKEN,
462: SQLCODE,

Line 466: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

462: SQLCODE,
463: G_SQLERRM_TOKEN,
464: SQLERRM);
465: -- notify caller of an UNEXPECTED error
466: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
467: -- if the cursor is open
468: IF okc_chrv_pk_csr%ISOPEN THEN
469: CLOSE okc_chrv_pk_csr;
470: END IF;

Line 558: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

554: LAST_UPDATE_LOGIN
555: FROM Okc_K_Lines_V
556: WHERE okc_k_lines_v.id = p_cle_id;
557: l_okc_clev_pk okc_clev_pk_csr%ROWTYPE;
558: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
559: BEGIN
560: -- Get current database values
561: OPEN okc_clev_pk_csr (p_id);
562: FETCH okc_clev_pk_csr INTO

Line 641: x_return_status := OKL_API.G_RET_STS_ERROR;

637: x_clev_rec.CURRENCY_CODE,
638: x_clev_rec.CURRENCY_CODE_RENEWED,
639: x_clev_rec.LAST_UPDATE_LOGIN;
640: IF okc_clev_pk_csr%NOTFOUND THEN
641: x_return_status := OKL_API.G_RET_STS_ERROR;
642: END IF;
643: CLOSE okc_clev_pk_csr;
644: RETURN(x_return_status);
645: EXCEPTION

Line 648: OKL_API.set_message(G_APP_NAME,

644: RETURN(x_return_status);
645: EXCEPTION
646: WHEN OTHERS THEN
647: -- store SQL error message on message stack for caller
648: OKL_API.set_message(G_APP_NAME,
649: G_UNEXPECTED_ERROR,
650: G_SQLCODE_TOKEN,
651: SQLCODE,
652: G_SQLERRM_TOKEN,

Line 655: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

651: SQLCODE,
652: G_SQLERRM_TOKEN,
653: SQLERRM);
654: -- notify caller of an UNEXPECTED error
655: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
656: -- if the cursor is open
657: IF okc_clev_pk_csr%ISOPEN THEN
658: CLOSE okc_clev_pk_csr;
659: END IF;

Line 766: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

762: FEE_TYPE
763: FROM OKL_K_LINES_V
764: WHERE OKL_K_LINES_V.id = p_kle_id;
765: l_okl_k_lines_v_pk okl_k_lines_v_pk_csr%ROWTYPE;
766: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
767: BEGIN
768: -- Get current database values
769: OPEN okl_k_lines_v_pk_csr (p_id);
770: FETCH okl_k_lines_v_pk_csr INTO

Line 868: x_return_status := OKL_API.G_RET_STS_ERROR;

864: x_klev_rec.CAPITALIZED_INTEREST,
865: x_klev_rec.CAPITAL_REDUCTION_PERCENT,
866: x_klev_rec.FEE_TYPE;
867: IF okl_k_lines_v_pk_csr%NOTFOUND THEN
868: x_return_status := OKL_API.G_RET_STS_ERROR;
869: END IF;
870: CLOSE okl_k_lines_v_pk_csr;
871: RETURN(x_return_status);
872: EXCEPTION

Line 875: OKL_API.set_message(G_APP_NAME,

871: RETURN(x_return_status);
872: EXCEPTION
873: WHEN OTHERS THEN
874: -- store SQL error message on message stack for caller
875: OKL_API.set_message(G_APP_NAME,
876: G_UNEXPECTED_ERROR,
877: G_SQLCODE_TOKEN,
878: SQLCODE,
879: G_SQLERRM_TOKEN,

Line 882: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

878: SQLCODE,
879: G_SQLERRM_TOKEN,
880: SQLERRM);
881: -- notify caller of an UNEXPECTED error
882: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
883: -- if the cursor is open
884: IF okl_k_lines_v_pk_csr%ISOPEN THEN
885: CLOSE okl_k_lines_v_pk_csr;
886: END IF;

Line 899: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

895: -- Parameters :
896: -- Version :
897: -- End of Commnets
898: PROCEDURE check_split_process (p_api_version IN NUMBER,
899: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
900: x_return_status OUT NOCOPY VARCHAR2,
901: x_msg_count OUT NOCOPY NUMBER,
902: x_msg_data OUT NOCOPY VARCHAR2,
903: x_process_action OUT NOCOPY VARCHAR2,

Line 945: x_return_status := OKL_API.G_RET_STS_SUCCESS;

941: AND orig_system_source_code = 'OKL_SPLIT'
942: ORDER BY CREATION_DATE;
943:
944: BEGIN
945: x_return_status := OKL_API.G_RET_STS_SUCCESS;
946:
947: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
948: x_return_status := OKL_API.G_RET_STS_ERROR;
949: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 947: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN

943:
944: BEGIN
945: x_return_status := OKL_API.G_RET_STS_SUCCESS;
946:
947: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
948: x_return_status := OKL_API.G_RET_STS_ERROR;
949: OKL_API.set_message(p_app_name => G_APP_NAME,
950: p_msg_name => G_REQUIRED_VALUE,
951: p_token1 => G_COL_NAME_TOKEN,

Line 948: x_return_status := OKL_API.G_RET_STS_ERROR;

944: BEGIN
945: x_return_status := OKL_API.G_RET_STS_SUCCESS;
946:
947: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
948: x_return_status := OKL_API.G_RET_STS_ERROR;
949: OKL_API.set_message(p_app_name => G_APP_NAME,
950: p_msg_name => G_REQUIRED_VALUE,
951: p_token1 => G_COL_NAME_TOKEN,
952: p_token1_value => 'OKC_K_HEADERS_B.ID');

Line 949: OKL_API.set_message(p_app_name => G_APP_NAME,

945: x_return_status := OKL_API.G_RET_STS_SUCCESS;
946:
947: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
948: x_return_status := OKL_API.G_RET_STS_ERROR;
949: OKL_API.set_message(p_app_name => G_APP_NAME,
950: p_msg_name => G_REQUIRED_VALUE,
951: p_token1 => G_COL_NAME_TOKEN,
952: p_token1_value => 'OKC_K_HEADERS_B.ID');
953: -- halt validation as it is a required field

Line 961: x_return_status := OKL_API.G_RET_STS_ERROR;

957: -- Validate the Contract ID.
958: OPEN c_get_contract(p_contract_id);
959: FETCH c_get_contract INTO ln_contract_id;
960: IF c_get_contract%NOTFOUND THEN
961: x_return_status := OKL_API.G_RET_STS_ERROR;
962: OKL_API.set_message(p_app_name => G_APP_NAME,
963: p_msg_name => G_INVALID_CONTRACT);
964: RAISE G_EXCEPTION_HALT_VALIDATION;
965: END IF;

Line 962: OKL_API.set_message(p_app_name => G_APP_NAME,

958: OPEN c_get_contract(p_contract_id);
959: FETCH c_get_contract INTO ln_contract_id;
960: IF c_get_contract%NOTFOUND THEN
961: x_return_status := OKL_API.G_RET_STS_ERROR;
962: OKL_API.set_message(p_app_name => G_APP_NAME,
963: p_msg_name => G_INVALID_CONTRACT);
964: RAISE G_EXCEPTION_HALT_VALIDATION;
965: END IF;
966: CLOSE c_get_contract;

Line 982: IF (ln_split_contract1 IS NULL OR ln_split_contract1 = OKL_API.G_MISS_NUM) AND

978: END IF;
979: lb_value := TRUE;
980: END LOOP;
981:
982: IF (ln_split_contract1 IS NULL OR ln_split_contract1 = OKL_API.G_MISS_NUM) AND
983: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
984: -- Split transaction created with no contracts. Creation of both Split
985: -- contracts should be possible.
986: x_process_action := 'PROCESS_BOTH';

Line 983: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN

979: lb_value := TRUE;
980: END LOOP;
981:
982: IF (ln_split_contract1 IS NULL OR ln_split_contract1 = OKL_API.G_MISS_NUM) AND
983: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
984: -- Split transaction created with no contracts. Creation of both Split
985: -- contracts should be possible.
986: x_process_action := 'PROCESS_BOTH';
987: x_transaction_id := ln_transaction_id;

Line 988: x_return_status := OKL_API.G_RET_STS_SUCCESS;

984: -- Split transaction created with no contracts. Creation of both Split
985: -- contracts should be possible.
986: x_process_action := 'PROCESS_BOTH';
987: x_transaction_id := ln_transaction_id;
988: x_return_status := OKL_API.G_RET_STS_SUCCESS;
989: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
990: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
991: -- One split contract already got created. Split contract process should
992: -- proceed from there.

Line 989: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND

985: -- contracts should be possible.
986: x_process_action := 'PROCESS_BOTH';
987: x_transaction_id := ln_transaction_id;
988: x_return_status := OKL_API.G_RET_STS_SUCCESS;
989: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
990: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
991: -- One split contract already got created. Split contract process should
992: -- proceed from there.
993: x_process_action := 'PROCESS_SECOND';

Line 990: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN

986: x_process_action := 'PROCESS_BOTH';
987: x_transaction_id := ln_transaction_id;
988: x_return_status := OKL_API.G_RET_STS_SUCCESS;
989: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
990: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
991: -- One split contract already got created. Split contract process should
992: -- proceed from there.
993: x_process_action := 'PROCESS_SECOND';
994: x_transaction_id := ln_transaction_id;

Line 996: x_return_status := OKL_API.G_RET_STS_SUCCESS;

992: -- proceed from there.
993: x_process_action := 'PROCESS_SECOND';
994: x_transaction_id := ln_transaction_id;
995: x_child_chrid1 := ln_split_contract1;
996: x_return_status := OKL_API.G_RET_STS_SUCCESS;
997: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
998: (ln_split_contract2 IS NOT NULL OR ln_split_contract2 <> OKL_API.G_MISS_NUM) THEN
999: -- Both split contracts are created, direct the user to Summary screen.
1000: x_process_action := 'PROCESS_REVIEW';

Line 997: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND

993: x_process_action := 'PROCESS_SECOND';
994: x_transaction_id := ln_transaction_id;
995: x_child_chrid1 := ln_split_contract1;
996: x_return_status := OKL_API.G_RET_STS_SUCCESS;
997: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
998: (ln_split_contract2 IS NOT NULL OR ln_split_contract2 <> OKL_API.G_MISS_NUM) THEN
999: -- Both split contracts are created, direct the user to Summary screen.
1000: x_process_action := 'PROCESS_REVIEW';
1001: x_transaction_id := ln_transaction_id;

Line 998: (ln_split_contract2 IS NOT NULL OR ln_split_contract2 <> OKL_API.G_MISS_NUM) THEN

994: x_transaction_id := ln_transaction_id;
995: x_child_chrid1 := ln_split_contract1;
996: x_return_status := OKL_API.G_RET_STS_SUCCESS;
997: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
998: (ln_split_contract2 IS NOT NULL OR ln_split_contract2 <> OKL_API.G_MISS_NUM) THEN
999: -- Both split contracts are created, direct the user to Summary screen.
1000: x_process_action := 'PROCESS_REVIEW';
1001: x_transaction_id := ln_transaction_id;
1002: x_child_chrid1 := ln_split_contract1;

Line 1004: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1000: x_process_action := 'PROCESS_REVIEW';
1001: x_transaction_id := ln_transaction_id;
1002: x_child_chrid1 := ln_split_contract1;
1003: x_child_chrid2 := ln_split_contract2;
1004: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1005: END IF;
1006: ELSIF c_get_transaction_id%NOTFOUND THEN
1007: OKL_API.set_message(p_app_name => G_APP_NAME,
1008: p_msg_name => G_REQUIRED_VALUE,

Line 1007: OKL_API.set_message(p_app_name => G_APP_NAME,

1003: x_child_chrid2 := ln_split_contract2;
1004: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1005: END IF;
1006: ELSIF c_get_transaction_id%NOTFOUND THEN
1007: OKL_API.set_message(p_app_name => G_APP_NAME,
1008: p_msg_name => G_REQUIRED_VALUE,
1009: p_token1 => G_COL_NAME_TOKEN,
1010: p_token1_value => 'OKL_TRX_CONTRACTS.ID');
1011: -- halt validation as it is a required field

Line 1026: x_return_status := OKL_API.G_RET_STS_ERROR;

1022: END IF;
1023: IF c_get_contract%ISOPEN THEN
1024: CLOSE c_get_contract;
1025: END IF;
1026: x_return_status := OKL_API.G_RET_STS_ERROR;
1027:
1028: WHEN OTHERS THEN
1029: IF c_get_transaction_id%ISOPEN THEN
1030: CLOSE c_get_transaction_id;

Line 1038: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1034: END IF;
1035: IF c_get_contract%ISOPEN THEN
1036: CLOSE c_get_contract;
1037: END IF;
1038: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1039: l_api_name,
1040: G_PKG_NAME,
1041: 'OTHERS',
1042: x_msg_count,

Line 1056: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1052: -- Parameters :
1053: -- Version :
1054: -- End of Commnets
1055: PROCEDURE l_update_contract_header(p_api_version IN NUMBER,
1056: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1057: x_return_status OUT NOCOPY VARCHAR2,
1058: x_msg_count OUT NOCOPY NUMBER,
1059: x_msg_data OUT NOCOPY VARCHAR2,
1060: p_restricted_update IN VARCHAR2 DEFAULT 'F',

Line 1069: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1065: l_api_name CONSTANT VARCHAR2(30) := 'L_UPDATE_CONTRACT_HEADER';
1066: l_chrv_rec chrv_rec_type;
1067: l_khrv_rec khrv_rec_type;
1068: BEGIN
1069: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1070: -- Call start_activity to create savepoint, check compatibility
1071: -- and initialize message list
1072: x_return_status := OKL_API.START_ACTIVITY (
1073: l_api_name

Line 1072: x_return_status := OKL_API.START_ACTIVITY (

1068: BEGIN
1069: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1070: -- Call start_activity to create savepoint, check compatibility
1071: -- and initialize message list
1072: x_return_status := OKL_API.START_ACTIVITY (
1073: l_api_name
1074: ,p_init_msg_list
1075: ,'_PVT'
1076: ,x_return_status);

Line 1078: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1074: ,p_init_msg_list
1075: ,'_PVT'
1076: ,x_return_status);
1077: -- Check if activity started successfully
1078: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1081: RAISE OKL_API.G_EXCEPTION_ERROR;
1082: END IF;

Line 1079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1075: ,'_PVT'
1076: ,x_return_status);
1077: -- Check if activity started successfully
1078: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1081: RAISE OKL_API.G_EXCEPTION_ERROR;
1082: END IF;
1083: -- get rec for Contract Header

Line 1080: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1076: ,x_return_status);
1077: -- Check if activity started successfully
1078: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1081: RAISE OKL_API.G_EXCEPTION_ERROR;
1082: END IF;
1083: -- get rec for Contract Header
1084: x_return_status := get_rec_chrv(p_id => p_chrv_rec.id,

Line 1081: RAISE OKL_API.G_EXCEPTION_ERROR;

1077: -- Check if activity started successfully
1078: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1080: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1081: RAISE OKL_API.G_EXCEPTION_ERROR;
1082: END IF;
1083: -- get rec for Contract Header
1084: x_return_status := get_rec_chrv(p_id => p_chrv_rec.id,
1085: x_chrv_rec => l_chrv_rec);

Line 1086: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1082: END IF;
1083: -- get rec for Contract Header
1084: x_return_status := get_rec_chrv(p_id => p_chrv_rec.id,
1085: x_chrv_rec => l_chrv_rec);
1086: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1087: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1088: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1089: RAISE OKL_API.G_EXCEPTION_ERROR;
1090: END IF;

Line 1087: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1083: -- get rec for Contract Header
1084: x_return_status := get_rec_chrv(p_id => p_chrv_rec.id,
1085: x_chrv_rec => l_chrv_rec);
1086: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1087: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1088: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1089: RAISE OKL_API.G_EXCEPTION_ERROR;
1090: END IF;
1091: l_chrv_rec.orig_system_source_code := 'OKL_SPLIT';

Line 1088: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1084: x_return_status := get_rec_chrv(p_id => p_chrv_rec.id,
1085: x_chrv_rec => l_chrv_rec);
1086: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1087: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1088: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1089: RAISE OKL_API.G_EXCEPTION_ERROR;
1090: END IF;
1091: l_chrv_rec.orig_system_source_code := 'OKL_SPLIT';
1092: -- evaluate conditions, build outcomes for true conditions and

Line 1089: RAISE OKL_API.G_EXCEPTION_ERROR;

1085: x_chrv_rec => l_chrv_rec);
1086: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1087: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1088: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1089: RAISE OKL_API.G_EXCEPTION_ERROR;
1090: END IF;
1091: l_chrv_rec.orig_system_source_code := 'OKL_SPLIT';
1092: -- evaluate conditions, build outcomes for true conditions and
1093: -- put them on outcome queue

Line 1104: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1100: p_chrv_rec => l_chrv_rec,
1101: p_khrv_rec => l_khrv_rec,
1102: x_chrv_rec => x_chrv_rec,
1103: x_khrv_rec => x_khrv_rec);
1104: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1106: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1107: RAISE OKL_API.G_EXCEPTION_ERROR;
1108: END IF;

Line 1105: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1101: p_khrv_rec => l_khrv_rec,
1102: x_chrv_rec => x_chrv_rec,
1103: x_khrv_rec => x_khrv_rec);
1104: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1106: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1107: RAISE OKL_API.G_EXCEPTION_ERROR;
1108: END IF;
1109: OKL_API.END_ACTIVITY (x_msg_count,

Line 1106: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1102: x_chrv_rec => x_chrv_rec,
1103: x_khrv_rec => x_khrv_rec);
1104: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1106: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1107: RAISE OKL_API.G_EXCEPTION_ERROR;
1108: END IF;
1109: OKL_API.END_ACTIVITY (x_msg_count,
1110: x_msg_data );

Line 1107: RAISE OKL_API.G_EXCEPTION_ERROR;

1103: x_khrv_rec => x_khrv_rec);
1104: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1105: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1106: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1107: RAISE OKL_API.G_EXCEPTION_ERROR;
1108: END IF;
1109: OKL_API.END_ACTIVITY (x_msg_count,
1110: x_msg_data );
1111: EXCEPTION

Line 1109: OKL_API.END_ACTIVITY (x_msg_count,

1105: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1106: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1107: RAISE OKL_API.G_EXCEPTION_ERROR;
1108: END IF;
1109: OKL_API.END_ACTIVITY (x_msg_count,
1110: x_msg_data );
1111: EXCEPTION
1112: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1113: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 1112: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1108: END IF;
1109: OKL_API.END_ACTIVITY (x_msg_count,
1110: x_msg_data );
1111: EXCEPTION
1112: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1113: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1114: l_api_name,
1115: G_PKG_NAME,
1116: 'OKL_API.G_RET_STS_ERROR',

Line 1113: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1109: OKL_API.END_ACTIVITY (x_msg_count,
1110: x_msg_data );
1111: EXCEPTION
1112: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1113: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1114: l_api_name,
1115: G_PKG_NAME,
1116: 'OKL_API.G_RET_STS_ERROR',
1117: x_msg_count,

Line 1116: 'OKL_API.G_RET_STS_ERROR',

1112: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1113: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1114: l_api_name,
1115: G_PKG_NAME,
1116: 'OKL_API.G_RET_STS_ERROR',
1117: x_msg_count,
1118: x_msg_data,
1119: '_PVT');
1120: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1120: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1116: 'OKL_API.G_RET_STS_ERROR',
1117: x_msg_count,
1118: x_msg_data,
1119: '_PVT');
1120: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1121: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1122: l_api_name,
1123: G_PKG_NAME,
1124: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1121: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1117: x_msg_count,
1118: x_msg_data,
1119: '_PVT');
1120: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1121: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1122: l_api_name,
1123: G_PKG_NAME,
1124: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1125: x_msg_count,

Line 1124: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1120: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1121: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1122: l_api_name,
1123: G_PKG_NAME,
1124: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1125: x_msg_count,
1126: x_msg_data,
1127: '_PVT');
1128: WHEN OTHERS THEN

Line 1129: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1125: x_msg_count,
1126: x_msg_data,
1127: '_PVT');
1128: WHEN OTHERS THEN
1129: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1130: l_api_name,
1131: G_PKG_NAME,
1132: 'OTHERS',
1133: x_msg_count,

Line 1171: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1167: AND lse.id = stl.lse_id
1168: AND stl.scs_code IN (G_LEASE_SCS_CODE,G_LOAN_SCS_CODE));
1169: BEGIN
1170: -- initialize return status
1171: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1172: -- data is required
1173: IF (p_dnz_chr_id = OKL_API.G_MISS_NUM OR
1174: p_dnz_chr_id IS NULL) AND
1175: (p_top_line_id = OKL_API.G_MISS_NUM OR

Line 1173: IF (p_dnz_chr_id = OKL_API.G_MISS_NUM OR

1169: BEGIN
1170: -- initialize return status
1171: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1172: -- data is required
1173: IF (p_dnz_chr_id = OKL_API.G_MISS_NUM OR
1174: p_dnz_chr_id IS NULL) AND
1175: (p_top_line_id = OKL_API.G_MISS_NUM OR
1176: p_top_line_id IS NULL) THEN
1177: -- store SQL error message on message stack

Line 1175: (p_top_line_id = OKL_API.G_MISS_NUM OR

1171: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1172: -- data is required
1173: IF (p_dnz_chr_id = OKL_API.G_MISS_NUM OR
1174: p_dnz_chr_id IS NULL) AND
1175: (p_top_line_id = OKL_API.G_MISS_NUM OR
1176: p_top_line_id IS NULL) THEN
1177: -- store SQL error message on message stack
1178: OKL_API.set_message(p_app_name => G_APP_NAME,
1179: p_msg_name => G_REQUIRED_VALUE,

Line 1178: OKL_API.set_message(p_app_name => G_APP_NAME,

1174: p_dnz_chr_id IS NULL) AND
1175: (p_top_line_id = OKL_API.G_MISS_NUM OR
1176: p_top_line_id IS NULL) THEN
1177: -- store SQL error message on message stack
1178: OKL_API.set_message(p_app_name => G_APP_NAME,
1179: p_msg_name => G_REQUIRED_VALUE,
1180: p_token1 => G_COL_NAME_TOKEN,
1181: p_token1_value => 'p_dnz_chr_id and p_top_line_id');
1182: -- halt validation as it is a required field

Line 1184: ELSIF (p_dnz_chr_id = OKL_API.G_MISS_NUM OR

1180: p_token1 => G_COL_NAME_TOKEN,
1181: p_token1_value => 'p_dnz_chr_id and p_top_line_id');
1182: -- halt validation as it is a required field
1183: RAISE G_EXCEPTION_STOP_VALIDATION;
1184: ELSIF (p_dnz_chr_id = OKL_API.G_MISS_NUM OR
1185: p_dnz_chr_id IS NULL) OR
1186: (p_top_line_id = OKL_API.G_MISS_NUM OR
1187: p_top_line_id IS NULL) THEN
1188: -- store SQL error message on message stack

Line 1186: (p_top_line_id = OKL_API.G_MISS_NUM OR

1182: -- halt validation as it is a required field
1183: RAISE G_EXCEPTION_STOP_VALIDATION;
1184: ELSIF (p_dnz_chr_id = OKL_API.G_MISS_NUM OR
1185: p_dnz_chr_id IS NULL) OR
1186: (p_top_line_id = OKL_API.G_MISS_NUM OR
1187: p_top_line_id IS NULL) THEN
1188: -- store SQL error message on message stack
1189: OKL_API.set_message(p_app_name => G_APP_NAME,
1190: p_msg_name => G_REQUIRED_VALUE,

Line 1189: OKL_API.set_message(p_app_name => G_APP_NAME,

1185: p_dnz_chr_id IS NULL) OR
1186: (p_top_line_id = OKL_API.G_MISS_NUM OR
1187: p_top_line_id IS NULL) THEN
1188: -- store SQL error message on message stack
1189: OKL_API.set_message(p_app_name => G_APP_NAME,
1190: p_msg_name => G_REQUIRED_VALUE,
1191: p_token1 => G_COL_NAME_TOKEN,
1192: p_token1_value => 'p_dnz_chr_id and p_top_line_id');
1193: -- halt validation as it is a required field

Line 1200: OKL_API.set_message(p_app_name => G_APP_NAME,

1196: -- Combination of dnz_chr_id and Top line id should be valid one
1197: OPEN c_chr_cle_id_validate(p_dnz_chr_id => p_dnz_chr_id,
1198: p_top_line_id => p_top_line_id);
1199: IF c_chr_cle_id_validate%NOTFOUND THEN
1200: OKL_API.set_message(p_app_name => G_APP_NAME,
1201: p_msg_name => G_NO_MATCHING_RECORD,
1202: p_token1 => G_COL_NAME_TOKEN,
1203: p_token1_value => 'p_dnz_chr_id and p_top_line_id');
1204: -- halt validation as it has no parent record

Line 1210: OKL_API.set_message(p_app_name => G_APP_NAME,

1206: END IF;
1207: FETCH c_chr_cle_id_validate INTO ln_dummy;
1208: CLOSE c_chr_cle_id_validate;
1209: IF (ln_dummy = 0) THEN
1210: OKL_API.set_message(p_app_name => G_APP_NAME,
1211: p_msg_name => G_NO_MATCHING_RECORD,
1212: p_token1 => G_COL_NAME_TOKEN,
1213: p_token1_value => 'p_dnz_chr_id and p_top_line_id');
1214: -- halt validation as it has no parent record

Line 1221: x_return_status := OKL_API.G_RET_STS_ERROR;

1217: EXCEPTION
1218: WHEN G_EXCEPTION_STOP_VALIDATION THEN
1219: -- We are here since the field is required
1220: -- Notify Error
1221: x_return_status := OKL_API.G_RET_STS_ERROR;
1222: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1223: -- If the cursor is open then it has to be closed
1224: IF c_chr_cle_id_validate%ISOPEN THEN
1225: CLOSE c_chr_cle_id_validate;

Line 1227: x_return_status := OKL_API.G_RET_STS_ERROR;

1223: -- If the cursor is open then it has to be closed
1224: IF c_chr_cle_id_validate%ISOPEN THEN
1225: CLOSE c_chr_cle_id_validate;
1226: END IF;
1227: x_return_status := OKL_API.G_RET_STS_ERROR;
1228: WHEN OTHERS THEN
1229: -- store SQL error message on message stack
1230: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1231: p_msg_name => G_UNEXPECTED_ERROR,

Line 1230: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1226: END IF;
1227: x_return_status := OKL_API.G_RET_STS_ERROR;
1228: WHEN OTHERS THEN
1229: -- store SQL error message on message stack
1230: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1231: p_msg_name => G_UNEXPECTED_ERROR,
1232: p_token1 => G_SQLCODE_TOKEN,
1233: p_token1_value => SQLCODE,
1234: p_token2 => G_SQLERRM_TOKEN,

Line 1241: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1237: IF c_chr_cle_id_validate%ISOPEN THEN
1238: CLOSE c_chr_cle_id_validate;
1239: END IF;
1240: -- notify caller of an error as UNEXPETED error
1241: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1242: END validate_chr_cle_id;
1243: ----------------------------------------------------------------------------------------------------
1244: -- Start of Commnets
1245: -- Badrinath Kuchibholta

Line 1264: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1260: FROM OKC_K_HEADERS_B CHR
1261: WHERE CHR.id = p_chr_id;
1262: BEGIN
1263: -- initialize return status
1264: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1265: -- data is required
1266: IF (p_chr_id = OKL_API.G_MISS_NUM) OR
1267: (p_chr_id IS NULL) THEN
1268: -- store SQL error message on message stack

Line 1266: IF (p_chr_id = OKL_API.G_MISS_NUM) OR

1262: BEGIN
1263: -- initialize return status
1264: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1265: -- data is required
1266: IF (p_chr_id = OKL_API.G_MISS_NUM) OR
1267: (p_chr_id IS NULL) THEN
1268: -- store SQL error message on message stack
1269: OKL_API.set_message(p_app_name => G_APP_NAME,
1270: p_msg_name => G_REQUIRED_VALUE,

Line 1269: OKL_API.set_message(p_app_name => G_APP_NAME,

1265: -- data is required
1266: IF (p_chr_id = OKL_API.G_MISS_NUM) OR
1267: (p_chr_id IS NULL) THEN
1268: -- store SQL error message on message stack
1269: OKL_API.set_message(p_app_name => G_APP_NAME,
1270: p_msg_name => G_REQUIRED_VALUE,
1271: p_token1 => G_COL_NAME_TOKEN,
1272: p_token1_value => 'OKC_K_HEADERS_V.ID');
1273: -- halt validation as it is a required field

Line 1279: OKL_API.set_message(p_app_name => G_APP_NAME,

1275: END IF;
1276: OPEN get_k_number(p_chr_id);
1277: FETCH get_k_number INTO x_contract_number;
1278: IF get_k_number%NOTFOUND THEN
1279: OKL_API.set_message(p_app_name => G_APP_NAME,
1280: p_msg_name => G_NO_MATCHING_RECORD,
1281: p_token1 => G_COL_NAME_TOKEN,
1282: p_token1_value => 'p_chr_id');
1283: -- halt validation as it has no parent record

Line 1288: (x_contract_number = OKL_API.G_MISS_CHAR)THEN

1284: RAISE G_EXCEPTION_HALT_VALIDATION;
1285: END IF;
1286: CLOSE get_k_number;
1287: IF (x_contract_number IS NULL) OR
1288: (x_contract_number = OKL_API.G_MISS_CHAR)THEN
1289: OKL_API.set_message(p_app_name => G_APP_NAME,
1290: p_msg_name => G_NO_MATCHING_RECORD,
1291: p_token1 => G_COL_NAME_TOKEN,
1292: p_token1_value => 'p_chr_id');

Line 1289: OKL_API.set_message(p_app_name => G_APP_NAME,

1285: END IF;
1286: CLOSE get_k_number;
1287: IF (x_contract_number IS NULL) OR
1288: (x_contract_number = OKL_API.G_MISS_CHAR)THEN
1289: OKL_API.set_message(p_app_name => G_APP_NAME,
1290: p_msg_name => G_NO_MATCHING_RECORD,
1291: p_token1 => G_COL_NAME_TOKEN,
1292: p_token1_value => 'p_chr_id');
1293: -- halt validation as it has no parent record

Line 1300: x_return_status := OKL_API.G_RET_STS_ERROR;

1296: EXCEPTION
1297: WHEN G_EXCEPTION_STOP_VALIDATION THEN
1298: -- We are here since the field is required
1299: -- Notify Error
1300: x_return_status := OKL_API.G_RET_STS_ERROR;
1301: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1302: -- If the cursor is open then it has to be closed
1303: IF get_k_number%ISOPEN THEN
1304: CLOSE get_k_number;

Line 1306: x_return_status := OKL_API.G_RET_STS_ERROR;

1302: -- If the cursor is open then it has to be closed
1303: IF get_k_number%ISOPEN THEN
1304: CLOSE get_k_number;
1305: END IF;
1306: x_return_status := OKL_API.G_RET_STS_ERROR;
1307: WHEN OTHERS THEN
1308: -- store SQL error message on message stack
1309: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1310: p_msg_name => G_UNEXPECTED_ERROR,

Line 1309: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

1305: END IF;
1306: x_return_status := OKL_API.G_RET_STS_ERROR;
1307: WHEN OTHERS THEN
1308: -- store SQL error message on message stack
1309: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1310: p_msg_name => G_UNEXPECTED_ERROR,
1311: p_token1 => G_SQLCODE_TOKEN,
1312: p_token1_value => SQLCODE,
1313: p_token2 => G_SQLERRM_TOKEN,

Line 1320: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1316: IF get_k_number%ISOPEN THEN
1317: CLOSE get_k_number;
1318: END IF;
1319: -- notify caller of an error as UNEXPETED error
1320: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1321: END validate_chr_id;
1322: --------------------------------------------------------------------------------------------------
1323: FUNCTION get_qcl_id(p_chr_id IN OKC_K_HEADERS_B.ID%TYPE,
1324: x_qcl_id OUT NOCOPY NUMBER)

Line 1326: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;

1322: --------------------------------------------------------------------------------------------------
1323: FUNCTION get_qcl_id(p_chr_id IN OKC_K_HEADERS_B.ID%TYPE,
1324: x_qcl_id OUT NOCOPY NUMBER)
1325: RETURN VARCHAR2 IS
1326: x_return_status VARCHAR2(3) := OKL_API.G_RET_STS_SUCCESS;
1327: ln_qcl_id OKC_K_HEADERS_B.QCL_ID%TYPE;
1328: ln_chr_id OKC_K_HEADERS_B.ID%TYPE;
1329: CURSOR get_qcl_id_name(p_qcl_name VARCHAR2) IS
1330: SELECT id

Line 1353: OKL_API.set_message(

1349: RETURN(x_return_status);
1350: EXCEPTION
1351: WHEN OTHERS THEN
1352: -- store SQL error message on message stack for caller
1353: OKL_API.set_message(
1354: G_APP_NAME,
1355: G_UNEXPECTED_ERROR,
1356: G_SQLCODE_TOKEN,
1357: SQLCODE,

Line 1367: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1363: IF get_qcl_id_chr%ISOPEN THEN
1364: CLOSE get_qcl_id_chr;
1365: END IF;
1366: -- notify caller of an UNEXPECTED error
1367: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1368: RETURN(x_return_status);
1369: END get_qcl_id;
1370: -------------------------------------------------------------------------------------------------
1371: -- Start of Commnets

Line 1380: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1376: -- Parameters :
1377: -- Version :
1378: -- End of Commnets
1379: PROCEDURE l_copy_contract_header(p_api_version IN NUMBER,
1380: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1381: x_return_status OUT NOCOPY VARCHAR2,
1382: x_msg_count OUT NOCOPY NUMBER,
1383: x_msg_data OUT NOCOPY VARCHAR2,
1384: p_commit IN VARCHAR2 DEFAULT 'F',

Line 1390: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1386: p_new_contract_number IN VARCHAR2 DEFAULT NULL,
1387: x_new_header_id OUT NOCOPY OKC_K_HEADERS_V.ID%TYPE) IS
1388: l_api_name CONSTANT VARCHAR2(30) := 'LOCAL_COPY_CONTRACT';
1389: BEGIN
1390: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1391: -- Call start_activity to create savepoint, check compatibility
1392: -- and initialize message list
1393: x_return_status := OKL_API.START_ACTIVITY (
1394: l_api_name

Line 1393: x_return_status := OKL_API.START_ACTIVITY (

1389: BEGIN
1390: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1391: -- Call start_activity to create savepoint, check compatibility
1392: -- and initialize message list
1393: x_return_status := OKL_API.START_ACTIVITY (
1394: l_api_name
1395: ,p_init_msg_list
1396: ,'_PVT'
1397: ,x_return_status);

Line 1399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1395: ,p_init_msg_list
1396: ,'_PVT'
1397: ,x_return_status);
1398: -- Check if activity started successfully
1399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1402: RAISE OKL_API.G_EXCEPTION_ERROR;
1403: END IF;

Line 1400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1396: ,'_PVT'
1397: ,x_return_status);
1398: -- Check if activity started successfully
1399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1402: RAISE OKL_API.G_EXCEPTION_ERROR;
1403: END IF;
1404: -- TO copy the Copy the contract first

Line 1401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1397: ,x_return_status);
1398: -- Check if activity started successfully
1399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1402: RAISE OKL_API.G_EXCEPTION_ERROR;
1403: END IF;
1404: -- TO copy the Copy the contract first
1405: OKL_COPY_CONTRACT_PUB.copy_contract(p_api_version => p_api_version,

Line 1402: RAISE OKL_API.G_EXCEPTION_ERROR;

1398: -- Check if activity started successfully
1399: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1400: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1401: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1402: RAISE OKL_API.G_EXCEPTION_ERROR;
1403: END IF;
1404: -- TO copy the Copy the contract first
1405: OKL_COPY_CONTRACT_PUB.copy_contract(p_api_version => p_api_version,
1406: p_init_msg_list => p_init_msg_list,

Line 1410: p_commit => OKL_API.G_FALSE,

1406: p_init_msg_list => p_init_msg_list,
1407: x_return_status => x_return_status,
1408: x_msg_count => x_msg_count,
1409: x_msg_data => x_msg_data,
1410: p_commit => OKL_API.G_FALSE,
1411: p_chr_id => p_old_chr_id,
1412: p_contract_number => p_new_contract_number,
1413: p_contract_number_modifier => NULL,
1414: p_to_template_yn => 'N',

Line 1419: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1415: p_renew_ref_yn => 'N',
1416: p_copy_lines_yn => 'N',
1417: p_override_org => 'N',
1418: x_chr_id => x_new_header_id);
1419: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1420: OKL_API.set_message(p_app_name => G_APP_NAME,
1421: p_msg_name => G_COPY_HEADER);
1422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1423: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 1420: OKL_API.set_message(p_app_name => G_APP_NAME,

1416: p_copy_lines_yn => 'N',
1417: p_override_org => 'N',
1418: x_chr_id => x_new_header_id);
1419: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1420: OKL_API.set_message(p_app_name => G_APP_NAME,
1421: p_msg_name => G_COPY_HEADER);
1422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1423: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1424: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 1422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1418: x_chr_id => x_new_header_id);
1419: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1420: OKL_API.set_message(p_app_name => G_APP_NAME,
1421: p_msg_name => G_COPY_HEADER);
1422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1423: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1424: OKL_API.set_message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_COPY_HEADER);
1426: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1423: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1419: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1420: OKL_API.set_message(p_app_name => G_APP_NAME,
1421: p_msg_name => G_COPY_HEADER);
1422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1423: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1424: OKL_API.set_message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_COPY_HEADER);
1426: RAISE OKL_API.G_EXCEPTION_ERROR;
1427: END IF;

Line 1424: OKL_API.set_message(p_app_name => G_APP_NAME,

1420: OKL_API.set_message(p_app_name => G_APP_NAME,
1421: p_msg_name => G_COPY_HEADER);
1422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1423: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1424: OKL_API.set_message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_COPY_HEADER);
1426: RAISE OKL_API.G_EXCEPTION_ERROR;
1427: END IF;
1428: OKL_API.END_ACTIVITY (x_msg_count,

Line 1426: RAISE OKL_API.G_EXCEPTION_ERROR;

1422: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1423: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1424: OKL_API.set_message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_COPY_HEADER);
1426: RAISE OKL_API.G_EXCEPTION_ERROR;
1427: END IF;
1428: OKL_API.END_ACTIVITY (x_msg_count,
1429: x_msg_data );
1430: EXCEPTION

Line 1428: OKL_API.END_ACTIVITY (x_msg_count,

1424: OKL_API.set_message(p_app_name => G_APP_NAME,
1425: p_msg_name => G_COPY_HEADER);
1426: RAISE OKL_API.G_EXCEPTION_ERROR;
1427: END IF;
1428: OKL_API.END_ACTIVITY (x_msg_count,
1429: x_msg_data );
1430: EXCEPTION
1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1432: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1427: END IF;
1428: OKL_API.END_ACTIVITY (x_msg_count,
1429: x_msg_data );
1430: EXCEPTION
1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1432: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1433: l_api_name,
1434: G_PKG_NAME,
1435: 'OKL_API.G_RET_STS_ERROR',

Line 1432: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1428: OKL_API.END_ACTIVITY (x_msg_count,
1429: x_msg_data );
1430: EXCEPTION
1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1432: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1433: l_api_name,
1434: G_PKG_NAME,
1435: 'OKL_API.G_RET_STS_ERROR',
1436: x_msg_count,

Line 1435: 'OKL_API.G_RET_STS_ERROR',

1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1432: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1433: l_api_name,
1434: G_PKG_NAME,
1435: 'OKL_API.G_RET_STS_ERROR',
1436: x_msg_count,
1437: x_msg_data,
1438: '_PVT');
1439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1435: 'OKL_API.G_RET_STS_ERROR',
1436: x_msg_count,
1437: x_msg_data,
1438: '_PVT');
1439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1440: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1441: l_api_name,
1442: G_PKG_NAME,
1443: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1440: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1436: x_msg_count,
1437: x_msg_data,
1438: '_PVT');
1439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1440: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1441: l_api_name,
1442: G_PKG_NAME,
1443: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1444: x_msg_count,

Line 1443: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1439: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1440: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1441: l_api_name,
1442: G_PKG_NAME,
1443: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1444: x_msg_count,
1445: x_msg_data,
1446: '_PVT');
1447: WHEN OTHERS THEN

Line 1448: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1444: x_msg_count,
1445: x_msg_data,
1446: '_PVT');
1447: WHEN OTHERS THEN
1448: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1449: l_api_name,
1450: G_PKG_NAME,
1451: 'OTHERS',
1452: x_msg_count,

Line 1466: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1462: -- Parameters :
1463: -- Version :
1464: -- End of Commnets
1465: PROCEDURE l_copy_contract_line(p_api_version IN NUMBER,
1466: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1467: x_return_status OUT NOCOPY VARCHAR2,
1468: x_msg_count OUT NOCOPY NUMBER,
1469: x_msg_data OUT NOCOPY VARCHAR2,
1470: p_commit IN VARCHAR2 DEFAULT 'F',

Line 1477: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1473: x_new_k_top_id OUT NOCOPY NUMBER) IS
1474:
1475: l_api_name CONSTANT VARCHAR2(30) := 'LOCAL_COPY_CONTRACT';
1476: BEGIN
1477: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1478: -- Call start_activity to create savepoint, check compatibility
1479: -- and initialize message list
1480: x_return_status := OKL_API.START_ACTIVITY (
1481: l_api_name

Line 1480: x_return_status := OKL_API.START_ACTIVITY (

1476: BEGIN
1477: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1478: -- Call start_activity to create savepoint, check compatibility
1479: -- and initialize message list
1480: x_return_status := OKL_API.START_ACTIVITY (
1481: l_api_name
1482: ,p_init_msg_list
1483: ,'_PVT'
1484: ,x_return_status);

Line 1486: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1482: ,p_init_msg_list
1483: ,'_PVT'
1484: ,x_return_status);
1485: -- Check if activity started successfully
1486: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1487: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1488: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1489: RAISE OKL_API.G_EXCEPTION_ERROR;
1490: END IF;

Line 1487: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1483: ,'_PVT'
1484: ,x_return_status);
1485: -- Check if activity started successfully
1486: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1487: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1488: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1489: RAISE OKL_API.G_EXCEPTION_ERROR;
1490: END IF;
1491: -- Now the Copy the Asset lines

Line 1488: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1484: ,x_return_status);
1485: -- Check if activity started successfully
1486: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1487: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1488: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1489: RAISE OKL_API.G_EXCEPTION_ERROR;
1490: END IF;
1491: -- Now the Copy the Asset lines
1492: OKL_COPY_ASSET_PUB.COPY_ASSET_LINES(p_api_version => p_api_version,

Line 1489: RAISE OKL_API.G_EXCEPTION_ERROR;

1485: -- Check if activity started successfully
1486: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1487: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1488: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1489: RAISE OKL_API.G_EXCEPTION_ERROR;
1490: END IF;
1491: -- Now the Copy the Asset lines
1492: OKL_COPY_ASSET_PUB.COPY_ASSET_LINES(p_api_version => p_api_version,
1493: p_init_msg_list => p_init_msg_list,

Line 1506: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1502: p_trans_type => 'CSP',
1503: p_copy_line_party_yn => 'Y',
1504: p_renew_ref_yn => 'N',
1505: x_cle_id => x_new_k_top_id);
1506: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1507: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1508: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1509: RAISE OKL_API.G_EXCEPTION_ERROR;
1510: END IF;

Line 1507: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1503: p_copy_line_party_yn => 'Y',
1504: p_renew_ref_yn => 'N',
1505: x_cle_id => x_new_k_top_id);
1506: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1507: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1508: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1509: RAISE OKL_API.G_EXCEPTION_ERROR;
1510: END IF;
1511: OKL_API.END_ACTIVITY (x_msg_count,

Line 1508: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1504: p_renew_ref_yn => 'N',
1505: x_cle_id => x_new_k_top_id);
1506: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1507: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1508: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1509: RAISE OKL_API.G_EXCEPTION_ERROR;
1510: END IF;
1511: OKL_API.END_ACTIVITY (x_msg_count,
1512: x_msg_data );

Line 1509: RAISE OKL_API.G_EXCEPTION_ERROR;

1505: x_cle_id => x_new_k_top_id);
1506: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1507: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1508: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1509: RAISE OKL_API.G_EXCEPTION_ERROR;
1510: END IF;
1511: OKL_API.END_ACTIVITY (x_msg_count,
1512: x_msg_data );
1513: EXCEPTION

Line 1511: OKL_API.END_ACTIVITY (x_msg_count,

1507: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1508: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1509: RAISE OKL_API.G_EXCEPTION_ERROR;
1510: END IF;
1511: OKL_API.END_ACTIVITY (x_msg_count,
1512: x_msg_data );
1513: EXCEPTION
1514: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 1514: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1510: END IF;
1511: OKL_API.END_ACTIVITY (x_msg_count,
1512: x_msg_data );
1513: EXCEPTION
1514: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1516: l_api_name,
1517: G_PKG_NAME,
1518: 'OKL_API.G_RET_STS_ERROR',

Line 1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1511: OKL_API.END_ACTIVITY (x_msg_count,
1512: x_msg_data );
1513: EXCEPTION
1514: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1516: l_api_name,
1517: G_PKG_NAME,
1518: 'OKL_API.G_RET_STS_ERROR',
1519: x_msg_count,

Line 1518: 'OKL_API.G_RET_STS_ERROR',

1514: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1515: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1516: l_api_name,
1517: G_PKG_NAME,
1518: 'OKL_API.G_RET_STS_ERROR',
1519: x_msg_count,
1520: x_msg_data,
1521: '_PVT');
1522: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1522: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1518: 'OKL_API.G_RET_STS_ERROR',
1519: x_msg_count,
1520: x_msg_data,
1521: '_PVT');
1522: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1523: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1524: l_api_name,
1525: G_PKG_NAME,
1526: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1523: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1519: x_msg_count,
1520: x_msg_data,
1521: '_PVT');
1522: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1523: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1524: l_api_name,
1525: G_PKG_NAME,
1526: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1527: x_msg_count,

Line 1526: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1522: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1523: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1524: l_api_name,
1525: G_PKG_NAME,
1526: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1527: x_msg_count,
1528: x_msg_data,
1529: '_PVT');
1530: WHEN OTHERS THEN

Line 1531: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1527: x_msg_count,
1528: x_msg_data,
1529: '_PVT');
1530: WHEN OTHERS THEN
1531: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1532: l_api_name,
1533: G_PKG_NAME,
1534: 'OTHERS',
1535: x_msg_count,

Line 1549: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1545: -- Parameters :
1546: -- Version :
1547: -- End of Commnets
1548: PROCEDURE l_delete_contract_line(p_api_version IN NUMBER,
1549: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1550: x_return_status OUT NOCOPY VARCHAR2,
1551: x_msg_count OUT NOCOPY NUMBER,
1552: x_msg_data OUT NOCOPY VARCHAR2,
1553: p_contract_id IN OKC_K_HEADERS_V.ID%TYPE) IS

Line 1616: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1612: AND CHR.orig_system_source_code = 'OKL_SPLIT'
1613: AND CHR.orig_system_id1= p_org_sys_id;
1614:
1615: BEGIN
1616: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1617: -- Call start_activity to create savepoint, check compatibility
1618: -- and initialize message list
1619: x_return_status := OKL_API.START_ACTIVITY (
1620: l_api_name

Line 1619: x_return_status := OKL_API.START_ACTIVITY (

1615: BEGIN
1616: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1617: -- Call start_activity to create savepoint, check compatibility
1618: -- and initialize message list
1619: x_return_status := OKL_API.START_ACTIVITY (
1620: l_api_name
1621: ,p_init_msg_list
1622: ,'_PVT'
1623: ,x_return_status);

Line 1625: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1621: ,p_init_msg_list
1622: ,'_PVT'
1623: ,x_return_status);
1624: -- Check if activity started successfully
1625: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1626: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1628: RAISE OKL_API.G_EXCEPTION_ERROR;
1629: END IF;

Line 1626: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1622: ,'_PVT'
1623: ,x_return_status);
1624: -- Check if activity started successfully
1625: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1626: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1628: RAISE OKL_API.G_EXCEPTION_ERROR;
1629: END IF;
1630: -- Get the Orig system id1

Line 1627: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1623: ,x_return_status);
1624: -- Check if activity started successfully
1625: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1626: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1628: RAISE OKL_API.G_EXCEPTION_ERROR;
1629: END IF;
1630: -- Get the Orig system id1
1631: OPEN get_orig_sys_id1(p_chr_id => p_contract_id);

Line 1628: RAISE OKL_API.G_EXCEPTION_ERROR;

1624: -- Check if activity started successfully
1625: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1626: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1628: RAISE OKL_API.G_EXCEPTION_ERROR;
1629: END IF;
1630: -- Get the Orig system id1
1631: OPEN get_orig_sys_id1(p_chr_id => p_contract_id);
1632: FETCH get_orig_sys_id1 INTO ln_orig_system_id1;

Line 1634: OKL_API.set_message(p_app_name => G_APP_NAME,

1630: -- Get the Orig system id1
1631: OPEN get_orig_sys_id1(p_chr_id => p_contract_id);
1632: FETCH get_orig_sys_id1 INTO ln_orig_system_id1;
1633: IF get_orig_sys_id1%NOTFOUND THEN
1634: OKL_API.set_message(p_app_name => G_APP_NAME,
1635: p_msg_name => G_NO_MATCHING_RECORD,
1636: p_token1 => G_COL_NAME_TOKEN,
1637: p_token1_value => 'p_chr_id');
1638: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1638: RAISE OKL_API.G_EXCEPTION_ERROR;

1634: OKL_API.set_message(p_app_name => G_APP_NAME,
1635: p_msg_name => G_NO_MATCHING_RECORD,
1636: p_token1 => G_COL_NAME_TOKEN,
1637: p_token1_value => 'p_chr_id');
1638: RAISE OKL_API.G_EXCEPTION_ERROR;
1639: END IF;
1640: CLOSE get_orig_sys_id1;
1641: -- get Trx id
1642: OPEN get_trx_id(p_org_sys_id => ln_orig_system_id1);

Line 1655: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1651: x_msg_count => x_msg_count,
1652: x_msg_data => x_msg_data,
1653: p_tcnv_rec => l_tcnv_rec,
1654: x_tcnv_rec => lx_tcnv_rec);
1655: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1658: RAISE OKL_API.G_EXCEPTION_ERROR;
1659: END IF;

Line 1656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1652: x_msg_data => x_msg_data,
1653: p_tcnv_rec => l_tcnv_rec,
1654: x_tcnv_rec => lx_tcnv_rec);
1655: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1658: RAISE OKL_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: END IF;

Line 1657: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1653: p_tcnv_rec => l_tcnv_rec,
1654: x_tcnv_rec => lx_tcnv_rec);
1655: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1658: RAISE OKL_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: END IF;
1661: CLOSE get_trx_id;

Line 1658: RAISE OKL_API.G_EXCEPTION_ERROR;

1654: x_tcnv_rec => lx_tcnv_rec);
1655: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1658: RAISE OKL_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: END IF;
1661: CLOSE get_trx_id;
1662: -- Since we cannot delete contract line which is already booked

Line 1672: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1668: x_msg_count => x_msg_count,
1669: x_msg_data => x_msg_data,
1670: p_khr_status => 'INCOMPLETE',
1671: p_chr_id => p_contract_id);
1672: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1673: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1674: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1675: RAISE OKL_API.G_EXCEPTION_ERROR;
1676: END IF;

Line 1673: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1669: x_msg_data => x_msg_data,
1670: p_khr_status => 'INCOMPLETE',
1671: p_chr_id => p_contract_id);
1672: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1673: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1674: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1675: RAISE OKL_API.G_EXCEPTION_ERROR;
1676: END IF;
1677: -- We need to change the status of the Lines for the contract

Line 1674: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1670: p_khr_status => 'INCOMPLETE',
1671: p_chr_id => p_contract_id);
1672: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1673: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1674: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1675: RAISE OKL_API.G_EXCEPTION_ERROR;
1676: END IF;
1677: -- We need to change the status of the Lines for the contract
1678: OKL_CONTRACT_STATUS_PUB.cascade_lease_status(

Line 1675: RAISE OKL_API.G_EXCEPTION_ERROR;

1671: p_chr_id => p_contract_id);
1672: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1673: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1674: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1675: RAISE OKL_API.G_EXCEPTION_ERROR;
1676: END IF;
1677: -- We need to change the status of the Lines for the contract
1678: OKL_CONTRACT_STATUS_PUB.cascade_lease_status(
1679: p_api_version => p_api_version,

Line 1685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1681: x_return_status => x_return_status,
1682: x_msg_count => x_msg_count,
1683: x_msg_data => x_msg_data,
1684: p_chr_id => p_contract_id);
1685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1688: RAISE OKL_API.G_EXCEPTION_ERROR;
1689: END IF;

Line 1686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1682: x_msg_count => x_msg_count,
1683: x_msg_data => x_msg_data,
1684: p_chr_id => p_contract_id);
1685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1688: RAISE OKL_API.G_EXCEPTION_ERROR;
1689: END IF;
1690: -- Deleting the Draft journal Entries

Line 1687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1683: x_msg_data => x_msg_data,
1684: p_chr_id => p_contract_id);
1685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1688: RAISE OKL_API.G_EXCEPTION_ERROR;
1689: END IF;
1690: -- Deleting the Draft journal Entries
1691: FOR r_get_source_id IN c_get_source_id(p_khr_id => p_contract_id) LOOP

Line 1688: RAISE OKL_API.G_EXCEPTION_ERROR;

1684: p_chr_id => p_contract_id);
1685: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1686: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1687: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1688: RAISE OKL_API.G_EXCEPTION_ERROR;
1689: END IF;
1690: -- Deleting the Draft journal Entries
1691: FOR r_get_source_id IN c_get_source_id(p_khr_id => p_contract_id) LOOP
1692: OKL_ACCOUNT_DIST_PUB.DELETE_ACCT_ENTRIES(

Line 1700: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1696: x_msg_count => x_msg_count,
1697: x_msg_data => x_msg_data,
1698: p_source_id => r_get_source_id.id,
1699: p_source_table => 'OKL_TXL_CNTRCT_LNS');
1700: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1701: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1702: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1703: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1704: END IF;

Line 1701: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

1697: x_msg_data => x_msg_data,
1698: p_source_id => r_get_source_id.id,
1699: p_source_table => 'OKL_TXL_CNTRCT_LNS');
1700: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1701: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1702: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1703: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1704: END IF;
1705: END LOOP;

Line 1702: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1698: p_source_id => r_get_source_id.id,
1699: p_source_table => 'OKL_TXL_CNTRCT_LNS');
1700: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1701: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1702: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1703: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1704: END IF;
1705: END LOOP;
1706: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1703: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

1699: p_source_table => 'OKL_TXL_CNTRCT_LNS');
1700: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1701: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1702: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1703: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1704: END IF;
1705: END LOOP;
1706: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1707: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1706: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1702: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1703: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1704: END IF;
1705: END LOOP;
1706: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1707: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1708: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1709: RAISE OKL_API.G_EXCEPTION_ERROR;
1710: END IF;

Line 1707: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1703: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1704: END IF;
1705: END LOOP;
1706: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1707: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1708: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1709: RAISE OKL_API.G_EXCEPTION_ERROR;
1710: END IF;
1711: -- Deleting the transctions of the journal Entries

Line 1708: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1704: END IF;
1705: END LOOP;
1706: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1707: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1708: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1709: RAISE OKL_API.G_EXCEPTION_ERROR;
1710: END IF;
1711: -- Deleting the transctions of the journal Entries
1712: FOR r_get_je_trans IN c_get_je_trans(p_khr_id => p_contract_id) LOOP

Line 1709: RAISE OKL_API.G_EXCEPTION_ERROR;

1705: END LOOP;
1706: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1707: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1708: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1709: RAISE OKL_API.G_EXCEPTION_ERROR;
1710: END IF;
1711: -- Deleting the transctions of the journal Entries
1712: FOR r_get_je_trans IN c_get_je_trans(p_khr_id => p_contract_id) LOOP
1713: r_tcnv_rec.id := r_get_je_trans.trx_id;

Line 1721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1717: x_return_status => x_return_status,
1718: x_msg_count => x_msg_count,
1719: x_msg_data => x_msg_data,
1720: p_tcnv_rec => r_tcnv_rec);
1721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1722: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1724: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1725: END IF;

Line 1722: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

1718: x_msg_count => x_msg_count,
1719: x_msg_data => x_msg_data,
1720: p_tcnv_rec => r_tcnv_rec);
1721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1722: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1724: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1725: END IF;
1726: END LOOP;

Line 1723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1719: x_msg_data => x_msg_data,
1720: p_tcnv_rec => r_tcnv_rec);
1721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1722: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1724: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1725: END IF;
1726: END LOOP;
1727: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1724: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

1720: p_tcnv_rec => r_tcnv_rec);
1721: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1722: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1724: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1725: END IF;
1726: END LOOP;
1727: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1728: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1727: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1723: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1724: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1725: END IF;
1726: END LOOP;
1727: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1728: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1729: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1730: RAISE OKL_API.G_EXCEPTION_ERROR;
1731: END IF;

Line 1728: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1724: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1725: END IF;
1726: END LOOP;
1727: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1728: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1729: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1730: RAISE OKL_API.G_EXCEPTION_ERROR;
1731: END IF;
1732: -- Delete the streams for the contract

Line 1729: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1725: END IF;
1726: END LOOP;
1727: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1728: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1729: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1730: RAISE OKL_API.G_EXCEPTION_ERROR;
1731: END IF;
1732: -- Delete the streams for the contract
1733: FOR r_get_k_stream IN c_get_k_stream(p_khr_id => p_contract_id) LOOP

Line 1730: RAISE OKL_API.G_EXCEPTION_ERROR;

1726: END LOOP;
1727: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1728: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1729: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1730: RAISE OKL_API.G_EXCEPTION_ERROR;
1731: END IF;
1732: -- Delete the streams for the contract
1733: FOR r_get_k_stream IN c_get_k_stream(p_khr_id => p_contract_id) LOOP
1734: l_stmv_rec.id := r_get_k_stream.stm_id;

Line 1742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1738: x_return_status => x_return_status,
1739: x_msg_count => x_msg_count,
1740: x_msg_data => x_msg_data,
1741: p_stmv_rec => l_stmv_rec);
1742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1743: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1745: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1746: END IF;

Line 1743: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

1739: x_msg_count => x_msg_count,
1740: x_msg_data => x_msg_data,
1741: p_stmv_rec => l_stmv_rec);
1742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1743: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1745: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1746: END IF;
1747: END LOOP;

Line 1744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1740: x_msg_data => x_msg_data,
1741: p_stmv_rec => l_stmv_rec);
1742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1743: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1745: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1746: END IF;
1747: END LOOP;
1748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1745: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

1741: p_stmv_rec => l_stmv_rec);
1742: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1743: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1745: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1746: END IF;
1747: END LOOP;
1748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1744: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1745: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1746: END IF;
1747: END LOOP;
1748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1751: RAISE OKL_API.G_EXCEPTION_ERROR;
1752: END IF;

Line 1749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1745: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1746: END IF;
1747: END LOOP;
1748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1751: RAISE OKL_API.G_EXCEPTION_ERROR;
1752: END IF;
1753: -- Delete the contract lines

Line 1750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1746: END IF;
1747: END LOOP;
1748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1751: RAISE OKL_API.G_EXCEPTION_ERROR;
1752: END IF;
1753: -- Delete the contract lines
1754: FOR r_get_k_top_line IN c_get_k_top_line(p_dnz_chr_id => p_contract_id) LOOP

Line 1751: RAISE OKL_API.G_EXCEPTION_ERROR;

1747: END LOOP;
1748: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1749: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1751: RAISE OKL_API.G_EXCEPTION_ERROR;
1752: END IF;
1753: -- Delete the contract lines
1754: FOR r_get_k_top_line IN c_get_k_top_line(p_dnz_chr_id => p_contract_id) LOOP
1755: OKL_CONTRACT_PUB.delete_contract_line(

Line 1762: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1758: x_return_status => x_return_status,
1759: x_msg_count => x_msg_count,
1760: x_msg_data => x_msg_data,
1761: p_line_id => r_get_k_top_line.top_line);
1762: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1764: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1765: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1766: END IF;

Line 1763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

1759: x_msg_count => x_msg_count,
1760: x_msg_data => x_msg_data,
1761: p_line_id => r_get_k_top_line.top_line);
1762: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1764: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1765: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1766: END IF;
1767: END LOOP;

Line 1764: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1760: x_msg_data => x_msg_data,
1761: p_line_id => r_get_k_top_line.top_line);
1762: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1764: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1765: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1766: END IF;
1767: END LOOP;
1768: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1765: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

1761: p_line_id => r_get_k_top_line.top_line);
1762: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
1764: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1765: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1766: END IF;
1767: END LOOP;
1768: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1768: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1764: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1765: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1766: END IF;
1767: END LOOP;
1768: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1770: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1771: RAISE OKL_API.G_EXCEPTION_ERROR;
1772: END IF;

Line 1769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1765: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
1766: END IF;
1767: END LOOP;
1768: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1770: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1771: RAISE OKL_API.G_EXCEPTION_ERROR;
1772: END IF;
1773: -- Now the Delete the Header

Line 1770: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1766: END IF;
1767: END LOOP;
1768: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1770: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1771: RAISE OKL_API.G_EXCEPTION_ERROR;
1772: END IF;
1773: -- Now the Delete the Header
1774: l_chrv_rec.id := p_contract_id;

Line 1771: RAISE OKL_API.G_EXCEPTION_ERROR;

1767: END LOOP;
1768: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1770: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1771: RAISE OKL_API.G_EXCEPTION_ERROR;
1772: END IF;
1773: -- Now the Delete the Header
1774: l_chrv_rec.id := p_contract_id;
1775: l_khrv_rec.id := p_contract_id;

Line 1784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1780: x_msg_count => x_msg_count,
1781: x_msg_data => x_msg_data,
1782: p_chrv_rec => l_chrv_rec,
1783: p_khrv_rec => l_khrv_rec);
1784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1785: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1786: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1787: RAISE OKL_API.G_EXCEPTION_ERROR;
1788: END IF;

Line 1785: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1781: x_msg_data => x_msg_data,
1782: p_chrv_rec => l_chrv_rec,
1783: p_khrv_rec => l_khrv_rec);
1784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1785: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1786: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1787: RAISE OKL_API.G_EXCEPTION_ERROR;
1788: END IF;
1789: OKL_API.END_ACTIVITY (x_msg_count,

Line 1786: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1782: p_chrv_rec => l_chrv_rec,
1783: p_khrv_rec => l_khrv_rec);
1784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1785: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1786: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1787: RAISE OKL_API.G_EXCEPTION_ERROR;
1788: END IF;
1789: OKL_API.END_ACTIVITY (x_msg_count,
1790: x_msg_data );

Line 1787: RAISE OKL_API.G_EXCEPTION_ERROR;

1783: p_khrv_rec => l_khrv_rec);
1784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1785: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1786: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1787: RAISE OKL_API.G_EXCEPTION_ERROR;
1788: END IF;
1789: OKL_API.END_ACTIVITY (x_msg_count,
1790: x_msg_data );
1791: -- since we need to do this beacuse we need to delete to the contract

Line 1789: OKL_API.END_ACTIVITY (x_msg_count,

1785: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1786: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1787: RAISE OKL_API.G_EXCEPTION_ERROR;
1788: END IF;
1789: OKL_API.END_ACTIVITY (x_msg_count,
1790: x_msg_data );
1791: -- since we need to do this beacuse we need to delete to the contract
1792: COMMIT;
1793: EXCEPTION

Line 1794: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1790: x_msg_data );
1791: -- since we need to do this beacuse we need to delete to the contract
1792: COMMIT;
1793: EXCEPTION
1794: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1795: IF c_get_k_top_line%ISOPEN THEN
1796: CLOSE c_get_k_top_line;
1797: END IF;
1798: IF get_orig_sys_id1%ISOPEN THEN

Line 1813: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

1809: END IF;
1810: IF c_get_source_id%ISOPEN THEN
1811: CLOSE c_get_source_id;
1812: END IF;
1813: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1814: l_api_name,
1815: G_PKG_NAME,
1816: 'OKL_API.G_RET_STS_ERROR',
1817: x_msg_count,

Line 1816: 'OKL_API.G_RET_STS_ERROR',

1812: END IF;
1813: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
1814: l_api_name,
1815: G_PKG_NAME,
1816: 'OKL_API.G_RET_STS_ERROR',
1817: x_msg_count,
1818: x_msg_data,
1819: '_PVT');
1820: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1820: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1816: 'OKL_API.G_RET_STS_ERROR',
1817: x_msg_count,
1818: x_msg_data,
1819: '_PVT');
1820: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1821: IF c_get_k_top_line%ISOPEN THEN
1822: CLOSE c_get_k_top_line;
1823: END IF;
1824: IF get_orig_sys_id1%ISOPEN THEN

Line 1839: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1835: END IF;
1836: IF c_get_source_id%ISOPEN THEN
1837: CLOSE c_get_source_id;
1838: END IF;
1839: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1840: l_api_name,
1841: G_PKG_NAME,
1842: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1843: x_msg_count,

Line 1842: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1838: END IF;
1839: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1840: l_api_name,
1841: G_PKG_NAME,
1842: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1843: x_msg_count,
1844: x_msg_data,
1845: '_PVT');
1846: WHEN OTHERS THEN

Line 1865: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

1861: END IF;
1862: IF c_get_source_id%ISOPEN THEN
1863: CLOSE c_get_source_id;
1864: END IF;
1865: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
1866: l_api_name,
1867: G_PKG_NAME,
1868: 'OTHERS',
1869: x_msg_count,

Line 1883: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1879: -- Parameters :
1880: -- Version :
1881: -- End of Commnets
1882: PROCEDURE cancel_split_process (p_api_version IN NUMBER,
1883: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1884: x_return_status OUT NOCOPY VARCHAR2,
1885: x_msg_count OUT NOCOPY NUMBER,
1886: x_msg_data OUT NOCOPY VARCHAR2,
1887: p_contract_id IN OKC_K_HEADERS_V.ID%TYPE) IS

Line 1929: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1925: WHERE orig_system_id1 = p_chr_id
1926: AND orig_system_source_code = 'OKL_SPLIT';
1927:
1928: BEGIN
1929: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1930: -- Call start_activity to create savepoint, check compatibility
1931: -- and initialize message list
1932: x_return_status := OKL_API.START_ACTIVITY (
1933: l_api_name

Line 1932: x_return_status := OKL_API.START_ACTIVITY (

1928: BEGIN
1929: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1930: -- Call start_activity to create savepoint, check compatibility
1931: -- and initialize message list
1932: x_return_status := OKL_API.START_ACTIVITY (
1933: l_api_name
1934: ,p_init_msg_list
1935: ,'_PVT'
1936: ,x_return_status);

Line 1938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1934: ,p_init_msg_list
1935: ,'_PVT'
1936: ,x_return_status);
1937: -- Check if activity started successfully
1938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1941: RAISE OKL_API.G_EXCEPTION_ERROR;
1942: END IF;

Line 1939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1935: ,'_PVT'
1936: ,x_return_status);
1937: -- Check if activity started successfully
1938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1941: RAISE OKL_API.G_EXCEPTION_ERROR;
1942: END IF;
1943:

Line 1940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1936: ,x_return_status);
1937: -- Check if activity started successfully
1938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1941: RAISE OKL_API.G_EXCEPTION_ERROR;
1942: END IF;
1943:
1944: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN

Line 1941: RAISE OKL_API.G_EXCEPTION_ERROR;

1937: -- Check if activity started successfully
1938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1941: RAISE OKL_API.G_EXCEPTION_ERROR;
1942: END IF;
1943:
1944: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
1945: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 1944: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN

1940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1941: RAISE OKL_API.G_EXCEPTION_ERROR;
1942: END IF;
1943:
1944: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
1945: x_return_status := OKL_API.G_RET_STS_ERROR;
1946: OKL_API.set_message(p_app_name => G_APP_NAME,
1947: p_msg_name => G_REQUIRED_VALUE,
1948: p_token1 => G_COL_NAME_TOKEN,

Line 1945: x_return_status := OKL_API.G_RET_STS_ERROR;

1941: RAISE OKL_API.G_EXCEPTION_ERROR;
1942: END IF;
1943:
1944: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
1945: x_return_status := OKL_API.G_RET_STS_ERROR;
1946: OKL_API.set_message(p_app_name => G_APP_NAME,
1947: p_msg_name => G_REQUIRED_VALUE,
1948: p_token1 => G_COL_NAME_TOKEN,
1949: p_token1_value => 'OKC_K_HEADERS_B.ID');

Line 1946: OKL_API.set_message(p_app_name => G_APP_NAME,

1942: END IF;
1943:
1944: IF (p_contract_id = OKL_API.G_MISS_NUM OR p_contract_id IS NULL) THEN
1945: x_return_status := OKL_API.G_RET_STS_ERROR;
1946: OKL_API.set_message(p_app_name => G_APP_NAME,
1947: p_msg_name => G_REQUIRED_VALUE,
1948: p_token1 => G_COL_NAME_TOKEN,
1949: p_token1_value => 'OKC_K_HEADERS_B.ID');
1950: -- halt validation as it is a required field

Line 1958: x_return_status := OKL_API.G_RET_STS_ERROR;

1954: -- Validate the Contract ID.
1955: OPEN c_get_contract(p_contract_id);
1956: FETCH c_get_contract INTO ln_contract_id;
1957: IF c_get_contract%NOTFOUND THEN
1958: x_return_status := OKL_API.G_RET_STS_ERROR;
1959: OKL_API.set_message(p_app_name => G_APP_NAME,
1960: p_msg_name => G_INVALID_CONTRACT);
1961: RAISE G_EXCEPTION_HALT_VALIDATION;
1962: END IF;

Line 1959: OKL_API.set_message(p_app_name => G_APP_NAME,

1955: OPEN c_get_contract(p_contract_id);
1956: FETCH c_get_contract INTO ln_contract_id;
1957: IF c_get_contract%NOTFOUND THEN
1958: x_return_status := OKL_API.G_RET_STS_ERROR;
1959: OKL_API.set_message(p_app_name => G_APP_NAME,
1960: p_msg_name => G_INVALID_CONTRACT);
1961: RAISE G_EXCEPTION_HALT_VALIDATION;
1962: END IF;
1963: CLOSE c_get_contract;

Line 1976: IF (ln_split_contract1 IS NULL OR ln_split_contract1 = OKL_API.G_MISS_NUM) AND

1972: END IF;
1973: lb_value := TRUE;
1974: END LOOP;
1975:
1976: IF (ln_split_contract1 IS NULL OR ln_split_contract1 = OKL_API.G_MISS_NUM) AND
1977: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
1978: -- Split transaction created with no contracts. Cancel the transaction for
1979: -- the parent contract
1980: OPEN c_get_trx_id(p_chr_id => p_contract_id);

Line 1977: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN

1973: lb_value := TRUE;
1974: END LOOP;
1975:
1976: IF (ln_split_contract1 IS NULL OR ln_split_contract1 = OKL_API.G_MISS_NUM) AND
1977: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
1978: -- Split transaction created with no contracts. Cancel the transaction for
1979: -- the parent contract
1980: OPEN c_get_trx_id(p_chr_id => p_contract_id);
1981: FETCH c_get_trx_id INTO l_tcnv_rec.id;

Line 1993: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1989: x_msg_count => x_msg_count,
1990: x_msg_data => x_msg_data,
1991: p_tcnv_rec => l_tcnv_rec,
1992: x_tcnv_rec => lx_tcnv_rec);
1993: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1994: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1995: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1996: RAISE OKL_API.G_EXCEPTION_ERROR;
1997: END IF;

Line 1994: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1990: x_msg_data => x_msg_data,
1991: p_tcnv_rec => l_tcnv_rec,
1992: x_tcnv_rec => lx_tcnv_rec);
1993: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1994: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1995: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1996: RAISE OKL_API.G_EXCEPTION_ERROR;
1997: END IF;
1998: END IF;

Line 1995: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1991: p_tcnv_rec => l_tcnv_rec,
1992: x_tcnv_rec => lx_tcnv_rec);
1993: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1994: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1995: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1996: RAISE OKL_API.G_EXCEPTION_ERROR;
1997: END IF;
1998: END IF;
1999: CLOSE c_get_trx_id;

Line 1996: RAISE OKL_API.G_EXCEPTION_ERROR;

1992: x_tcnv_rec => lx_tcnv_rec);
1993: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1994: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1995: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1996: RAISE OKL_API.G_EXCEPTION_ERROR;
1997: END IF;
1998: END IF;
1999: CLOSE c_get_trx_id;
2000:

Line 2001: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND

1997: END IF;
1998: END IF;
1999: CLOSE c_get_trx_id;
2000:
2001: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
2002: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
2003: -- One split contract already got created. Cancel the transaction and
2004: -- delete the created split contract.
2005: l_delete_contract_line(p_api_version => p_api_version,

Line 2002: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN

1998: END IF;
1999: CLOSE c_get_trx_id;
2000:
2001: ELSIF (ln_split_contract1 IS NOT NULL OR ln_split_contract1 <> OKL_API.G_MISS_NUM) AND
2002: (ln_split_contract2 IS NULL OR ln_split_contract2 = OKL_API.G_MISS_NUM) THEN
2003: -- One split contract already got created. Cancel the transaction and
2004: -- delete the created split contract.
2005: l_delete_contract_line(p_api_version => p_api_version,
2006: p_init_msg_list => p_init_msg_list,

Line 2011: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2007: x_return_status => x_return_status,
2008: x_msg_count => x_msg_count,
2009: x_msg_data => x_msg_data,
2010: p_contract_id => ln_split_contract1);
2011: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2012: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2013: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2014: RAISE OKL_API.G_EXCEPTION_ERROR;
2015: END IF;

Line 2012: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2008: x_msg_count => x_msg_count,
2009: x_msg_data => x_msg_data,
2010: p_contract_id => ln_split_contract1);
2011: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2012: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2013: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2014: RAISE OKL_API.G_EXCEPTION_ERROR;
2015: END IF;
2016: END IF;

Line 2013: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2009: x_msg_data => x_msg_data,
2010: p_contract_id => ln_split_contract1);
2011: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2012: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2013: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2014: RAISE OKL_API.G_EXCEPTION_ERROR;
2015: END IF;
2016: END IF;
2017: OKL_API.END_ACTIVITY (x_msg_count,

Line 2014: RAISE OKL_API.G_EXCEPTION_ERROR;

2010: p_contract_id => ln_split_contract1);
2011: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2012: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2013: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2014: RAISE OKL_API.G_EXCEPTION_ERROR;
2015: END IF;
2016: END IF;
2017: OKL_API.END_ACTIVITY (x_msg_count,
2018: x_msg_data );

Line 2017: OKL_API.END_ACTIVITY (x_msg_count,

2013: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2014: RAISE OKL_API.G_EXCEPTION_ERROR;
2015: END IF;
2016: END IF;
2017: OKL_API.END_ACTIVITY (x_msg_count,
2018: x_msg_data );
2019: EXCEPTION
2020: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2021: IF c_get_trx_id%ISOPEN THEN

Line 2020: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2016: END IF;
2017: OKL_API.END_ACTIVITY (x_msg_count,
2018: x_msg_data );
2019: EXCEPTION
2020: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2021: IF c_get_trx_id%ISOPEN THEN
2022: CLOSE c_get_trx_id;
2023: END IF;
2024: IF c_get_split_contracts%ISOPEN THEN

Line 2030: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

2026: END IF;
2027: IF c_get_contract%ISOPEN THEN
2028: CLOSE c_get_contract;
2029: END IF;
2030: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
2031: l_api_name,
2032: G_PKG_NAME,
2033: 'OKL_API.G_RET_STS_ERROR',
2034: x_msg_count,

Line 2033: 'OKL_API.G_RET_STS_ERROR',

2029: END IF;
2030: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
2031: l_api_name,
2032: G_PKG_NAME,
2033: 'OKL_API.G_RET_STS_ERROR',
2034: x_msg_count,
2035: x_msg_data,
2036: '_PVT');
2037: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2037: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2033: 'OKL_API.G_RET_STS_ERROR',
2034: x_msg_count,
2035: x_msg_data,
2036: '_PVT');
2037: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2038: IF c_get_trx_id%ISOPEN THEN
2039: CLOSE c_get_trx_id;
2040: END IF;
2041: IF c_get_split_contracts%ISOPEN THEN

Line 2047: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

2043: END IF;
2044: IF c_get_contract%ISOPEN THEN
2045: CLOSE c_get_contract;
2046: END IF;
2047: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
2048: l_api_name,
2049: G_PKG_NAME,
2050: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2051: x_msg_count,

Line 2050: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2046: END IF;
2047: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
2048: l_api_name,
2049: G_PKG_NAME,
2050: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2051: x_msg_count,
2052: x_msg_data,
2053: '_PVT');
2054: WHEN G_EXCEPTION_STOP_VALIDATION THEN

Line 2064: x_return_status := OKL_API.G_RET_STS_ERROR;

2060: END IF;
2061: IF c_get_contract%ISOPEN THEN
2062: CLOSE c_get_contract;
2063: END IF;
2064: x_return_status := OKL_API.G_RET_STS_ERROR;
2065:
2066: WHEN OTHERS THEN
2067: IF c_get_trx_id%ISOPEN THEN
2068: CLOSE c_get_trx_id;

Line 2076: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

2072: END IF;
2073: IF c_get_contract%ISOPEN THEN
2074: CLOSE c_get_contract;
2075: END IF;
2076: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
2077: l_api_name,
2078: G_PKG_NAME,
2079: 'OTHERS',
2080: x_msg_count,

Line 2095: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2091: -- Parameters :
2092: -- Version :
2093: -- End of Commnets
2094: PROCEDURE l_delete_fee_service_lines(p_api_version IN NUMBER,
2095: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2096: x_return_status OUT NOCOPY VARCHAR2,
2097: x_msg_count OUT NOCOPY NUMBER,
2098: x_msg_data OUT NOCOPY VARCHAR2,
2099: p_contract_id IN OKC_K_HEADERS_V.ID%TYPE) IS

Line 2129: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2125: AND cle_sl.lse_id = lse_sl.id
2126: AND lse_sl.lty_code IN (G_FEL_LINE_LTY_CODE, G_SRL_LINE_LTY_CODE));
2127:
2128: BEGIN
2129: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2130: -- Call start_activity to create savepoint, check compatibility
2131: -- and initialize message list
2132: x_return_status := OKL_API.START_ACTIVITY (
2133: l_api_name

Line 2132: x_return_status := OKL_API.START_ACTIVITY (

2128: BEGIN
2129: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2130: -- Call start_activity to create savepoint, check compatibility
2131: -- and initialize message list
2132: x_return_status := OKL_API.START_ACTIVITY (
2133: l_api_name
2134: ,p_init_msg_list
2135: ,'_PVT'
2136: ,x_return_status);

Line 2138: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2134: ,p_init_msg_list
2135: ,'_PVT'
2136: ,x_return_status);
2137: -- Check if activity started successfully
2138: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2139: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2140: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2141: RAISE OKL_API.G_EXCEPTION_ERROR;
2142: END IF;

Line 2139: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2135: ,'_PVT'
2136: ,x_return_status);
2137: -- Check if activity started successfully
2138: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2139: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2140: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2141: RAISE OKL_API.G_EXCEPTION_ERROR;
2142: END IF;
2143:

Line 2140: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2136: ,x_return_status);
2137: -- Check if activity started successfully
2138: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2139: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2140: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2141: RAISE OKL_API.G_EXCEPTION_ERROR;
2142: END IF;
2143:
2144: -- Delete all service and fee lines not having linked assets.

Line 2141: RAISE OKL_API.G_EXCEPTION_ERROR;

2137: -- Check if activity started successfully
2138: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2139: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2140: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2141: RAISE OKL_API.G_EXCEPTION_ERROR;
2142: END IF;
2143:
2144: -- Delete all service and fee lines not having linked assets.
2145: FOR r_get_fee_service_lines IN get_fee_service_lines(p_chr_id => p_contract_id) LOOP

Line 2154: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2150: x_msg_count => x_msg_count,
2151: x_msg_data => x_msg_data,
2152: p_line_id => r_get_fee_service_lines.id);
2153:
2154: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2155: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2156: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2157: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2158: END IF;

Line 2155: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

2151: x_msg_data => x_msg_data,
2152: p_line_id => r_get_fee_service_lines.id);
2153:
2154: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2155: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2156: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2157: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2158: END IF;
2159: END LOOP;

Line 2156: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2152: p_line_id => r_get_fee_service_lines.id);
2153:
2154: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2155: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2156: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2157: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2158: END IF;
2159: END LOOP;
2160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2157: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2153:
2154: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2155: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2156: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2157: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2158: END IF;
2159: END LOOP;
2160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2156: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2157: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2158: END IF;
2159: END LOOP;
2160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2163: RAISE OKL_API.G_EXCEPTION_ERROR;
2164: END IF;

Line 2161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2157: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2158: END IF;
2159: END LOOP;
2160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2163: RAISE OKL_API.G_EXCEPTION_ERROR;
2164: END IF;
2165: OKL_API.END_ACTIVITY (x_msg_count,

Line 2162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2158: END IF;
2159: END LOOP;
2160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2163: RAISE OKL_API.G_EXCEPTION_ERROR;
2164: END IF;
2165: OKL_API.END_ACTIVITY (x_msg_count,
2166: x_msg_data );

Line 2163: RAISE OKL_API.G_EXCEPTION_ERROR;

2159: END LOOP;
2160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2163: RAISE OKL_API.G_EXCEPTION_ERROR;
2164: END IF;
2165: OKL_API.END_ACTIVITY (x_msg_count,
2166: x_msg_data );
2167: EXCEPTION

Line 2165: OKL_API.END_ACTIVITY (x_msg_count,

2161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2163: RAISE OKL_API.G_EXCEPTION_ERROR;
2164: END IF;
2165: OKL_API.END_ACTIVITY (x_msg_count,
2166: x_msg_data );
2167: EXCEPTION
2168: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2169: IF get_fee_service_lines%ISOPEN THEN

Line 2168: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2164: END IF;
2165: OKL_API.END_ACTIVITY (x_msg_count,
2166: x_msg_data );
2167: EXCEPTION
2168: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2169: IF get_fee_service_lines%ISOPEN THEN
2170: CLOSE get_fee_service_lines;
2171: END IF;
2172: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 2172: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

2168: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2169: IF get_fee_service_lines%ISOPEN THEN
2170: CLOSE get_fee_service_lines;
2171: END IF;
2172: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
2173: l_api_name,
2174: G_PKG_NAME,
2175: 'OKL_API.G_RET_STS_ERROR',
2176: x_msg_count,

Line 2175: 'OKL_API.G_RET_STS_ERROR',

2171: END IF;
2172: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
2173: l_api_name,
2174: G_PKG_NAME,
2175: 'OKL_API.G_RET_STS_ERROR',
2176: x_msg_count,
2177: x_msg_data,
2178: '_PVT');
2179: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2179: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2175: 'OKL_API.G_RET_STS_ERROR',
2176: x_msg_count,
2177: x_msg_data,
2178: '_PVT');
2179: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2180: IF get_fee_service_lines%ISOPEN THEN
2181: CLOSE get_fee_service_lines;
2182: END IF;
2183: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

Line 2183: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

2179: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2180: IF get_fee_service_lines%ISOPEN THEN
2181: CLOSE get_fee_service_lines;
2182: END IF;
2183: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
2184: l_api_name,
2185: G_PKG_NAME,
2186: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2187: x_msg_count,

Line 2186: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2182: END IF;
2183: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
2184: l_api_name,
2185: G_PKG_NAME,
2186: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2187: x_msg_count,
2188: x_msg_data,
2189: '_PVT');
2190: WHEN OTHERS THEN

Line 2194: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

2190: WHEN OTHERS THEN
2191: IF get_fee_service_lines%ISOPEN THEN
2192: CLOSE get_fee_service_lines;
2193: END IF;
2194: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
2195: l_api_name,
2196: G_PKG_NAME,
2197: 'OTHERS',
2198: x_msg_count,

Line 2212: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2208: -- Parameters :
2209: -- Version :
2210: -- End of Commnets
2211: PROCEDURE l_process_split_contract(p_api_version IN NUMBER,
2212: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2213: x_return_status OUT NOCOPY VARCHAR2,
2214: x_msg_count OUT NOCOPY NUMBER,
2215: x_msg_data OUT NOCOPY VARCHAR2,
2216: p_contract_id IN OKC_K_HEADERS_V.ID%TYPE) IS

Line 2634: x_return_status := OKL_API.G_RET_STS_SUCCESS;

2630: ln_rule_info_8 OKC_RULES_V.RULE_INFORMATION8%TYPE;
2631: -- end rravikir added for bug 3504415
2632:
2633: BEGIN
2634: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2635: -- Call start_activity to create savepoint, check compatibility
2636: -- and initialize message list
2637: x_return_status := OKL_API.START_ACTIVITY (
2638: l_api_name

Line 2637: x_return_status := OKL_API.START_ACTIVITY (

2633: BEGIN
2634: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2635: -- Call start_activity to create savepoint, check compatibility
2636: -- and initialize message list
2637: x_return_status := OKL_API.START_ACTIVITY (
2638: l_api_name
2639: ,p_init_msg_list
2640: ,'_PVT'
2641: ,x_return_status);

Line 2643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2639: ,p_init_msg_list
2640: ,'_PVT'
2641: ,x_return_status);
2642: -- Check if activity started successfully
2643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2646: RAISE OKL_API.G_EXCEPTION_ERROR;
2647: END IF;

Line 2644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2640: ,'_PVT'
2641: ,x_return_status);
2642: -- Check if activity started successfully
2643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2646: RAISE OKL_API.G_EXCEPTION_ERROR;
2647: END IF;
2648:

Line 2645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2641: ,x_return_status);
2642: -- Check if activity started successfully
2643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2646: RAISE OKL_API.G_EXCEPTION_ERROR;
2647: END IF;
2648:
2649: OPEN check_other_line(p_chr_id => p_contract_id);

Line 2646: RAISE OKL_API.G_EXCEPTION_ERROR;

2642: -- Check if activity started successfully
2643: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2645: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2646: RAISE OKL_API.G_EXCEPTION_ERROR;
2647: END IF;
2648:
2649: OPEN check_other_line(p_chr_id => p_contract_id);
2650: FETCH check_other_line INTO ln_dummy;

Line 2676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2672: x_return_status => x_return_status,
2673: x_msg_count => x_msg_count,
2674: x_msg_data => x_msg_data,
2675: p_line_id => r_get_item_info_tls.id);
2676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2677: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2679: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2680: END IF;

Line 2677: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

2673: x_msg_count => x_msg_count,
2674: x_msg_data => x_msg_data,
2675: p_line_id => r_get_item_info_tls.id);
2676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2677: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2679: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2680: END IF;
2681: END LOOP;

Line 2678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2674: x_msg_data => x_msg_data,
2675: p_line_id => r_get_item_info_tls.id);
2676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2677: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2679: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2680: END IF;
2681: END LOOP;
2682:

Line 2679: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2675: p_line_id => r_get_item_info_tls.id);
2676: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2677: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2678: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2679: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2680: END IF;
2681: END LOOP;
2682:
2683: IF (G_DEBUG_SPLIT) THEN

Line 2692: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2688: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Information : ' || x_msg_data);
2689: END IF;
2690: END IF;
2691:
2692: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2693: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2694: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2695: RAISE OKL_API.G_EXCEPTION_ERROR;
2696: END IF;

Line 2693: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2689: END IF;
2690: END IF;
2691:
2692: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2693: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2694: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2695: RAISE OKL_API.G_EXCEPTION_ERROR;
2696: END IF;
2697:

Line 2694: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2690: END IF;
2691:
2692: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2693: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2694: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2695: RAISE OKL_API.G_EXCEPTION_ERROR;
2696: END IF;
2697:
2698: -- Delete links which are not needed since the assets do not belong this contract

Line 2695: RAISE OKL_API.G_EXCEPTION_ERROR;

2691:
2692: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2693: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2694: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2695: RAISE OKL_API.G_EXCEPTION_ERROR;
2696: END IF;
2697:
2698: -- Delete links which are not needed since the assets do not belong this contract
2699: FOR r_get_item_info IN get_item_info(p_dnz_chr_id => p_contract_id) LOOP

Line 2708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2704: x_msg_count => x_msg_count,
2705: x_msg_data => x_msg_data,
2706: p_line_id => r_get_item_info.id);
2707:
2708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2709: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2711: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2712: END IF;

Line 2709: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

2705: x_msg_data => x_msg_data,
2706: p_line_id => r_get_item_info.id);
2707:
2708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2709: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2711: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2712: END IF;
2713: END LOOP;

Line 2710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2706: p_line_id => r_get_item_info.id);
2707:
2708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2709: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2711: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2712: END IF;
2713: END LOOP;
2714:

Line 2711: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2707:
2708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2709: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2711: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2712: END IF;
2713: END LOOP;
2714:
2715: IF (G_DEBUG_SPLIT) THEN

Line 2724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2720: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Information : ' || x_msg_data);
2721: END IF;
2722: END IF;
2723:
2724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2727: RAISE OKL_API.G_EXCEPTION_ERROR;
2728: END IF;

Line 2725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2721: END IF;
2722: END IF;
2723:
2724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2727: RAISE OKL_API.G_EXCEPTION_ERROR;
2728: END IF;
2729: -- end rravikir modified for bug 3504415

Line 2726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2722: END IF;
2723:
2724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2727: RAISE OKL_API.G_EXCEPTION_ERROR;
2728: END IF;
2729: -- end rravikir modified for bug 3504415
2730:

Line 2727: RAISE OKL_API.G_EXCEPTION_ERROR;

2723:
2724: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2725: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2726: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2727: RAISE OKL_API.G_EXCEPTION_ERROR;
2728: END IF;
2729: -- end rravikir modified for bug 3504415
2730:
2731: FOR r_get_amt IN get_amt(p_chr_id => p_contract_id) LOOP

Line 2749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2745:
2746: -- To Get the cle addon Line Record
2747: x_return_status := get_rec_clev(r_get_amt.id,
2748: l_clev_rec);
2749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2750: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2752: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2753: END IF;

Line 2750: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

2746: -- To Get the cle addon Line Record
2747: x_return_status := get_rec_clev(r_get_amt.id,
2748: l_clev_rec);
2749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2750: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2752: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2753: END IF;
2754: -- To Get the kle Model Line Record

Line 2751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2747: x_return_status := get_rec_clev(r_get_amt.id,
2748: l_clev_rec);
2749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2750: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2752: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2753: END IF;
2754: -- To Get the kle Model Line Record
2755: x_return_status := get_rec_klev(r_get_amt.id,

Line 2752: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2748: l_clev_rec);
2749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2750: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2752: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2753: END IF;
2754: -- To Get the kle Model Line Record
2755: x_return_status := get_rec_klev(r_get_amt.id,
2756: l_klev_rec);

Line 2757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2753: END IF;
2754: -- To Get the kle Model Line Record
2755: x_return_status := get_rec_klev(r_get_amt.id,
2756: l_klev_rec);
2757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2758: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2760: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2761: END IF;

Line 2758: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

2754: -- To Get the kle Model Line Record
2755: x_return_status := get_rec_klev(r_get_amt.id,
2756: l_klev_rec);
2757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2758: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2760: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2761: END IF;
2762: IF l_klev_rec.id <> l_clev_rec.id THEN

Line 2759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2755: x_return_status := get_rec_klev(r_get_amt.id,
2756: l_klev_rec);
2757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2758: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2760: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2761: END IF;
2762: IF l_klev_rec.id <> l_clev_rec.id THEN
2763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 2760: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2756: l_klev_rec);
2757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2758: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
2759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2760: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2761: END IF;
2762: IF l_klev_rec.id <> l_clev_rec.id THEN
2763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2764: END IF;

Line 2763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2759: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2760: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2761: END IF;
2762: IF l_klev_rec.id <> l_clev_rec.id THEN
2763: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2764: END IF;
2765:
2766: -- Added for Bug 3608423
2767: OPEN get_cap_link_asset_amount(p_cle_id => l_clev_rec.id);

Line 2786: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2782: p_klev_rec => l_klev_rec,
2783: x_clev_rec => lx_clev_rec,
2784: x_klev_rec => lx_klev_rec);
2785:
2786: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2787: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2789: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2790: END IF;

Line 2787: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2783: x_clev_rec => lx_clev_rec,
2784: x_klev_rec => lx_klev_rec);
2785:
2786: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2787: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2789: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2790: END IF;
2791: END LOOP;

Line 2788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2784: x_klev_rec => lx_klev_rec);
2785:
2786: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2787: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2789: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2790: END IF;
2791: END LOOP;
2792:

Line 2789: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2785:
2786: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2787: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2789: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2790: END IF;
2791: END LOOP;
2792:
2793: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2793: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2789: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2790: END IF;
2791: END LOOP;
2792:
2793: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2795: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2796: RAISE OKL_API.G_EXCEPTION_ERROR;
2797: END IF;

Line 2794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2790: END IF;
2791: END LOOP;
2792:
2793: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2795: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2796: RAISE OKL_API.G_EXCEPTION_ERROR;
2797: END IF;
2798:

Line 2795: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2791: END LOOP;
2792:
2793: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2795: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2796: RAISE OKL_API.G_EXCEPTION_ERROR;
2797: END IF;
2798:
2799: -- Get all the service lines having both expense and associated assets

Line 2796: RAISE OKL_API.G_EXCEPTION_ERROR;

2792:
2793: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2794: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2795: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2796: RAISE OKL_API.G_EXCEPTION_ERROR;
2797: END IF;
2798:
2799: -- Get all the service lines having both expense and associated assets
2800: -- Proportionate the amount in the expense rule

Line 2817: IF (ln_rule_id <> OKL_API.G_MISS_NUM) AND

2813: lv_currency_code := r_get_service_rule_info.currency_code;
2814: ln_service_line_id := r_get_service_lines.id;
2815: ln_new_service_amt := r_get_service_lines.amount;
2816:
2817: IF (ln_rule_id <> OKL_API.G_MISS_NUM) AND
2818: (ln_rule_id IS NOT NULL) THEN
2819:
2820: OPEN get_expense_service_rule_info(p_rgd_code => 'LAFEXP',
2821: p_rgp_cat => 'LAFEXP',

Line 2827: /*IF (lv_num_periods <> OKL_API.G_MISS_CHAR) AND

2823: p_cle_id => ln_service_line_id);
2824: FETCH get_expense_service_rule_info INTO lv_num_periods, ln_rule_amount;
2825: CLOSE get_expense_service_rule_info;
2826:
2827: /*IF (lv_num_periods <> OKL_API.G_MISS_CHAR) AND
2828: (lv_num_periods IS NOT NULL) THEN
2829: ln_new_amt := ln_new_amt / lv_num_periods;
2830: END IF;*/
2831:

Line 2849: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2845: x_msg_count => x_msg_count,
2846: x_msg_data => x_msg_data,
2847: p_rulv_rec => l_rulv_rec,
2848: x_rulv_rec => lx_rulv_rec);
2849: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2850: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2851: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2852: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2853: END IF;

Line 2850: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2846: x_msg_data => x_msg_data,
2847: p_rulv_rec => l_rulv_rec,
2848: x_rulv_rec => lx_rulv_rec);
2849: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2850: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2851: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2852: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2853: END IF;
2854: END IF;

Line 2851: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2847: p_rulv_rec => l_rulv_rec,
2848: x_rulv_rec => lx_rulv_rec);
2849: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2850: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2851: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2852: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2853: END IF;
2854: END IF;
2855: END LOOP;

Line 2852: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2848: x_rulv_rec => lx_rulv_rec);
2849: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2850: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2851: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2852: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2853: END IF;
2854: END IF;
2855: END LOOP;
2856: END LOOP;

Line 2858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2854: END IF;
2855: END LOOP;
2856: END LOOP;
2857:
2858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2861: RAISE OKL_API.G_EXCEPTION_ERROR;
2862: END IF;

Line 2859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2855: END LOOP;
2856: END LOOP;
2857:
2858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2861: RAISE OKL_API.G_EXCEPTION_ERROR;
2862: END IF;
2863:

Line 2860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2856: END LOOP;
2857:
2858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2861: RAISE OKL_API.G_EXCEPTION_ERROR;
2862: END IF;
2863:
2864: -- Get the payments defined for service line

Line 2861: RAISE OKL_API.G_EXCEPTION_ERROR;

2857:
2858: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2859: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2860: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2861: RAISE OKL_API.G_EXCEPTION_ERROR;
2862: END IF;
2863:
2864: -- Get the payments defined for service line
2865: -- Proportionate the amount

Line 2889: IF (ln_rule_id <> OKL_API.G_MISS_NUM) AND

2885: ln_rule_info_2 := r_get_service_line_payments.rule_information2;
2886: ln_rule_info_7 := r_get_service_line_payments.rule_information7;
2887: ln_rule_info_8 := r_get_service_line_payments.rule_information8;
2888:
2889: IF (ln_rule_id <> OKL_API.G_MISS_NUM) AND
2890: (ln_rule_id IS NOT NULL) THEN
2891:
2892: IF (ln_rule_info_6 <> OKL_API.G_MISS_CHAR) AND
2893: (ln_rule_info_6 IS NOT NULL) THEN

Line 2892: IF (ln_rule_info_6 <> OKL_API.G_MISS_CHAR) AND

2888:
2889: IF (ln_rule_id <> OKL_API.G_MISS_NUM) AND
2890: (ln_rule_id IS NOT NULL) THEN
2891:
2892: IF (ln_rule_info_6 <> OKL_API.G_MISS_CHAR) AND
2893: (ln_rule_info_6 IS NOT NULL) THEN
2894:
2895: ln_calc_amt := (ln_new_service_amt/ln_old_service_amt) * ln_rule_info_6;
2896: -- Get the correct rounding amount

Line 2904: ELSIF (ln_rule_info_8 <> OKL_API.G_MISS_CHAR) AND

2900: lp_rulv_rec.id := ln_rule_id;
2901: lp_rulv_rec.rule_information6 := ln_calc_amt;
2902: lp_rulv_rec.rule_information2 := ln_rule_info_2;
2903: lp_rulv_rec.rule_information8 := NULL;
2904: ELSIF (ln_rule_info_8 <> OKL_API.G_MISS_CHAR) AND
2905: (ln_rule_info_8 IS NOT NULL) THEN
2906:
2907: ln_calc_amt := (ln_new_service_amt/ln_old_service_amt) * ln_rule_info_8;
2908: -- Get the correct rounding amount

Line 2926: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2922: x_msg_count => x_msg_count,
2923: x_msg_data => x_msg_data,
2924: p_rulv_rec => lp_rulv_rec,
2925: x_rulv_rec => lx_rulv_rec);
2926: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2927: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2928: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2929: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2930: END IF;

Line 2927: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2923: x_msg_data => x_msg_data,
2924: p_rulv_rec => lp_rulv_rec,
2925: x_rulv_rec => lx_rulv_rec);
2926: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2927: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2928: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2929: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2930: END IF;
2931: END IF;

Line 2928: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2924: p_rulv_rec => lp_rulv_rec,
2925: x_rulv_rec => lx_rulv_rec);
2926: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2927: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2928: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2929: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2930: END IF;
2931: END IF;
2932: END LOOP;

Line 2929: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2925: x_rulv_rec => lx_rulv_rec);
2926: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2927: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2928: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2929: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2930: END IF;
2931: END IF;
2932: END LOOP;
2933: END LOOP;

Line 2935: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2931: END IF;
2932: END LOOP;
2933: END LOOP;
2934:
2935: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2936: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2937: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2938: RAISE OKL_API.G_EXCEPTION_ERROR;
2939: END IF;

Line 2936: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2932: END LOOP;
2933: END LOOP;
2934:
2935: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2936: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2937: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2938: RAISE OKL_API.G_EXCEPTION_ERROR;
2939: END IF;
2940:

Line 2937: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2933: END LOOP;
2934:
2935: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2936: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2937: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2938: RAISE OKL_API.G_EXCEPTION_ERROR;
2939: END IF;
2940:
2941:

Line 2938: RAISE OKL_API.G_EXCEPTION_ERROR;

2934:
2935: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2936: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2937: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2938: RAISE OKL_API.G_EXCEPTION_ERROR;
2939: END IF;
2940:
2941:
2942: -- Commented for Bug 3608423

Line 2951: IF (ln_rule_id <> OKL_API.G_MISS_NUM) AND

2947: p_cle_id => l_clev_rec.id);
2948: FETCH get_rule_pymt1 INTO ln_rule_id, lv_currency_code;
2949: CLOSE get_rule_pymt1;
2950:
2951: IF (ln_rule_id <> OKL_API.G_MISS_NUM) AND
2952: (ln_rule_id IS NOT NULL) THEN
2953:
2954: OPEN get_rule_periods(p_rgd_code => 'LAFEXP',
2955: p_rgp_cat => 'LAFEXP',

Line 2961: IF (lv_num_periods <> OKL_API.G_MISS_CHAR) AND

2957: p_cle_id => l_clev_rec.id);
2958: FETCH get_rule_periods INTO lv_num_periods;
2959: CLOSE get_rule_periods;
2960:
2961: IF (lv_num_periods <> OKL_API.G_MISS_CHAR) AND
2962: (lv_num_periods IS NOT NULL) THEN
2963: ln_new_amt := ln_new_amt / lv_num_periods;
2964: END IF;
2965:

Line 2981: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2977: x_msg_count => x_msg_count,
2978: x_msg_data => x_msg_data,
2979: p_rulv_rec => l_rulv_rec,
2980: x_rulv_rec => lx_rulv_rec);
2981: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2982: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2983: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2984: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2985: END IF;

Line 2982: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2978: x_msg_data => x_msg_data,
2979: p_rulv_rec => l_rulv_rec,
2980: x_rulv_rec => lx_rulv_rec);
2981: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2982: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2983: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2984: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2985: END IF;
2986: END IF;

Line 2983: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

2979: p_rulv_rec => l_rulv_rec,
2980: x_rulv_rec => lx_rulv_rec);
2981: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2982: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2983: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2984: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2985: END IF;
2986: END IF;
2987: -- end rravikir added for bug 3504415

Line 2984: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

2980: x_rulv_rec => lx_rulv_rec);
2981: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2982: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2983: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
2984: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
2985: END IF;
2986: END IF;
2987: -- end rravikir added for bug 3504415
2988:

Line 3004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3000: x_msg_count => x_msg_count,
3001: x_msg_data => x_msg_data,
3002: p_rulv_rec => l_rulv_rec,
3003: x_rulv_rec => lx_rulv_rec);
3004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3005: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3007: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3008: END IF;

Line 3005: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3001: x_msg_data => x_msg_data,
3002: p_rulv_rec => l_rulv_rec,
3003: x_rulv_rec => lx_rulv_rec);
3004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3005: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3007: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3008: END IF;
3009: END LOOP;

Line 3006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3002: p_rulv_rec => l_rulv_rec,
3003: x_rulv_rec => lx_rulv_rec);
3004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3005: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3007: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3008: END IF;
3009: END LOOP;
3010: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 3007: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3003: x_rulv_rec => lx_rulv_rec);
3004: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3005: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3007: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3008: END IF;
3009: END LOOP;
3010: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3011: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 3010: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3006: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3007: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3008: END IF;
3009: END LOOP;
3010: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3011: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3012: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3013: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3014: END IF;

Line 3011: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3007: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3008: END IF;
3009: END LOOP;
3010: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3011: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3012: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3013: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3014: END IF;
3015:

Line 3012: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3008: END IF;
3009: END LOOP;
3010: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3011: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3012: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3013: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3014: END IF;
3015:
3016: -- Get the amount of the old contract

Line 3013: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3009: END LOOP;
3010: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3011: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3012: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3013: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3014: END IF;
3015:
3016: -- Get the amount of the old contract
3017: FOR r_get_sls_amt IN get_sls_amt(p_chr_id => ln_old_chr_id) LOOP

Line 3029: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3025: FOR r_get_sls_amt IN get_sls_amt(p_chr_id => p_contract_id) LOOP
3026: -- To Get the cle Line Record
3027: x_return_status := get_rec_clev(r_get_sls_amt.id,
3028: l_clev_rec);
3029: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3030: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3031: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3032: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3033: END IF;

Line 3030: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3026: -- To Get the cle Line Record
3027: x_return_status := get_rec_clev(r_get_sls_amt.id,
3028: l_clev_rec);
3029: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3030: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3031: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3032: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3033: END IF;
3034: -- To Get the kle Model Line Record

Line 3031: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3027: x_return_status := get_rec_clev(r_get_sls_amt.id,
3028: l_clev_rec);
3029: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3030: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3031: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3032: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3033: END IF;
3034: -- To Get the kle Model Line Record
3035: x_return_status := get_rec_klev(r_get_sls_amt.id,

Line 3032: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3028: l_clev_rec);
3029: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3030: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3031: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3032: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3033: END IF;
3034: -- To Get the kle Model Line Record
3035: x_return_status := get_rec_klev(r_get_sls_amt.id,
3036: l_klev_rec);

Line 3037: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3033: END IF;
3034: -- To Get the kle Model Line Record
3035: x_return_status := get_rec_klev(r_get_sls_amt.id,
3036: l_klev_rec);
3037: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3038: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3039: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3040: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3041: END IF;

Line 3038: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3034: -- To Get the kle Model Line Record
3035: x_return_status := get_rec_klev(r_get_sls_amt.id,
3036: l_klev_rec);
3037: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3038: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3039: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3040: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3041: END IF;
3042: IF l_klev_rec.id <> l_clev_rec.id THEN

Line 3039: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3035: x_return_status := get_rec_klev(r_get_sls_amt.id,
3036: l_klev_rec);
3037: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3038: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3039: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3040: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3041: END IF;
3042: IF l_klev_rec.id <> l_clev_rec.id THEN
3043: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 3040: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3036: l_klev_rec);
3037: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3038: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3039: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3040: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3041: END IF;
3042: IF l_klev_rec.id <> l_clev_rec.id THEN
3043: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3044: END IF;

Line 3043: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3039: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3040: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3041: END IF;
3042: IF l_klev_rec.id <> l_clev_rec.id THEN
3043: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3044: END IF;
3045: l_klev_rec.amount := r_get_sls_amt.amount;
3046: l_klev_rec.capital_amount := r_get_sls_amt.amount;
3047:

Line 3058: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3054: p_clev_rec => l_clev_rec,
3055: p_klev_rec => l_klev_rec,
3056: x_clev_rec => lx_clev_rec,
3057: x_klev_rec => lx_klev_rec);
3058: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3059: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3060: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3061: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3062: END IF;

Line 3059: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3055: p_klev_rec => l_klev_rec,
3056: x_clev_rec => lx_clev_rec,
3057: x_klev_rec => lx_klev_rec);
3058: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3059: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3060: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3061: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3062: END IF;
3063: -- We need to pro-rate the payment amount of sub service or fee line

Line 3060: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3056: x_clev_rec => lx_clev_rec,
3057: x_klev_rec => lx_klev_rec);
3058: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3059: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3060: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3061: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3062: END IF;
3063: -- We need to pro-rate the payment amount of sub service or fee line
3064: IF lt_old_cle_amt_tbl.COUNT > 0 THEN

Line 3061: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3057: x_klev_rec => lx_klev_rec);
3058: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3059: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3060: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3061: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3062: END IF;
3063: -- We need to pro-rate the payment amount of sub service or fee line
3064: IF lt_old_cle_amt_tbl.COUNT > 0 THEN
3065: k := lt_old_cle_amt_tbl.FIRST;

Line 3082: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3078: x_msg_data => x_msg_data,
3079: p_rulv_rec => r_rulv_rec,
3080: x_rulv_rec => rx_rulv_rec);
3081:
3082: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3083: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3084: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3085: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3086: END IF;

Line 3083: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3079: p_rulv_rec => r_rulv_rec,
3080: x_rulv_rec => rx_rulv_rec);
3081:
3082: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3083: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3084: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3085: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3086: END IF;
3087: END LOOP;

Line 3084: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3080: x_rulv_rec => rx_rulv_rec);
3081:
3082: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3083: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3084: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3085: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3086: END IF;
3087: END LOOP;
3088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 3085: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3081:
3082: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3083: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3084: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3085: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3086: END IF;
3087: END LOOP;
3088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3089: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 3088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3084: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3085: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3086: END IF;
3087: END LOOP;
3088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3089: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3091: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3092: END IF;

Line 3089: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3085: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3086: END IF;
3087: END LOOP;
3088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3089: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3091: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3092: END IF;
3093: END IF;

Line 3090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3086: END IF;
3087: END LOOP;
3088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3089: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3091: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3092: END IF;
3093: END IF;
3094: EXIT WHEN (k = lt_old_cle_amt_tbl.LAST);

Line 3091: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3087: END LOOP;
3088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3089: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3091: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3092: END IF;
3093: END IF;
3094: EXIT WHEN (k = lt_old_cle_amt_tbl.LAST);
3095: k := lt_old_cle_amt_tbl.NEXT(k);

Line 3099: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3095: k := lt_old_cle_amt_tbl.NEXT(k);
3096: END LOOP;
3097: END IF;
3098: END LOOP;
3099: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3101: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3102: RAISE OKL_API.G_EXCEPTION_ERROR;
3103: END IF;*/

Line 3100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3096: END LOOP;
3097: END IF;
3098: END LOOP;
3099: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3101: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3102: RAISE OKL_API.G_EXCEPTION_ERROR;
3103: END IF;*/
3104: -- End Commented for Bug 3608423

Line 3101: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3097: END IF;
3098: END LOOP;
3099: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3101: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3102: RAISE OKL_API.G_EXCEPTION_ERROR;
3103: END IF;*/
3104: -- End Commented for Bug 3608423
3105:

Line 3102: RAISE OKL_API.G_EXCEPTION_ERROR;

3098: END LOOP;
3099: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3101: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3102: RAISE OKL_API.G_EXCEPTION_ERROR;
3103: END IF;*/
3104: -- End Commented for Bug 3608423
3105:
3106: END IF;

Line 3107: OKL_API.END_ACTIVITY (x_msg_count,

3103: END IF;*/
3104: -- End Commented for Bug 3608423
3105:
3106: END IF;
3107: OKL_API.END_ACTIVITY (x_msg_count,
3108: x_msg_data );
3109: EXCEPTION
3110: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3111: IF get_amt%ISOPEN THEN

Line 3110: WHEN OKL_API.G_EXCEPTION_ERROR THEN

3106: END IF;
3107: OKL_API.END_ACTIVITY (x_msg_count,
3108: x_msg_data );
3109: EXCEPTION
3110: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3111: IF get_amt%ISOPEN THEN
3112: CLOSE get_amt;
3113: END IF;
3114: IF get_item_info%ISOPEN THEN

Line 3156: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

3152: END IF;
3153: IF get_old_service_lines%ISOPEN THEN
3154: CLOSE get_old_service_lines;
3155: END IF;
3156: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
3157: l_api_name,
3158: G_PKG_NAME,
3159: 'OKL_API.G_RET_STS_ERROR',
3160: x_msg_count,

Line 3159: 'OKL_API.G_RET_STS_ERROR',

3155: END IF;
3156: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
3157: l_api_name,
3158: G_PKG_NAME,
3159: 'OKL_API.G_RET_STS_ERROR',
3160: x_msg_count,
3161: x_msg_data,
3162: '_PVT');
3163: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 3163: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3159: 'OKL_API.G_RET_STS_ERROR',
3160: x_msg_count,
3161: x_msg_data,
3162: '_PVT');
3163: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3164: IF get_amt%ISOPEN THEN
3165: CLOSE get_amt;
3166: END IF;
3167: IF get_item_info%ISOPEN THEN

Line 3209: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

3205: END IF;
3206: IF get_old_service_lines%ISOPEN THEN
3207: CLOSE get_old_service_lines;
3208: END IF;
3209: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
3210: l_api_name,
3211: G_PKG_NAME,
3212: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3213: x_msg_count,

Line 3212: 'OKL_API.G_RET_STS_UNEXP_ERROR',

3208: END IF;
3209: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
3210: l_api_name,
3211: G_PKG_NAME,
3212: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3213: x_msg_count,
3214: x_msg_data,
3215: '_PVT');
3216: WHEN OTHERS THEN

Line 3262: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

3258: END IF;
3259: IF get_old_service_lines%ISOPEN THEN
3260: CLOSE get_old_service_lines;
3261: END IF;
3262: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
3263: l_api_name,
3264: G_PKG_NAME,
3265: 'OTHERS',
3266: x_msg_count,

Line 3425: x_return_status := OKL_API.G_RET_STS_SUCCESS;

3421: AND KHR.ID = p_chr_id;
3422: -- End Bug 2927173, 2901442
3423:
3424: BEGIN
3425: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3426: -- Call start_activity to create savepoint, check compatibility
3427: -- and initialize message list
3428: x_return_status := OKL_API.START_ACTIVITY (
3429: l_api_name

Line 3428: x_return_status := OKL_API.START_ACTIVITY (

3424: BEGIN
3425: x_return_status := OKL_API.G_RET_STS_SUCCESS;
3426: -- Call start_activity to create savepoint, check compatibility
3427: -- and initialize message list
3428: x_return_status := OKL_API.START_ACTIVITY (
3429: l_api_name
3430: ,p_init_msg_list
3431: ,'_PVT'
3432: ,x_return_status);

Line 3434: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3430: ,p_init_msg_list
3431: ,'_PVT'
3432: ,x_return_status);
3433: -- Check if activity started successfully
3434: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3435: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3436: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3437: RAISE OKL_API.G_EXCEPTION_ERROR;
3438: END IF;

Line 3435: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3431: ,'_PVT'
3432: ,x_return_status);
3433: -- Check if activity started successfully
3434: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3435: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3436: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3437: RAISE OKL_API.G_EXCEPTION_ERROR;
3438: END IF;
3439: -- To get the orig system id for

Line 3436: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3432: ,x_return_status);
3433: -- Check if activity started successfully
3434: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3435: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3436: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3437: RAISE OKL_API.G_EXCEPTION_ERROR;
3438: END IF;
3439: -- To get the orig system id for
3440: OPEN get_orig_sys_id1(p_chr_id => p_chr_id);

Line 3437: RAISE OKL_API.G_EXCEPTION_ERROR;

3433: -- Check if activity started successfully
3434: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3435: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3436: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3437: RAISE OKL_API.G_EXCEPTION_ERROR;
3438: END IF;
3439: -- To get the orig system id for
3440: OPEN get_orig_sys_id1(p_chr_id => p_chr_id);
3441: FETCH get_orig_sys_id1 INTO ln_orig_system_id1;

Line 3455: OKL_API.set_message(p_app_name => G_APP_NAME,

3451: -- a split contract.
3452: OPEN check_split_k_csr(p_chr_id => ln_orig_system_id1);
3453: FETCH check_split_k_csr INTO ln_dummy;
3454: IF check_split_k_csr%NOTFOUND THEN
3455: OKL_API.set_message(p_app_name => G_APP_NAME,
3456: p_msg_name => G_NO_MATCHING_RECORD,
3457: p_token1 => G_COL_NAME_TOKEN,
3458: p_token1_value => 'OKC_K_HEADERS_B.ORIG_SYSTEM_ID1');
3459:

Line 3465: RAISE OKL_API.G_EXCEPTION_ERROR;

3461: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Contract used in the Split process
3462: is not of the type "Split Contract"');
3463: END IF;
3464:
3465: RAISE OKL_API.G_EXCEPTION_ERROR;
3466: END IF;
3467: CLOSE check_split_k_csr;
3468:
3469: -- We have to call the journal Entries for the same

Line 3473: p_commit => OKL_API.G_FALSE,

3469: -- We have to call the journal Entries for the same
3470: OKL_LA_JE_PUB.generate_journal_entries(
3471: p_api_version => p_api_version,
3472: p_init_msg_list => p_init_msg_list,
3473: p_commit => OKL_API.G_FALSE,
3474: p_contract_id => p_chr_id,
3475: p_transaction_type => 'Split Contract',
3476: p_draft_yn => OKL_API.G_TRUE,
3477: p_memo_yn => OKL_API.G_FALSE,

Line 3476: p_draft_yn => OKL_API.G_TRUE,

3472: p_init_msg_list => p_init_msg_list,
3473: p_commit => OKL_API.G_FALSE,
3474: p_contract_id => p_chr_id,
3475: p_transaction_type => 'Split Contract',
3476: p_draft_yn => OKL_API.G_TRUE,
3477: p_memo_yn => OKL_API.G_FALSE,
3478: x_return_status => x_return_status,
3479: x_msg_count => x_msg_count,
3480: x_msg_data => x_msg_data);

Line 3477: p_memo_yn => OKL_API.G_FALSE,

3473: p_commit => OKL_API.G_FALSE,
3474: p_contract_id => p_chr_id,
3475: p_transaction_type => 'Split Contract',
3476: p_draft_yn => OKL_API.G_TRUE,
3477: p_memo_yn => OKL_API.G_FALSE,
3478: x_return_status => x_return_status,
3479: x_msg_count => x_msg_count,
3480: x_msg_data => x_msg_data);
3481:

Line 3489: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3485: split_contract_after_yield procedure');
3486: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Information : ' || x_msg_data);
3487: END IF;
3488:
3489: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3490: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3491: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3492: RAISE OKL_API.G_EXCEPTION_ERROR;
3493: END IF;

Line 3490: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3486: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Information : ' || x_msg_data);
3487: END IF;
3488:
3489: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3490: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3491: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3492: RAISE OKL_API.G_EXCEPTION_ERROR;
3493: END IF;
3494: -- To get all the assets for the p_chr_id

Line 3491: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3487: END IF;
3488:
3489: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3490: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3491: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3492: RAISE OKL_API.G_EXCEPTION_ERROR;
3493: END IF;
3494: -- To get all the assets for the p_chr_id
3495: FOR r_get_orig_fa IN get_orig_fa(p_chr_id => p_chr_id) LOOP

Line 3492: RAISE OKL_API.G_EXCEPTION_ERROR;

3488:
3489: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3490: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3491: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3492: RAISE OKL_API.G_EXCEPTION_ERROR;
3493: END IF;
3494: -- To get all the assets for the p_chr_id
3495: FOR r_get_orig_fa IN get_orig_fa(p_chr_id => p_chr_id) LOOP
3496: IF get_orig_fa%NOTFOUND THEN

Line 3497: OKL_API.set_message(p_app_name => G_APP_NAME,

3493: END IF;
3494: -- To get all the assets for the p_chr_id
3495: FOR r_get_orig_fa IN get_orig_fa(p_chr_id => p_chr_id) LOOP
3496: IF get_orig_fa%NOTFOUND THEN
3497: OKL_API.set_message(p_app_name => G_APP_NAME,
3498: p_msg_name => G_NO_MATCHING_RECORD,
3499: p_token1 => G_COL_NAME_TOKEN,
3500: p_token1_value => 'p_chr_id');
3501: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 3501: x_return_status := OKL_API.G_RET_STS_ERROR;

3497: OKL_API.set_message(p_app_name => G_APP_NAME,
3498: p_msg_name => G_NO_MATCHING_RECORD,
3499: p_token1 => G_COL_NAME_TOKEN,
3500: p_token1_value => 'p_chr_id');
3501: x_return_status := OKL_API.G_RET_STS_ERROR;
3502: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3503: END IF;
3504: -- to get all the new line item information
3505: x_return_status := get_rec_cimv(r_get_orig_fa.id,

Line 3502: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3498: p_msg_name => G_NO_MATCHING_RECORD,
3499: p_token1 => G_COL_NAME_TOKEN,
3500: p_token1_value => 'p_chr_id');
3501: x_return_status := OKL_API.G_RET_STS_ERROR;
3502: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3503: END IF;
3504: -- to get all the new line item information
3505: x_return_status := get_rec_cimv(r_get_orig_fa.id,
3506: p_chr_id,

Line 3508: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3504: -- to get all the new line item information
3505: x_return_status := get_rec_cimv(r_get_orig_fa.id,
3506: p_chr_id,
3507: l_cimv_rec);
3508: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3509: OKL_API.set_message(p_app_name => G_APP_NAME,
3510: p_msg_name => G_NO_MATCHING_RECORD,
3511: p_token1 => G_COL_NAME_TOKEN,
3512: p_token1_value => 'OKC_K_ITEMS_V record');

Line 3509: OKL_API.set_message(p_app_name => G_APP_NAME,

3505: x_return_status := get_rec_cimv(r_get_orig_fa.id,
3506: p_chr_id,
3507: l_cimv_rec);
3508: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3509: OKL_API.set_message(p_app_name => G_APP_NAME,
3510: p_msg_name => G_NO_MATCHING_RECORD,
3511: p_token1 => G_COL_NAME_TOKEN,
3512: p_token1_value => 'OKC_K_ITEMS_V record');
3513: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

Line 3513: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3509: OKL_API.set_message(p_app_name => G_APP_NAME,
3510: p_msg_name => G_NO_MATCHING_RECORD,
3511: p_token1 => G_COL_NAME_TOKEN,
3512: p_token1_value => 'OKC_K_ITEMS_V record');
3513: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3514: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3515: OKL_API.set_message(p_app_name => G_APP_NAME,
3516: p_msg_name => G_NO_MATCHING_RECORD,
3517: p_token1 => G_COL_NAME_TOKEN,

Line 3514: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3510: p_msg_name => G_NO_MATCHING_RECORD,
3511: p_token1 => G_COL_NAME_TOKEN,
3512: p_token1_value => 'OKC_K_ITEMS_V record');
3513: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3514: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3515: OKL_API.set_message(p_app_name => G_APP_NAME,
3516: p_msg_name => G_NO_MATCHING_RECORD,
3517: p_token1 => G_COL_NAME_TOKEN,
3518: p_token1_value => 'OKC_K_ITEMS_V record');

Line 3515: OKL_API.set_message(p_app_name => G_APP_NAME,

3511: p_token1 => G_COL_NAME_TOKEN,
3512: p_token1_value => 'OKC_K_ITEMS_V record');
3513: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3514: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3515: OKL_API.set_message(p_app_name => G_APP_NAME,
3516: p_msg_name => G_NO_MATCHING_RECORD,
3517: p_token1 => G_COL_NAME_TOKEN,
3518: p_token1_value => 'OKC_K_ITEMS_V record');
3519: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 3519: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3515: OKL_API.set_message(p_app_name => G_APP_NAME,
3516: p_msg_name => G_NO_MATCHING_RECORD,
3517: p_token1 => G_COL_NAME_TOKEN,
3518: p_token1_value => 'OKC_K_ITEMS_V record');
3519: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3520: END IF;
3521:
3522: -- To get the old information of the old asset
3523: OPEN get_item_info(p_orig_chr_id => ln_orig_system_id1,

Line 3526: OKL_API.set_message(p_app_name => G_APP_NAME,

3522: -- To get the old information of the old asset
3523: OPEN get_item_info(p_orig_chr_id => ln_orig_system_id1,
3524: p_orig_cle_id => r_get_orig_fa.orig_cle_fa);
3525: IF get_item_info%NOTFOUND THEN
3526: OKL_API.set_message(p_app_name => G_APP_NAME,
3527: p_msg_name => G_NO_MATCHING_RECORD,
3528: p_token1 => G_COL_NAME_TOKEN,
3529: p_token1_value => 'p_chr_id');
3530: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 3530: x_return_status := OKL_API.G_RET_STS_ERROR;

3526: OKL_API.set_message(p_app_name => G_APP_NAME,
3527: p_msg_name => G_NO_MATCHING_RECORD,
3528: p_token1 => G_COL_NAME_TOKEN,
3529: p_token1_value => 'p_chr_id');
3530: x_return_status := OKL_API.G_RET_STS_ERROR;
3531: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3532: END IF;
3533: FETCH get_item_info INTO l_cimv_rec.object1_id1,
3534: l_cimv_rec.object1_id2;

Line 3531: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3527: p_msg_name => G_NO_MATCHING_RECORD,
3528: p_token1 => G_COL_NAME_TOKEN,
3529: p_token1_value => 'p_chr_id');
3530: x_return_status := OKL_API.G_RET_STS_ERROR;
3531: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3532: END IF;
3533: FETCH get_item_info INTO l_cimv_rec.object1_id1,
3534: l_cimv_rec.object1_id2;
3535: CLOSE get_item_info;

Line 3543: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3539: x_msg_count => x_msg_count,
3540: x_msg_data => x_msg_data,
3541: p_cimv_rec => l_cimv_rec,
3542: x_cimv_rec => lx_cimv_rec);
3543: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3544: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3545: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3546: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3547: END IF;

Line 3544: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3540: x_msg_data => x_msg_data,
3541: p_cimv_rec => l_cimv_rec,
3542: x_cimv_rec => lx_cimv_rec);
3543: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3544: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3545: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3546: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3547: END IF;
3548:

Line 3545: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3541: p_cimv_rec => l_cimv_rec,
3542: x_cimv_rec => lx_cimv_rec);
3543: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3544: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3545: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3546: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3547: END IF;
3548:
3549: -- We need to make the changes to Transaction asset information as processed

Line 3546: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3542: x_cimv_rec => lx_cimv_rec);
3543: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3544: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3545: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3546: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3547: END IF;
3548:
3549: -- We need to make the changes to Transaction asset information as processed
3550: x_return_status := get_tasv_rec(r_get_orig_fa.tas_id_fa,

Line 3552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3548:
3549: -- We need to make the changes to Transaction asset information as processed
3550: x_return_status := get_tasv_rec(r_get_orig_fa.tas_id_fa,
3551: l_trxv_rec);
3552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3553: OKL_API.set_message(p_app_name => G_APP_NAME,
3554: p_msg_name => G_NO_MATCHING_RECORD,
3555: p_token1 => G_COL_NAME_TOKEN,
3556: p_token1_value => 'TAS Rec');

Line 3553: OKL_API.set_message(p_app_name => G_APP_NAME,

3549: -- We need to make the changes to Transaction asset information as processed
3550: x_return_status := get_tasv_rec(r_get_orig_fa.tas_id_fa,
3551: l_trxv_rec);
3552: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3553: OKL_API.set_message(p_app_name => G_APP_NAME,
3554: p_msg_name => G_NO_MATCHING_RECORD,
3555: p_token1 => G_COL_NAME_TOKEN,
3556: p_token1_value => 'TAS Rec');
3557: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

Line 3557: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3553: OKL_API.set_message(p_app_name => G_APP_NAME,
3554: p_msg_name => G_NO_MATCHING_RECORD,
3555: p_token1 => G_COL_NAME_TOKEN,
3556: p_token1_value => 'TAS Rec');
3557: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3558: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3559: OKL_API.set_message(p_app_name => G_APP_NAME,
3560: p_msg_name => G_NO_MATCHING_RECORD,
3561: p_token1 => G_COL_NAME_TOKEN,

Line 3558: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3554: p_msg_name => G_NO_MATCHING_RECORD,
3555: p_token1 => G_COL_NAME_TOKEN,
3556: p_token1_value => 'TAS Rec');
3557: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3558: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3559: OKL_API.set_message(p_app_name => G_APP_NAME,
3560: p_msg_name => G_NO_MATCHING_RECORD,
3561: p_token1 => G_COL_NAME_TOKEN,
3562: p_token1_value => 'TAS Rec');

Line 3559: OKL_API.set_message(p_app_name => G_APP_NAME,

3555: p_token1 => G_COL_NAME_TOKEN,
3556: p_token1_value => 'TAS Rec');
3557: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3558: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3559: OKL_API.set_message(p_app_name => G_APP_NAME,
3560: p_msg_name => G_NO_MATCHING_RECORD,
3561: p_token1 => G_COL_NAME_TOKEN,
3562: p_token1_value => 'TAS Rec');
3563: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 3563: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3559: OKL_API.set_message(p_app_name => G_APP_NAME,
3560: p_msg_name => G_NO_MATCHING_RECORD,
3561: p_token1 => G_COL_NAME_TOKEN,
3562: p_token1_value => 'TAS Rec');
3563: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3564: END IF;
3565: l_trxv_rec.tsu_code := 'PROCESSED';
3566: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
3567: p_api_version => p_api_version,

Line 3574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3570: x_msg_count => x_msg_count,
3571: x_msg_data => x_msg_data,
3572: p_thpv_rec => l_trxv_rec,
3573: x_thpv_rec => lx_trxv_rec);
3574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3575: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3577: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3578: END IF;

Line 3575: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3571: x_msg_data => x_msg_data,
3572: p_thpv_rec => l_trxv_rec,
3573: x_thpv_rec => lx_trxv_rec);
3574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3575: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3577: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3578: END IF;
3579: END LOOP;

Line 3576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3572: p_thpv_rec => l_trxv_rec,
3573: x_thpv_rec => lx_trxv_rec);
3574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3575: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3577: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3578: END IF;
3579: END LOOP;
3580:

Line 3577: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3573: x_thpv_rec => lx_trxv_rec);
3574: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3575: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3576: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3577: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3578: END IF;
3579: END LOOP;
3580:
3581: IF (G_DEBUG_SPLIT) THEN

Line 3587: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3583: finished with status ' || x_return_status || ' in
3584: split_contract_after_yield procedure');
3585: END IF;
3586:
3587: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3588: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3589: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3590: RAISE OKL_API.G_EXCEPTION_ERROR;
3591: END IF;

Line 3588: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3584: split_contract_after_yield procedure');
3585: END IF;
3586:
3587: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3588: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3589: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3590: RAISE OKL_API.G_EXCEPTION_ERROR;
3591: END IF;
3592:

Line 3589: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3585: END IF;
3586:
3587: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3588: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3589: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3590: RAISE OKL_API.G_EXCEPTION_ERROR;
3591: END IF;
3592:
3593: -- To get the Install Base information for the p_chr_id

Line 3590: RAISE OKL_API.G_EXCEPTION_ERROR;

3586:
3587: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3588: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3589: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3590: RAISE OKL_API.G_EXCEPTION_ERROR;
3591: END IF;
3592:
3593: -- To get the Install Base information for the p_chr_id
3594: FOR r_get_orig_ib IN get_orig_ib(p_chr_id => p_chr_id) LOOP

Line 3596: x_return_status := OKL_API.G_RET_STS_ERROR;

3592:
3593: -- To get the Install Base information for the p_chr_id
3594: FOR r_get_orig_ib IN get_orig_ib(p_chr_id => p_chr_id) LOOP
3595: IF get_orig_ib%NOTFOUND THEN
3596: x_return_status := OKL_API.G_RET_STS_ERROR;
3597: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3598: END IF;
3599: -- to get all the new line item information
3600: x_return_status := get_rec_cimv(r_get_orig_ib.id,

Line 3597: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3593: -- To get the Install Base information for the p_chr_id
3594: FOR r_get_orig_ib IN get_orig_ib(p_chr_id => p_chr_id) LOOP
3595: IF get_orig_ib%NOTFOUND THEN
3596: x_return_status := OKL_API.G_RET_STS_ERROR;
3597: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3598: END IF;
3599: -- to get all the new line item information
3600: x_return_status := get_rec_cimv(r_get_orig_ib.id,
3601: p_chr_id,

Line 3603: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3599: -- to get all the new line item information
3600: x_return_status := get_rec_cimv(r_get_orig_ib.id,
3601: p_chr_id,
3602: l_cimv_rec);
3603: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3604: OKL_API.set_message(p_app_name => G_APP_NAME,
3605: p_msg_name => G_NO_MATCHING_RECORD,
3606: p_token1 => G_COL_NAME_TOKEN,
3607: p_token1_value => 'OKC_K_ITEMS_V record');

Line 3604: OKL_API.set_message(p_app_name => G_APP_NAME,

3600: x_return_status := get_rec_cimv(r_get_orig_ib.id,
3601: p_chr_id,
3602: l_cimv_rec);
3603: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3604: OKL_API.set_message(p_app_name => G_APP_NAME,
3605: p_msg_name => G_NO_MATCHING_RECORD,
3606: p_token1 => G_COL_NAME_TOKEN,
3607: p_token1_value => 'OKC_K_ITEMS_V record');
3608: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

Line 3608: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3604: OKL_API.set_message(p_app_name => G_APP_NAME,
3605: p_msg_name => G_NO_MATCHING_RECORD,
3606: p_token1 => G_COL_NAME_TOKEN,
3607: p_token1_value => 'OKC_K_ITEMS_V record');
3608: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3610: OKL_API.set_message(p_app_name => G_APP_NAME,
3611: p_msg_name => G_NO_MATCHING_RECORD,
3612: p_token1 => G_COL_NAME_TOKEN,

Line 3609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3605: p_msg_name => G_NO_MATCHING_RECORD,
3606: p_token1 => G_COL_NAME_TOKEN,
3607: p_token1_value => 'OKC_K_ITEMS_V record');
3608: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3610: OKL_API.set_message(p_app_name => G_APP_NAME,
3611: p_msg_name => G_NO_MATCHING_RECORD,
3612: p_token1 => G_COL_NAME_TOKEN,
3613: p_token1_value => 'OKC_K_ITEMS_V record');

Line 3610: OKL_API.set_message(p_app_name => G_APP_NAME,

3606: p_token1 => G_COL_NAME_TOKEN,
3607: p_token1_value => 'OKC_K_ITEMS_V record');
3608: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3610: OKL_API.set_message(p_app_name => G_APP_NAME,
3611: p_msg_name => G_NO_MATCHING_RECORD,
3612: p_token1 => G_COL_NAME_TOKEN,
3613: p_token1_value => 'OKC_K_ITEMS_V record');
3614: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 3614: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3610: OKL_API.set_message(p_app_name => G_APP_NAME,
3611: p_msg_name => G_NO_MATCHING_RECORD,
3612: p_token1 => G_COL_NAME_TOKEN,
3613: p_token1_value => 'OKC_K_ITEMS_V record');
3614: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3615: END IF;
3616: -- To get the old information of the old asset
3617: OPEN get_item_info(p_orig_chr_id => ln_orig_system_id1,
3618: p_orig_cle_id => r_get_orig_ib.orig_cle_ib);

Line 3620: OKL_API.set_message(p_app_name => G_APP_NAME,

3616: -- To get the old information of the old asset
3617: OPEN get_item_info(p_orig_chr_id => ln_orig_system_id1,
3618: p_orig_cle_id => r_get_orig_ib.orig_cle_ib);
3619: IF get_item_info%NOTFOUND THEN
3620: OKL_API.set_message(p_app_name => G_APP_NAME,
3621: p_msg_name => G_NO_MATCHING_RECORD,
3622: p_token1 => G_COL_NAME_TOKEN,
3623: p_token1_value => 'Orig system id1');
3624: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 3624: x_return_status := OKL_API.G_RET_STS_ERROR;

3620: OKL_API.set_message(p_app_name => G_APP_NAME,
3621: p_msg_name => G_NO_MATCHING_RECORD,
3622: p_token1 => G_COL_NAME_TOKEN,
3623: p_token1_value => 'Orig system id1');
3624: x_return_status := OKL_API.G_RET_STS_ERROR;
3625: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3626: END IF;
3627: FETCH get_item_info INTO l_cimv_rec.object1_id1,
3628: l_cimv_rec.object1_id2;

Line 3625: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3621: p_msg_name => G_NO_MATCHING_RECORD,
3622: p_token1 => G_COL_NAME_TOKEN,
3623: p_token1_value => 'Orig system id1');
3624: x_return_status := OKL_API.G_RET_STS_ERROR;
3625: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3626: END IF;
3627: FETCH get_item_info INTO l_cimv_rec.object1_id1,
3628: l_cimv_rec.object1_id2;
3629: CLOSE get_item_info;

Line 3637: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3633: x_msg_count => x_msg_count,
3634: x_msg_data => x_msg_data,
3635: p_cimv_rec => l_cimv_rec,
3636: x_cimv_rec => lx_cimv_rec);
3637: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3638: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3639: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3640: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3641: END IF;

Line 3638: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3634: x_msg_data => x_msg_data,
3635: p_cimv_rec => l_cimv_rec,
3636: x_cimv_rec => lx_cimv_rec);
3637: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3638: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3639: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3640: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3641: END IF;
3642:

Line 3639: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3635: p_cimv_rec => l_cimv_rec,
3636: x_cimv_rec => lx_cimv_rec);
3637: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3638: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3639: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3640: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3641: END IF;
3642:
3643: -- We need to make the changes to Transaction asset information as processed

Line 3640: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3636: x_cimv_rec => lx_cimv_rec);
3637: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3638: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3639: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3640: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3641: END IF;
3642:
3643: -- We need to make the changes to Transaction asset information as processed
3644: x_return_status := get_tasv_rec(r_get_orig_ib.tas_id_ib,

Line 3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3642:
3643: -- We need to make the changes to Transaction asset information as processed
3644: x_return_status := get_tasv_rec(r_get_orig_ib.tas_id_ib,
3645: l_trxv_rec);
3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3647: OKL_API.set_message(p_app_name => G_APP_NAME,
3648: p_msg_name => G_NO_MATCHING_RECORD,
3649: p_token1 => G_COL_NAME_TOKEN,
3650: p_token1_value => 'TAS Rec');

Line 3647: OKL_API.set_message(p_app_name => G_APP_NAME,

3643: -- We need to make the changes to Transaction asset information as processed
3644: x_return_status := get_tasv_rec(r_get_orig_ib.tas_id_ib,
3645: l_trxv_rec);
3646: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3647: OKL_API.set_message(p_app_name => G_APP_NAME,
3648: p_msg_name => G_NO_MATCHING_RECORD,
3649: p_token1 => G_COL_NAME_TOKEN,
3650: p_token1_value => 'TAS Rec');
3651: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

Line 3651: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3647: OKL_API.set_message(p_app_name => G_APP_NAME,
3648: p_msg_name => G_NO_MATCHING_RECORD,
3649: p_token1 => G_COL_NAME_TOKEN,
3650: p_token1_value => 'TAS Rec');
3651: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3652: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3653: OKL_API.set_message(p_app_name => G_APP_NAME,
3654: p_msg_name => G_NO_MATCHING_RECORD,
3655: p_token1 => G_COL_NAME_TOKEN,

Line 3652: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3648: p_msg_name => G_NO_MATCHING_RECORD,
3649: p_token1 => G_COL_NAME_TOKEN,
3650: p_token1_value => 'TAS Rec');
3651: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3652: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3653: OKL_API.set_message(p_app_name => G_APP_NAME,
3654: p_msg_name => G_NO_MATCHING_RECORD,
3655: p_token1 => G_COL_NAME_TOKEN,
3656: p_token1_value => 'TAS Rec');

Line 3653: OKL_API.set_message(p_app_name => G_APP_NAME,

3649: p_token1 => G_COL_NAME_TOKEN,
3650: p_token1_value => 'TAS Rec');
3651: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3652: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3653: OKL_API.set_message(p_app_name => G_APP_NAME,
3654: p_msg_name => G_NO_MATCHING_RECORD,
3655: p_token1 => G_COL_NAME_TOKEN,
3656: p_token1_value => 'TAS Rec');
3657: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

Line 3657: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3653: OKL_API.set_message(p_app_name => G_APP_NAME,
3654: p_msg_name => G_NO_MATCHING_RECORD,
3655: p_token1 => G_COL_NAME_TOKEN,
3656: p_token1_value => 'TAS Rec');
3657: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3658: END IF;
3659: l_trxv_rec.tsu_code := 'PROCESSED';
3660: OKL_TRX_ASSETS_PUB.update_trx_ass_h_def(
3661: p_api_version => p_api_version,

Line 3668: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3664: x_msg_count => x_msg_count,
3665: x_msg_data => x_msg_data,
3666: p_thpv_rec => l_trxv_rec,
3667: x_thpv_rec => lx_trxv_rec);
3668: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3669: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3670: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3671: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3672: END IF;

Line 3669: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

3665: x_msg_data => x_msg_data,
3666: p_thpv_rec => l_trxv_rec,
3667: x_thpv_rec => lx_trxv_rec);
3668: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3669: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3670: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3671: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3672: END IF;
3673: END LOOP;

Line 3670: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3666: p_thpv_rec => l_trxv_rec,
3667: x_thpv_rec => lx_trxv_rec);
3668: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3669: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3670: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3671: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3672: END IF;
3673: END LOOP;
3674:

Line 3671: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3667: x_thpv_rec => lx_trxv_rec);
3668: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3669: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
3670: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3671: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3672: END IF;
3673: END LOOP;
3674:
3675: IF (G_DEBUG_SPLIT) THEN

Line 3684: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3680: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
3681: END IF;
3682: END IF;
3683:
3684: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3685: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3686: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3687: RAISE OKL_API.G_EXCEPTION_ERROR;
3688: END IF;

Line 3685: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3681: END IF;
3682: END IF;
3683:
3684: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3685: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3686: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3687: RAISE OKL_API.G_EXCEPTION_ERROR;
3688: END IF;
3689:

Line 3686: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3682: END IF;
3683:
3684: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3685: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3686: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3687: RAISE OKL_API.G_EXCEPTION_ERROR;
3688: END IF;
3689:
3690: -- Activating the Usage lines also if exits

Line 3687: RAISE OKL_API.G_EXCEPTION_ERROR;

3683:
3684: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3685: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3686: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3687: RAISE OKL_API.G_EXCEPTION_ERROR;
3688: END IF;
3689:
3690: -- Activating the Usage lines also if exits
3691: OPEN check_other_line(p_chr_id => p_chr_id);

Line 3714: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3710: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
3711: END IF;
3712: END IF;
3713:
3714: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3715: RAISE OKL_API.G_EXCEPTION_ERROR;
3716: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3717: RAISE OKL_API.G_EXCEPTION_ERROR;
3718: END IF;

Line 3715: RAISE OKL_API.G_EXCEPTION_ERROR;

3711: END IF;
3712: END IF;
3713:
3714: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3715: RAISE OKL_API.G_EXCEPTION_ERROR;
3716: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3717: RAISE OKL_API.G_EXCEPTION_ERROR;
3718: END IF;
3719: END IF;

Line 3716: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3712: END IF;
3713:
3714: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3715: RAISE OKL_API.G_EXCEPTION_ERROR;
3716: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3717: RAISE OKL_API.G_EXCEPTION_ERROR;
3718: END IF;
3719: END IF;
3720: -- We need to change the status of the contract

Line 3717: RAISE OKL_API.G_EXCEPTION_ERROR;

3713:
3714: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3715: RAISE OKL_API.G_EXCEPTION_ERROR;
3716: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3717: RAISE OKL_API.G_EXCEPTION_ERROR;
3718: END IF;
3719: END IF;
3720: -- We need to change the status of the contract
3721: OKL_CONTRACT_STATUS_PUB.update_contract_status(

Line 3729: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3725: x_msg_count => x_msg_count,
3726: x_msg_data => x_msg_data,
3727: p_khr_status => 'BOOKED',
3728: p_chr_id => p_chr_id);
3729: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3730: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3731: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3732: RAISE OKL_API.G_EXCEPTION_ERROR;
3733: END IF;

Line 3730: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3726: x_msg_data => x_msg_data,
3727: p_khr_status => 'BOOKED',
3728: p_chr_id => p_chr_id);
3729: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3730: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3731: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3732: RAISE OKL_API.G_EXCEPTION_ERROR;
3733: END IF;
3734:

Line 3731: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3727: p_khr_status => 'BOOKED',
3728: p_chr_id => p_chr_id);
3729: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3730: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3731: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3732: RAISE OKL_API.G_EXCEPTION_ERROR;
3733: END IF;
3734:
3735: IF (G_DEBUG_SPLIT) THEN

Line 3732: RAISE OKL_API.G_EXCEPTION_ERROR;

3728: p_chr_id => p_chr_id);
3729: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3730: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3731: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3732: RAISE OKL_API.G_EXCEPTION_ERROR;
3733: END IF;
3734:
3735: IF (G_DEBUG_SPLIT) THEN
3736: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'OKL_CONTRACT_STATUS_PUB.update_contract_status

Line 3749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3745: x_return_status => x_return_status,
3746: x_msg_count => x_msg_count,
3747: x_msg_data => x_msg_data,
3748: p_chr_id => p_chr_id);
3749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3750: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3752: RAISE OKL_API.G_EXCEPTION_ERROR;
3753: END IF;

Line 3750: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3746: x_msg_count => x_msg_count,
3747: x_msg_data => x_msg_data,
3748: p_chr_id => p_chr_id);
3749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3750: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3752: RAISE OKL_API.G_EXCEPTION_ERROR;
3753: END IF;
3754: -- To get status of splited transaction Chr id

Line 3751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3747: x_msg_data => x_msg_data,
3748: p_chr_id => p_chr_id);
3749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3750: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3752: RAISE OKL_API.G_EXCEPTION_ERROR;
3753: END IF;
3754: -- To get status of splited transaction Chr id
3755: FOR r_check_ctrct_status IN check_ctrct_status(p_chr_id => ln_orig_system_id1) LOOP

Line 3752: RAISE OKL_API.G_EXCEPTION_ERROR;

3748: p_chr_id => p_chr_id);
3749: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3750: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3751: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3752: RAISE OKL_API.G_EXCEPTION_ERROR;
3753: END IF;
3754: -- To get status of splited transaction Chr id
3755: FOR r_check_ctrct_status IN check_ctrct_status(p_chr_id => ln_orig_system_id1) LOOP
3756: lt_chr_sts_tbl(i).chr_id := r_check_ctrct_status.chr_id;

Line 3761: OKL_API.set_message(p_app_name => G_APP_NAME,

3757: lt_chr_sts_tbl(i).sts_code := r_check_ctrct_status.sts_code;
3758: l_tcnv_rec.id := r_check_ctrct_status.trx_id;
3759:
3760: IF check_ctrct_status%NOTFOUND THEN
3761: OKL_API.set_message(p_app_name => G_APP_NAME,
3762: p_msg_name => G_NO_MATCHING_RECORD,
3763: p_token1 => G_COL_NAME_TOKEN,
3764: p_token1_value => 'OKL_TRX_CONTRACTS.ID');
3765: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 3765: x_return_status := OKL_API.G_RET_STS_ERROR;

3761: OKL_API.set_message(p_app_name => G_APP_NAME,
3762: p_msg_name => G_NO_MATCHING_RECORD,
3763: p_token1 => G_COL_NAME_TOKEN,
3764: p_token1_value => 'OKL_TRX_CONTRACTS.ID');
3765: x_return_status := OKL_API.G_RET_STS_ERROR;
3766: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3767: END IF;
3768: i := i + 1;
3769: END LOOP;

Line 3766: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

3762: p_msg_name => G_NO_MATCHING_RECORD,
3763: p_token1 => G_COL_NAME_TOKEN,
3764: p_token1_value => 'OKL_TRX_CONTRACTS.ID');
3765: x_return_status := OKL_API.G_RET_STS_ERROR;
3766: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3767: END IF;
3768: i := i + 1;
3769: END LOOP;
3770: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 3770: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3766: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
3767: END IF;
3768: i := i + 1;
3769: END LOOP;
3770: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3771: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3772: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3773: RAISE OKL_API.G_EXCEPTION_ERROR;
3774: END IF;

Line 3771: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3767: END IF;
3768: i := i + 1;
3769: END LOOP;
3770: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3771: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3772: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3773: RAISE OKL_API.G_EXCEPTION_ERROR;
3774: END IF;
3775: IF lt_chr_sts_tbl.COUNT = 2 THEN

Line 3772: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3768: i := i + 1;
3769: END LOOP;
3770: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3771: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3772: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3773: RAISE OKL_API.G_EXCEPTION_ERROR;
3774: END IF;
3775: IF lt_chr_sts_tbl.COUNT = 2 THEN
3776: j := lt_chr_sts_tbl.FIRST;

Line 3773: RAISE OKL_API.G_EXCEPTION_ERROR;

3769: END LOOP;
3770: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3771: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3772: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3773: RAISE OKL_API.G_EXCEPTION_ERROR;
3774: END IF;
3775: IF lt_chr_sts_tbl.COUNT = 2 THEN
3776: j := lt_chr_sts_tbl.FIRST;
3777:

Line 3783: OKL_API.set_message(p_app_name => G_APP_NAME,

3779: lt_chr_sts_tbl(j).sts_code = 'BOOKED' THEN
3780: lv_ok_to_terminate_orig_K := 'Y';
3781: END IF;
3782: ELSE
3783: OKL_API.set_message(p_app_name => G_APP_NAME,
3784: p_msg_name => G_CNT_REC);
3785: RAISE OKL_API.G_EXCEPTION_ERROR;
3786: END IF;
3787:

Line 3785: RAISE OKL_API.G_EXCEPTION_ERROR;

3781: END IF;
3782: ELSE
3783: OKL_API.set_message(p_app_name => G_APP_NAME,
3784: p_msg_name => G_CNT_REC);
3785: RAISE OKL_API.G_EXCEPTION_ERROR;
3786: END IF;
3787:
3788: IF lv_ok_to_terminate_orig_K = 'Y' THEN
3789: -- Now since both the contract booked we can safely update the

Line 3800: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3796: x_msg_count => x_msg_count,
3797: x_msg_data => x_msg_data,
3798: p_tcnv_rec => l_tcnv_rec,
3799: x_tcnv_rec => lx_tcnv_rec);
3800: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3801: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3802: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3803: RAISE OKL_API.G_EXCEPTION_ERROR;
3804: END IF;

Line 3801: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3797: x_msg_data => x_msg_data,
3798: p_tcnv_rec => l_tcnv_rec,
3799: x_tcnv_rec => lx_tcnv_rec);
3800: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3801: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3802: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3803: RAISE OKL_API.G_EXCEPTION_ERROR;
3804: END IF;
3805:

Line 3802: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3798: p_tcnv_rec => l_tcnv_rec,
3799: x_tcnv_rec => lx_tcnv_rec);
3800: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3801: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3802: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3803: RAISE OKL_API.G_EXCEPTION_ERROR;
3804: END IF;
3805:
3806: /**

Line 3803: RAISE OKL_API.G_EXCEPTION_ERROR;

3799: x_tcnv_rec => lx_tcnv_rec);
3800: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3801: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3802: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3803: RAISE OKL_API.G_EXCEPTION_ERROR;
3804: END IF;
3805:
3806: /**
3807: * sjalasut, added API call to process subsidy pool transactions

Line 3829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3825: ,x_msg_data => x_msg_data
3826: ,p_new1_chr_id => lt_chr_sts_tbl(j).chr_id
3827: ,p_new2_chr_id => lt_chr_sts_tbl(j+1).chr_id
3828: );
3829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3832: RAISE OKL_API.G_EXCEPTION_ERROR;
3833: END IF;

Line 3830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3826: ,p_new1_chr_id => lt_chr_sts_tbl(j).chr_id
3827: ,p_new2_chr_id => lt_chr_sts_tbl(j+1).chr_id
3828: );
3829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3832: RAISE OKL_API.G_EXCEPTION_ERROR;
3833: END IF;
3834:

Line 3831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3827: ,p_new2_chr_id => lt_chr_sts_tbl(j+1).chr_id
3828: );
3829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3832: RAISE OKL_API.G_EXCEPTION_ERROR;
3833: END IF;
3834:
3835: IF (G_DEBUG_SPLIT) THEN

Line 3832: RAISE OKL_API.G_EXCEPTION_ERROR;

3828: );
3829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3832: RAISE OKL_API.G_EXCEPTION_ERROR;
3833: END IF;
3834:
3835: IF (G_DEBUG_SPLIT) THEN
3836: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Completed Processing Subsidy Pool Transactions '|| x_return_status || ' in

Line 3856: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3852: x_msg_count => x_msg_count,
3853: x_msg_data => x_msg_data,
3854: p_khr_status => 'AMENDED',
3855: p_chr_id => ln_orig_system_id1);
3856: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3857: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3858: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3859: RAISE OKL_API.G_EXCEPTION_ERROR;
3860: END IF;

Line 3857: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3853: x_msg_data => x_msg_data,
3854: p_khr_status => 'AMENDED',
3855: p_chr_id => ln_orig_system_id1);
3856: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3857: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3858: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3859: RAISE OKL_API.G_EXCEPTION_ERROR;
3860: END IF;
3861: -- We need to change the status of the Lines for the contract

Line 3858: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3854: p_khr_status => 'AMENDED',
3855: p_chr_id => ln_orig_system_id1);
3856: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3857: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3858: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3859: RAISE OKL_API.G_EXCEPTION_ERROR;
3860: END IF;
3861: -- We need to change the status of the Lines for the contract
3862: OKL_CONTRACT_STATUS_PUB.cascade_lease_status(

Line 3859: RAISE OKL_API.G_EXCEPTION_ERROR;

3855: p_chr_id => ln_orig_system_id1);
3856: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3857: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3858: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3859: RAISE OKL_API.G_EXCEPTION_ERROR;
3860: END IF;
3861: -- We need to change the status of the Lines for the contract
3862: OKL_CONTRACT_STATUS_PUB.cascade_lease_status(
3863: p_api_version => p_api_version,

Line 3869: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3865: x_return_status => x_return_status,
3866: x_msg_count => x_msg_count,
3867: x_msg_data => x_msg_data,
3868: p_chr_id => ln_orig_system_id1);
3869: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3870: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3871: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3872: RAISE OKL_API.G_EXCEPTION_ERROR;
3873: END IF;

Line 3870: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3866: x_msg_count => x_msg_count,
3867: x_msg_data => x_msg_data,
3868: p_chr_id => ln_orig_system_id1);
3869: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3870: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3871: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3872: RAISE OKL_API.G_EXCEPTION_ERROR;
3873: END IF;
3874: -- We can update the old servic contract also

Line 3871: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3867: x_msg_data => x_msg_data,
3868: p_chr_id => ln_orig_system_id1);
3869: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3870: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3871: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3872: RAISE OKL_API.G_EXCEPTION_ERROR;
3873: END IF;
3874: -- We can update the old servic contract also
3875: OPEN get_old_service_id(p_chr_id =>ln_orig_system_id1);

Line 3872: RAISE OKL_API.G_EXCEPTION_ERROR;

3868: p_chr_id => ln_orig_system_id1);
3869: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3870: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3871: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3872: RAISE OKL_API.G_EXCEPTION_ERROR;
3873: END IF;
3874: -- We can update the old servic contract also
3875: OPEN get_old_service_id(p_chr_id =>ln_orig_system_id1);
3876: FETCH get_old_service_id INTO ln_service_id;

Line 3879: ln_service_id <> OKL_API.G_MISS_NUM THEN

3875: OPEN get_old_service_id(p_chr_id =>ln_orig_system_id1);
3876: FETCH get_old_service_id INTO ln_service_id;
3877: CLOSE get_old_service_id;
3878: IF ln_service_id IS NOT NULL OR
3879: ln_service_id <> OKL_API.G_MISS_NUM THEN
3880: -- We need to change the status of the contract
3881: OKL_CONTRACT_STATUS_PUB.update_contract_status(
3882: p_api_version => p_api_version,
3883: p_init_msg_list => p_init_msg_list,

Line 3889: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3885: x_msg_count => x_msg_count,
3886: x_msg_data => x_msg_data,
3887: p_khr_status => 'AMENDED',
3888: p_chr_id => ln_service_id);
3889: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3890: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3891: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3892: RAISE OKL_API.G_EXCEPTION_ERROR;
3893: END IF;

Line 3890: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3886: x_msg_data => x_msg_data,
3887: p_khr_status => 'AMENDED',
3888: p_chr_id => ln_service_id);
3889: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3890: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3891: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3892: RAISE OKL_API.G_EXCEPTION_ERROR;
3893: END IF;
3894: -- We need to change the status of the Lines for the contract

Line 3891: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3887: p_khr_status => 'AMENDED',
3888: p_chr_id => ln_service_id);
3889: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3890: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3891: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3892: RAISE OKL_API.G_EXCEPTION_ERROR;
3893: END IF;
3894: -- We need to change the status of the Lines for the contract
3895: OKL_CONTRACT_STATUS_PUB.cascade_lease_status(

Line 3892: RAISE OKL_API.G_EXCEPTION_ERROR;

3888: p_chr_id => ln_service_id);
3889: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3890: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3891: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3892: RAISE OKL_API.G_EXCEPTION_ERROR;
3893: END IF;
3894: -- We need to change the status of the Lines for the contract
3895: OKL_CONTRACT_STATUS_PUB.cascade_lease_status(
3896: p_api_version => p_api_version,

Line 3902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3898: x_return_status => x_return_status,
3899: x_msg_count => x_msg_count,
3900: x_msg_data => x_msg_data,
3901: p_chr_id => ln_service_id);
3902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3905: RAISE OKL_API.G_EXCEPTION_ERROR;
3906: END IF;

Line 3903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3899: x_msg_count => x_msg_count,
3900: x_msg_data => x_msg_data,
3901: p_chr_id => ln_service_id);
3902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3905: RAISE OKL_API.G_EXCEPTION_ERROR;
3906: END IF;
3907: END IF;

Line 3904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3900: x_msg_data => x_msg_data,
3901: p_chr_id => ln_service_id);
3902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3905: RAISE OKL_API.G_EXCEPTION_ERROR;
3906: END IF;
3907: END IF;
3908:

Line 3905: RAISE OKL_API.G_EXCEPTION_ERROR;

3901: p_chr_id => ln_service_id);
3902: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3903: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3904: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3905: RAISE OKL_API.G_EXCEPTION_ERROR;
3906: END IF;
3907: END IF;
3908:
3909: -- rravikir added for Bug 2927173, 2901442

Line 3939: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3935: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
3936: END IF;
3937: END IF;
3938:
3939: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3940: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3941: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3942: RAISE OKL_API.G_EXCEPTION_ERROR;
3943: END IF;

Line 3940: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3936: END IF;
3937: END IF;
3938:
3939: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3940: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3941: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3942: RAISE OKL_API.G_EXCEPTION_ERROR;
3943: END IF;
3944:

Line 3941: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3937: END IF;
3938:
3939: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3940: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3941: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3942: RAISE OKL_API.G_EXCEPTION_ERROR;
3943: END IF;
3944:
3945: -- rravikir added for Bug 3487162

Line 3942: RAISE OKL_API.G_EXCEPTION_ERROR;

3938:
3939: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3940: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3941: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3942: RAISE OKL_API.G_EXCEPTION_ERROR;
3943: END IF;
3944:
3945: -- rravikir added for Bug 3487162
3946: -- Get valid open period date by calling accounting util with split

Line 3971: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

3967: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
3968: END IF;
3969: END IF;
3970:
3971: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3972: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3973: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3974: RAISE OKL_API.G_EXCEPTION_ERROR;
3975: END IF;

Line 3972: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

3968: END IF;
3969: END IF;
3970:
3971: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3972: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3973: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3974: RAISE OKL_API.G_EXCEPTION_ERROR;
3975: END IF;
3976: -- end for Bug 2927173, 2901442

Line 3973: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

3969: END IF;
3970:
3971: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3972: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3973: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3974: RAISE OKL_API.G_EXCEPTION_ERROR;
3975: END IF;
3976: -- end for Bug 2927173, 2901442
3977:

Line 3974: RAISE OKL_API.G_EXCEPTION_ERROR;

3970:
3971: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3972: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3973: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
3974: RAISE OKL_API.G_EXCEPTION_ERROR;
3975: END IF;
3976: -- end for Bug 2927173, 2901442
3977:
3978: END IF;

Line 3981: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,

3977:
3978: END IF;
3979: END IF;
3980:
3981: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
3982: x_msg_data => x_msg_data);
3983:
3984: EXCEPTION
3985: WHEN OKL_API.G_EXCEPTION_ERROR THEN

Line 3985: WHEN OKL_API.G_EXCEPTION_ERROR THEN

3981: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
3982: x_msg_data => x_msg_data);
3983:
3984: EXCEPTION
3985: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3986: IF check_split_k_csr%ISOPEN THEN
3987: CLOSE check_split_k_csr;
3988: END IF;
3989: IF get_orig_sys_id1%ISOPEN THEN

Line 4013: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

4009: END IF;
4010: IF get_split_info%ISOPEN THEN
4011: CLOSE get_split_info;
4012: END IF;
4013: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
4014: p_api_name => l_api_name,
4015: p_pkg_name => G_PKG_NAME,
4016: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
4017: x_msg_count => x_msg_count,

Line 4016: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

4012: END IF;
4013: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
4014: p_api_name => l_api_name,
4015: p_pkg_name => G_PKG_NAME,
4016: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
4017: x_msg_count => x_msg_count,
4018: x_msg_data => x_msg_data,
4019: p_api_type => G_API_TYPE);
4020:

Line 4021: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

4017: x_msg_count => x_msg_count,
4018: x_msg_data => x_msg_data,
4019: p_api_type => G_API_TYPE);
4020:
4021: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4022: IF check_split_k_csr%ISOPEN THEN
4023: CLOSE check_split_k_csr;
4024: END IF;
4025: IF get_orig_sys_id1%ISOPEN THEN

Line 4049: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

4045: END IF;
4046: IF get_split_info%ISOPEN THEN
4047: CLOSE get_split_info;
4048: END IF;
4049: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
4050: p_api_name => l_api_name,
4051: p_pkg_name => G_PKG_NAME,
4052: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
4053: x_msg_count => x_msg_count,

Line 4052: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

4048: END IF;
4049: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
4050: p_api_name => l_api_name,
4051: p_pkg_name => G_PKG_NAME,
4052: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
4053: x_msg_count => x_msg_count,
4054: x_msg_data => x_msg_data,
4055: p_api_type => G_API_TYPE);
4056:

Line 4085: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

4081: END IF;
4082: IF get_split_info%ISOPEN THEN
4083: CLOSE get_split_info;
4084: END IF;
4085: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
4086: p_api_name => l_api_name,
4087: p_pkg_name => G_PKG_NAME,
4088: p_exc_name => 'OTHERS',
4089: x_msg_count => x_msg_count,

Line 4151: x_return_status := OKL_API.G_RET_STS_SUCCESS;

4147: AND lse.id = stl.lse_id
4148: AND stl.scs_code IN (G_LEASE_SCS_CODE,G_LOAN_SCS_CODE);
4149:
4150: BEGIN
4151: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4152: -- Call start_activity to create savepoint, check compatibility
4153: -- and initialize message list
4154: x_return_status := OKL_API.START_ACTIVITY (
4155: l_api_name

Line 4154: x_return_status := OKL_API.START_ACTIVITY (

4150: BEGIN
4151: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4152: -- Call start_activity to create savepoint, check compatibility
4153: -- and initialize message list
4154: x_return_status := OKL_API.START_ACTIVITY (
4155: l_api_name
4156: ,p_init_msg_list
4157: ,'_PVT'
4158: ,x_return_status);

Line 4160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4156: ,p_init_msg_list
4157: ,'_PVT'
4158: ,x_return_status);
4159: -- Check if activity started successfully
4160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4163: RAISE OKL_API.G_EXCEPTION_ERROR;
4164: END IF;

Line 4161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4157: ,'_PVT'
4158: ,x_return_status);
4159: -- Check if activity started successfully
4160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4163: RAISE OKL_API.G_EXCEPTION_ERROR;
4164: END IF;
4165: -- Count of the top for the old contract

Line 4162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4158: ,x_return_status);
4159: -- Check if activity started successfully
4160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4163: RAISE OKL_API.G_EXCEPTION_ERROR;
4164: END IF;
4165: -- Count of the top for the old contract
4166: -- Should match the imput parameter p_new_khr_top_line.COUNT

Line 4163: RAISE OKL_API.G_EXCEPTION_ERROR;

4159: -- Check if activity started successfully
4160: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4161: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4162: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4163: RAISE OKL_API.G_EXCEPTION_ERROR;
4164: END IF;
4165: -- Count of the top for the old contract
4166: -- Should match the imput parameter p_new_khr_top_line.COUNT
4167: OPEN c_old_top_line_cnt(p_contract_number => p_old_contract_number);

Line 4169: OKL_API.set_message(p_app_name => G_APP_NAME,

4165: -- Count of the top for the old contract
4166: -- Should match the imput parameter p_new_khr_top_line.COUNT
4167: OPEN c_old_top_line_cnt(p_contract_number => p_old_contract_number);
4168: IF c_old_top_line_cnt%NOTFOUND THEN
4169: OKL_API.set_message(p_app_name => G_APP_NAME,
4170: p_msg_name => 'OKL_LLA_CHR_ID');
4171: RAISE OKL_API.G_EXCEPTION_ERROR;
4172: END IF;
4173: FETCH c_old_top_line_cnt INTO ln_old_top_line_cnt;

Line 4171: RAISE OKL_API.G_EXCEPTION_ERROR;

4167: OPEN c_old_top_line_cnt(p_contract_number => p_old_contract_number);
4168: IF c_old_top_line_cnt%NOTFOUND THEN
4169: OKL_API.set_message(p_app_name => G_APP_NAME,
4170: p_msg_name => 'OKL_LLA_CHR_ID');
4171: RAISE OKL_API.G_EXCEPTION_ERROR;
4172: END IF;
4173: FETCH c_old_top_line_cnt INTO ln_old_top_line_cnt;
4174: CLOSE c_old_top_line_cnt;
4175: IF ln_old_top_line_cnt = 0 THEN

Line 4176: OKL_API.set_message(p_app_name => G_APP_NAME,

4172: END IF;
4173: FETCH c_old_top_line_cnt INTO ln_old_top_line_cnt;
4174: CLOSE c_old_top_line_cnt;
4175: IF ln_old_top_line_cnt = 0 THEN
4176: OKL_API.set_message(p_app_name => G_APP_NAME,
4177: p_msg_name => 'OKL_LLA_CHR_ID');
4178: RAISE OKL_API.G_EXCEPTION_ERROR;
4179: END IF;
4180: IF ln_old_top_line_cnt <> p_new_khr_top_line.COUNT THEN

Line 4178: RAISE OKL_API.G_EXCEPTION_ERROR;

4174: CLOSE c_old_top_line_cnt;
4175: IF ln_old_top_line_cnt = 0 THEN
4176: OKL_API.set_message(p_app_name => G_APP_NAME,
4177: p_msg_name => 'OKL_LLA_CHR_ID');
4178: RAISE OKL_API.G_EXCEPTION_ERROR;
4179: END IF;
4180: IF ln_old_top_line_cnt <> p_new_khr_top_line.COUNT THEN
4181: OKL_API.set_message(p_app_name => G_APP_NAME,
4182: p_msg_name => 'OKL_LLA_LINE_RECORD');

Line 4181: OKL_API.set_message(p_app_name => G_APP_NAME,

4177: p_msg_name => 'OKL_LLA_CHR_ID');
4178: RAISE OKL_API.G_EXCEPTION_ERROR;
4179: END IF;
4180: IF ln_old_top_line_cnt <> p_new_khr_top_line.COUNT THEN
4181: OKL_API.set_message(p_app_name => G_APP_NAME,
4182: p_msg_name => 'OKL_LLA_LINE_RECORD');
4183: RAISE OKL_API.G_EXCEPTION_ERROR;
4184: END IF;
4185: -- to get the old contract Header id

Line 4183: RAISE OKL_API.G_EXCEPTION_ERROR;

4179: END IF;
4180: IF ln_old_top_line_cnt <> p_new_khr_top_line.COUNT THEN
4181: OKL_API.set_message(p_app_name => G_APP_NAME,
4182: p_msg_name => 'OKL_LLA_LINE_RECORD');
4183: RAISE OKL_API.G_EXCEPTION_ERROR;
4184: END IF;
4185: -- to get the old contract Header id
4186: OPEN c_old_header_id(p_contract_number => p_old_contract_number);
4187: IF c_old_header_id%NOTFOUND THEN

Line 4188: OKL_API.set_message(p_app_name => G_APP_NAME,

4184: END IF;
4185: -- to get the old contract Header id
4186: OPEN c_old_header_id(p_contract_number => p_old_contract_number);
4187: IF c_old_header_id%NOTFOUND THEN
4188: OKL_API.set_message(p_app_name => G_APP_NAME,
4189: p_msg_name => 'OKL_LLA_CHR_ID');
4190: RAISE OKL_API.G_EXCEPTION_ERROR;
4191: END IF;
4192: FETCH c_old_header_id INTO ln_old_chr_id;

Line 4190: RAISE OKL_API.G_EXCEPTION_ERROR;

4186: OPEN c_old_header_id(p_contract_number => p_old_contract_number);
4187: IF c_old_header_id%NOTFOUND THEN
4188: OKL_API.set_message(p_app_name => G_APP_NAME,
4189: p_msg_name => 'OKL_LLA_CHR_ID');
4190: RAISE OKL_API.G_EXCEPTION_ERROR;
4191: END IF;
4192: FETCH c_old_header_id INTO ln_old_chr_id;
4193: CLOSE c_old_header_id;
4194: lt_ktl_tbl := p_new_khr_top_line;

Line 4203: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4199: -- Validate the top line for the Old Contract
4200: validate_chr_cle_id(p_dnz_chr_id => ln_old_chr_id,
4201: p_top_line_id => lt_ktl_tbl(i).kle_id,
4202: x_return_status => x_return_status);
4203: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4204: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4205: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4206: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4207: END IF;

Line 4204: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

4200: validate_chr_cle_id(p_dnz_chr_id => ln_old_chr_id,
4201: p_top_line_id => lt_ktl_tbl(i).kle_id,
4202: x_return_status => x_return_status);
4203: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4204: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4205: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4206: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4207: END IF;
4208: l_copy_contract_header(p_api_version => p_api_version,

Line 4205: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4201: p_top_line_id => lt_ktl_tbl(i).kle_id,
4202: x_return_status => x_return_status);
4203: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4204: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4205: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4206: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4207: END IF;
4208: l_copy_contract_header(p_api_version => p_api_version,
4209: p_init_msg_list => p_init_msg_list,

Line 4206: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4202: x_return_status => x_return_status);
4203: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4204: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4205: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4206: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4207: END IF;
4208: l_copy_contract_header(p_api_version => p_api_version,
4209: p_init_msg_list => p_init_msg_list,
4210: x_return_status => x_return_status,

Line 4216: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4212: x_msg_data => x_msg_data,
4213: p_old_chr_id => ln_old_chr_id,
4214: p_new_contract_number => lt_ktl_tbl(i).contract_number,
4215: x_new_header_id => lx_new_header_id);
4216: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4217: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4218: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4219: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4220: END IF;

Line 4217: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

4213: p_old_chr_id => ln_old_chr_id,
4214: p_new_contract_number => lt_ktl_tbl(i).contract_number,
4215: x_new_header_id => lx_new_header_id);
4216: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4217: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4218: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4219: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4220: END IF;
4221: -- To Change the orig_system_source_code to OKL_SPLIT

Line 4218: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4214: p_new_contract_number => lt_ktl_tbl(i).contract_number,
4215: x_new_header_id => lx_new_header_id);
4216: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4217: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4218: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4219: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4220: END IF;
4221: -- To Change the orig_system_source_code to OKL_SPLIT
4222: l_chrv_rec.id := lx_new_header_id;

Line 4219: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4215: x_new_header_id => lx_new_header_id);
4216: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4217: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4218: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4219: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4220: END IF;
4221: -- To Change the orig_system_source_code to OKL_SPLIT
4222: l_chrv_rec.id := lx_new_header_id;
4223: l_khrv_rec.id := lx_new_header_id;

Line 4233: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4229: p_chrv_rec => l_chrv_rec,
4230: p_khrv_rec => l_khrv_rec,
4231: x_chrv_rec => lx_chrv_rec,
4232: x_khrv_rec => lx_khrv_rec);
4233: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4234: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4235: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4236: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4237: END IF;

Line 4234: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

4230: p_khrv_rec => l_khrv_rec,
4231: x_chrv_rec => lx_chrv_rec,
4232: x_khrv_rec => lx_khrv_rec);
4233: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4234: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4235: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4236: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4237: END IF;
4238: l_copy_contract_line(p_api_version => p_api_version,

Line 4235: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4231: x_chrv_rec => lx_chrv_rec,
4232: x_khrv_rec => lx_khrv_rec);
4233: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4234: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4235: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4236: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4237: END IF;
4238: l_copy_contract_line(p_api_version => p_api_version,
4239: p_init_msg_list => p_init_msg_list,

Line 4236: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4232: x_khrv_rec => lx_khrv_rec);
4233: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4234: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4235: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4236: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4237: END IF;
4238: l_copy_contract_line(p_api_version => p_api_version,
4239: p_init_msg_list => p_init_msg_list,
4240: x_return_status => x_return_status,

Line 4246: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4242: x_msg_data => x_msg_data,
4243: p_old_k_top_line => lt_ktl_tbl(i).kle_id,
4244: p_new_header_id => lx_new_header_id,
4245: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4246: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4247: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4248: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4249: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4250: END IF;

Line 4247: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

4243: p_old_k_top_line => lt_ktl_tbl(i).kle_id,
4244: p_new_header_id => lx_new_header_id,
4245: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4246: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4247: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4248: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4249: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4250: END IF;
4251: -- To build the output information

Line 4248: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4244: p_new_header_id => lx_new_header_id,
4245: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4246: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4247: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4248: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4249: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4250: END IF;
4251: -- To build the output information
4252: OPEN get_new_contract_number(lx_new_header_id);

Line 4249: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4245: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4246: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4247: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4248: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4249: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4250: END IF;
4251: -- To build the output information
4252: OPEN get_new_contract_number(lx_new_header_id);
4253: IF get_new_contract_number%NOTFOUND THEN

Line 4254: OKL_API.set_message(p_app_name => G_APP_NAME,

4250: END IF;
4251: -- To build the output information
4252: OPEN get_new_contract_number(lx_new_header_id);
4253: IF get_new_contract_number%NOTFOUND THEN
4254: OKL_API.set_message(p_app_name => G_APP_NAME,
4255: p_msg_name => G_NO_MATCHING_RECORD,
4256: p_token1 => G_COL_NAME_TOKEN,
4257: p_token1_value => 'New contract header id');
4258: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 4258: x_return_status := OKL_API.G_RET_STS_ERROR;

4254: OKL_API.set_message(p_app_name => G_APP_NAME,
4255: p_msg_name => G_NO_MATCHING_RECORD,
4256: p_token1 => G_COL_NAME_TOKEN,
4257: p_token1_value => 'New contract header id');
4258: x_return_status := OKL_API.G_RET_STS_ERROR;
4259: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4260: END IF;
4261: FETCH get_new_contract_number INTO x_new_khr_top_line(i).contract_number;
4262: CLOSE get_new_contract_number;

Line 4259: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4255: p_msg_name => G_NO_MATCHING_RECORD,
4256: p_token1 => G_COL_NAME_TOKEN,
4257: p_token1_value => 'New contract header id');
4258: x_return_status := OKL_API.G_RET_STS_ERROR;
4259: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4260: END IF;
4261: FETCH get_new_contract_number INTO x_new_khr_top_line(i).contract_number;
4262: CLOSE get_new_contract_number;
4263: x_new_khr_top_line(i).line_number := lt_ktl_tbl(i).line_number;

Line 4269: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4265: -- Validate the top line for the Old Contract
4266: validate_chr_cle_id(p_dnz_chr_id => ln_old_chr_id,
4267: p_top_line_id => lt_ktl_tbl(i).kle_id,
4268: x_return_status => x_return_status);
4269: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4270: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4271: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4272: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4273: END IF;

Line 4270: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

4266: validate_chr_cle_id(p_dnz_chr_id => ln_old_chr_id,
4267: p_top_line_id => lt_ktl_tbl(i).kle_id,
4268: x_return_status => x_return_status);
4269: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4270: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4271: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4272: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4273: END IF;
4274: l_copy_contract_line(p_api_version => p_api_version,

Line 4271: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4267: p_top_line_id => lt_ktl_tbl(i).kle_id,
4268: x_return_status => x_return_status);
4269: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4270: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4271: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4272: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4273: END IF;
4274: l_copy_contract_line(p_api_version => p_api_version,
4275: p_init_msg_list => p_init_msg_list,

Line 4272: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4268: x_return_status => x_return_status);
4269: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4270: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4271: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4272: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4273: END IF;
4274: l_copy_contract_line(p_api_version => p_api_version,
4275: p_init_msg_list => p_init_msg_list,
4276: x_return_status => x_return_status,

Line 4282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4278: x_msg_data => x_msg_data,
4279: p_old_k_top_line => lt_ktl_tbl(i).kle_id,
4280: p_new_header_id => lx_new_header_id,
4281: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4283: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4285: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4286: END IF;

Line 4283: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

4279: p_old_k_top_line => lt_ktl_tbl(i).kle_id,
4280: p_new_header_id => lx_new_header_id,
4281: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4283: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4285: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4286: END IF;
4287: -- To build the output information

Line 4284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4280: p_new_header_id => lx_new_header_id,
4281: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4283: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4285: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4286: END IF;
4287: -- To build the output information
4288: OPEN get_new_contract_number(lx_new_header_id);

Line 4285: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4281: x_new_k_top_id => x_new_khr_top_line(i).kle_id);
4282: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4283: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
4284: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4285: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4286: END IF;
4287: -- To build the output information
4288: OPEN get_new_contract_number(lx_new_header_id);
4289: IF get_new_contract_number%NOTFOUND THEN

Line 4290: OKL_API.set_message(p_app_name => G_APP_NAME,

4286: END IF;
4287: -- To build the output information
4288: OPEN get_new_contract_number(lx_new_header_id);
4289: IF get_new_contract_number%NOTFOUND THEN
4290: OKL_API.set_message(p_app_name => G_APP_NAME,
4291: p_msg_name => G_NO_MATCHING_RECORD,
4292: p_token1 => G_COL_NAME_TOKEN,
4293: p_token1_value => 'New contract header id');
4294: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 4294: x_return_status := OKL_API.G_RET_STS_ERROR;

4290: OKL_API.set_message(p_app_name => G_APP_NAME,
4291: p_msg_name => G_NO_MATCHING_RECORD,
4292: p_token1 => G_COL_NAME_TOKEN,
4293: p_token1_value => 'New contract header id');
4294: x_return_status := OKL_API.G_RET_STS_ERROR;
4295: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4296: END IF;
4297: FETCH get_new_contract_number INTO x_new_khr_top_line(i).contract_number;
4298: CLOSE get_new_contract_number;

Line 4295: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4291: p_msg_name => G_NO_MATCHING_RECORD,
4292: p_token1 => G_COL_NAME_TOKEN,
4293: p_token1_value => 'New contract header id');
4294: x_return_status := OKL_API.G_RET_STS_ERROR;
4295: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4296: END IF;
4297: FETCH get_new_contract_number INTO x_new_khr_top_line(i).contract_number;
4298: CLOSE get_new_contract_number;
4299: x_new_khr_top_line(i).line_number := lt_ktl_tbl(i).line_number;

Line 4301: OKL_API.set_message(p_app_name => G_APP_NAME,

4297: FETCH get_new_contract_number INTO x_new_khr_top_line(i).contract_number;
4298: CLOSE get_new_contract_number;
4299: x_new_khr_top_line(i).line_number := lt_ktl_tbl(i).line_number;
4300: ELSE
4301: OKL_API.set_message(p_app_name => G_APP_NAME,
4302: p_msg_name => G_INVALID_CRITERIA,
4303: p_token1 => G_COL_NAME_TOKEN,
4304: p_token1_value => 'Line Number of KTL_TBL_TYPE');
4305: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 4305: x_return_status := OKL_API.G_RET_STS_ERROR;

4301: OKL_API.set_message(p_app_name => G_APP_NAME,
4302: p_msg_name => G_INVALID_CRITERIA,
4303: p_token1 => G_COL_NAME_TOKEN,
4304: p_token1_value => 'Line Number of KTL_TBL_TYPE');
4305: x_return_status := OKL_API.G_RET_STS_ERROR;
4306: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4307: END IF;
4308: l_pre_line := lt_ktl_tbl(i).line_number;
4309: EXIT WHEN (i = lt_ktl_tbl.LAST);

Line 4306: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4302: p_msg_name => G_INVALID_CRITERIA,
4303: p_token1 => G_COL_NAME_TOKEN,
4304: p_token1_value => 'Line Number of KTL_TBL_TYPE');
4305: x_return_status := OKL_API.G_RET_STS_ERROR;
4306: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4307: END IF;
4308: l_pre_line := lt_ktl_tbl(i).line_number;
4309: EXIT WHEN (i = lt_ktl_tbl.LAST);
4310: i := lt_ktl_tbl.NEXT(i);

Line 4312: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4308: l_pre_line := lt_ktl_tbl(i).line_number;
4309: EXIT WHEN (i = lt_ktl_tbl.LAST);
4310: i := lt_ktl_tbl.NEXT(i);
4311: END LOOP;
4312: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4314: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4315: RAISE OKL_API.G_EXCEPTION_ERROR;
4316: END IF;

Line 4313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4309: EXIT WHEN (i = lt_ktl_tbl.LAST);
4310: i := lt_ktl_tbl.NEXT(i);
4311: END LOOP;
4312: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4314: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4315: RAISE OKL_API.G_EXCEPTION_ERROR;
4316: END IF;
4317: END IF;

Line 4314: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4310: i := lt_ktl_tbl.NEXT(i);
4311: END LOOP;
4312: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4314: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4315: RAISE OKL_API.G_EXCEPTION_ERROR;
4316: END IF;
4317: END IF;
4318: OKL_API.END_ACTIVITY (x_msg_count,

Line 4315: RAISE OKL_API.G_EXCEPTION_ERROR;

4311: END LOOP;
4312: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4314: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4315: RAISE OKL_API.G_EXCEPTION_ERROR;
4316: END IF;
4317: END IF;
4318: OKL_API.END_ACTIVITY (x_msg_count,
4319: x_msg_data );

Line 4318: OKL_API.END_ACTIVITY (x_msg_count,

4314: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4315: RAISE OKL_API.G_EXCEPTION_ERROR;
4316: END IF;
4317: END IF;
4318: OKL_API.END_ACTIVITY (x_msg_count,
4319: x_msg_data );
4320: EXCEPTION
4321: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4322: IF c_old_header_id%ISOPEN THEN

Line 4321: WHEN OKL_API.G_EXCEPTION_ERROR THEN

4317: END IF;
4318: OKL_API.END_ACTIVITY (x_msg_count,
4319: x_msg_data );
4320: EXCEPTION
4321: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4322: IF c_old_header_id%ISOPEN THEN
4323: CLOSE c_old_header_id;
4324: END IF;
4325: IF get_new_contract_number%ISOPEN THEN

Line 4331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

4327: END IF;
4328: IF c_old_top_line_cnt%ISOPEN THEN
4329: CLOSE c_old_top_line_cnt;
4330: END IF;
4331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
4332: l_api_name,
4333: G_PKG_NAME,
4334: 'OKL_API.G_RET_STS_ERROR',
4335: x_msg_count,

Line 4334: 'OKL_API.G_RET_STS_ERROR',

4330: END IF;
4331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
4332: l_api_name,
4333: G_PKG_NAME,
4334: 'OKL_API.G_RET_STS_ERROR',
4335: x_msg_count,
4336: x_msg_data,
4337: '_PVT');
4338: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 4338: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

4334: 'OKL_API.G_RET_STS_ERROR',
4335: x_msg_count,
4336: x_msg_data,
4337: '_PVT');
4338: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4339: IF c_old_header_id%ISOPEN THEN
4340: CLOSE c_old_header_id;
4341: END IF;
4342: IF get_new_contract_number%ISOPEN THEN

Line 4348: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

4344: END IF;
4345: IF c_old_top_line_cnt%ISOPEN THEN
4346: CLOSE c_old_top_line_cnt;
4347: END IF;
4348: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
4349: l_api_name,
4350: G_PKG_NAME,
4351: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4352: x_msg_count,

Line 4351: 'OKL_API.G_RET_STS_UNEXP_ERROR',

4347: END IF;
4348: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
4349: l_api_name,
4350: G_PKG_NAME,
4351: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4352: x_msg_count,
4353: x_msg_data,
4354: '_PVT');
4355: WHEN OTHERS THEN

Line 4365: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

4361: END IF;
4362: IF c_old_top_line_cnt%ISOPEN THEN
4363: CLOSE c_old_top_line_cnt;
4364: END IF;
4365: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
4366: l_api_name,
4367: G_PKG_NAME,
4368: 'OTHERS',
4369: x_msg_count,

Line 4387: x_return_status := OKL_API.G_RET_STS_SUCCESS;

4383: p_user_id IN NUMBER,
4384: x_return_status OUT NOCOPY VARCHAR2) IS
4385: l_api_name CONSTANT VARCHAR2(30) := 'set_context';
4386: BEGIN
4387: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4388: -- Call start_activity to create savepoint, check compatibility
4389: -- and initialize message list
4390: x_return_status := OKL_API.START_ACTIVITY (
4391: l_api_name

Line 4390: x_return_status := OKL_API.START_ACTIVITY (

4386: BEGIN
4387: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4388: -- Call start_activity to create savepoint, check compatibility
4389: -- and initialize message list
4390: x_return_status := OKL_API.START_ACTIVITY (
4391: l_api_name
4392: ,p_init_msg_list
4393: ,'_PVT'
4394: ,x_return_status);

Line 4396: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4392: ,p_init_msg_list
4393: ,'_PVT'
4394: ,x_return_status);
4395: -- Check if activity started successfully
4396: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4397: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4399: RAISE OKL_API.G_EXCEPTION_ERROR;
4400: END IF;

Line 4397: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4393: ,'_PVT'
4394: ,x_return_status);
4395: -- Check if activity started successfully
4396: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4397: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4399: RAISE OKL_API.G_EXCEPTION_ERROR;
4400: END IF;
4401:

Line 4398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4394: ,x_return_status);
4395: -- Check if activity started successfully
4396: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4397: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4399: RAISE OKL_API.G_EXCEPTION_ERROR;
4400: END IF;
4401:
4402: IF (p_resp_id = OKL_API.G_MISS_NUM OR

Line 4399: RAISE OKL_API.G_EXCEPTION_ERROR;

4395: -- Check if activity started successfully
4396: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4397: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4399: RAISE OKL_API.G_EXCEPTION_ERROR;
4400: END IF;
4401:
4402: IF (p_resp_id = OKL_API.G_MISS_NUM OR
4403: p_resp_id IS NULL) THEN

Line 4402: IF (p_resp_id = OKL_API.G_MISS_NUM OR

4398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4399: RAISE OKL_API.G_EXCEPTION_ERROR;
4400: END IF;
4401:
4402: IF (p_resp_id = OKL_API.G_MISS_NUM OR
4403: p_resp_id IS NULL) THEN
4404: OKL_API.set_message(p_app_name => G_APP_NAME,
4405: p_msg_name => G_REQUIRED_VALUE,
4406: p_token1 => G_COL_NAME_TOKEN,

Line 4404: OKL_API.set_message(p_app_name => G_APP_NAME,

4400: END IF;
4401:
4402: IF (p_resp_id = OKL_API.G_MISS_NUM OR
4403: p_resp_id IS NULL) THEN
4404: OKL_API.set_message(p_app_name => G_APP_NAME,
4405: p_msg_name => G_REQUIRED_VALUE,
4406: p_token1 => G_COL_NAME_TOKEN,
4407: p_token1_value => 'p_resp_id');
4408: RAISE G_EXCEPTION_STOP_VALIDATION;

Line 4410: IF (p_appl_id = OKL_API.G_MISS_NUM OR

4406: p_token1 => G_COL_NAME_TOKEN,
4407: p_token1_value => 'p_resp_id');
4408: RAISE G_EXCEPTION_STOP_VALIDATION;
4409: END IF;
4410: IF (p_appl_id = OKL_API.G_MISS_NUM OR
4411: p_appl_id IS NULL) THEN
4412: OKL_API.set_message(p_app_name => G_APP_NAME,
4413: p_msg_name => G_REQUIRED_VALUE,
4414: p_token1 => G_COL_NAME_TOKEN,

Line 4412: OKL_API.set_message(p_app_name => G_APP_NAME,

4408: RAISE G_EXCEPTION_STOP_VALIDATION;
4409: END IF;
4410: IF (p_appl_id = OKL_API.G_MISS_NUM OR
4411: p_appl_id IS NULL) THEN
4412: OKL_API.set_message(p_app_name => G_APP_NAME,
4413: p_msg_name => G_REQUIRED_VALUE,
4414: p_token1 => G_COL_NAME_TOKEN,
4415: p_token1_value => 'p_appl_id');
4416: RAISE G_EXCEPTION_STOP_VALIDATION;

Line 4418: IF (p_user_id = OKL_API.G_MISS_NUM OR

4414: p_token1 => G_COL_NAME_TOKEN,
4415: p_token1_value => 'p_appl_id');
4416: RAISE G_EXCEPTION_STOP_VALIDATION;
4417: END IF;
4418: IF (p_user_id = OKL_API.G_MISS_NUM OR
4419: p_user_id IS NULL) THEN
4420: OKL_API.set_message(p_app_name => G_APP_NAME,
4421: p_msg_name => G_REQUIRED_VALUE,
4422: p_token1 => G_COL_NAME_TOKEN,

Line 4420: OKL_API.set_message(p_app_name => G_APP_NAME,

4416: RAISE G_EXCEPTION_STOP_VALIDATION;
4417: END IF;
4418: IF (p_user_id = OKL_API.G_MISS_NUM OR
4419: p_user_id IS NULL) THEN
4420: OKL_API.set_message(p_app_name => G_APP_NAME,
4421: p_msg_name => G_REQUIRED_VALUE,
4422: p_token1 => G_COL_NAME_TOKEN,
4423: p_token1_value => 'p_user_id');
4424: RAISE G_EXCEPTION_STOP_VALIDATION;

Line 4432: OKL_API.END_ACTIVITY (x_msg_count,

4428: FND_GLOBAL.apps_initialize(user_id => p_user_id,
4429: resp_id => p_resp_id,
4430: resp_appl_id => p_appl_id);
4431:
4432: OKL_API.END_ACTIVITY (x_msg_count,
4433: x_msg_data );
4434: EXCEPTION
4435: WHEN G_EXCEPTION_STOP_VALIDATION THEN
4436: -- We are here since the field is required

Line 4438: x_return_status := OKL_API.G_RET_STS_ERROR;

4434: EXCEPTION
4435: WHEN G_EXCEPTION_STOP_VALIDATION THEN
4436: -- We are here since the field is required
4437: -- Notify Error
4438: x_return_status := OKL_API.G_RET_STS_ERROR;
4439: WHEN OTHERS THEN
4440: -- store SQL error message on message stack
4441: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
4442: p_msg_name => G_UNEXPECTED_ERROR,

Line 4441: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

4437: -- Notify Error
4438: x_return_status := OKL_API.G_RET_STS_ERROR;
4439: WHEN OTHERS THEN
4440: -- store SQL error message on message stack
4441: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
4442: p_msg_name => G_UNEXPECTED_ERROR,
4443: p_token1 => G_SQLCODE_TOKEN,
4444: p_token1_value => SQLCODE,
4445: p_token2 => G_SQLERRM_TOKEN,

Line 4447: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

4443: p_token1 => G_SQLCODE_TOKEN,
4444: p_token1_value => SQLCODE,
4445: p_token2 => G_SQLERRM_TOKEN,
4446: p_token2_value => SQLERRM);
4447: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4448: END set_context;
4449: -----------------------------------------------------------------------------------------------
4450: ------------------------- Main Process for post split of Contract -----------------------------
4451: -----------------------------------------------------------------------------------------------

Line 4610: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

4606: END LOOP;
4607:
4608: EXCEPTION
4609: WHEN OTHERS THEN
4610: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4611: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4612: END raise_business_event;
4613:
4614:

Line 4611: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4607:
4608: EXCEPTION
4609: WHEN OTHERS THEN
4610: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
4611: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4612: END raise_business_event;
4613:
4614:
4615: /*

Line 4622: x_return_status := OKL_API.G_RET_STS_SUCCESS;

4618: */
4619:
4620:
4621: BEGIN
4622: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4623: -- Call start_activity to create savepoint, check compatibility
4624: -- and initialize message list
4625: x_return_status := OKL_API.START_ACTIVITY (
4626: l_api_name

Line 4625: x_return_status := OKL_API.START_ACTIVITY (

4621: BEGIN
4622: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4623: -- Call start_activity to create savepoint, check compatibility
4624: -- and initialize message list
4625: x_return_status := OKL_API.START_ACTIVITY (
4626: l_api_name
4627: ,p_init_msg_list
4628: ,'_PVT'
4629: ,x_return_status);

Line 4631: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4627: ,p_init_msg_list
4628: ,'_PVT'
4629: ,x_return_status);
4630: -- Check if activity started successfully
4631: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4632: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4633: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4634: RAISE OKL_API.G_EXCEPTION_ERROR;
4635: END IF;

Line 4632: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4628: ,'_PVT'
4629: ,x_return_status);
4630: -- Check if activity started successfully
4631: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4632: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4633: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4634: RAISE OKL_API.G_EXCEPTION_ERROR;
4635: END IF;
4636:

Line 4633: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4629: ,x_return_status);
4630: -- Check if activity started successfully
4631: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4632: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4633: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4634: RAISE OKL_API.G_EXCEPTION_ERROR;
4635: END IF;
4636:
4637: -- Get the output file directory to put log of Split Contract.

Line 4634: RAISE OKL_API.G_EXCEPTION_ERROR;

4630: -- Check if activity started successfully
4631: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4632: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4633: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4634: RAISE OKL_API.G_EXCEPTION_ERROR;
4635: END IF;
4636:
4637: -- Get the output file directory to put log of Split Contract.
4638: /*IF (FND_PROFILE.VALUE('OKL_SPLIT_CONTRACT_DEBUG') = 'Y') THEN

Line 4694: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4690: IF (G_DEBUG_SPLIT) THEN
4691: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'First Split Contract Validation Completed with ' || x_return_status);
4692: END IF;
4693:
4694: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4695: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4696: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4697: RAISE OKL_API.G_EXCEPTION_ERROR;
4698: END IF;

Line 4695: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4691: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'First Split Contract Validation Completed with ' || x_return_status);
4692: END IF;
4693:
4694: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4695: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4696: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4697: RAISE OKL_API.G_EXCEPTION_ERROR;
4698: END IF;
4699: -- Validate the Chr_id

Line 4696: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4692: END IF;
4693:
4694: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4695: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4696: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4697: RAISE OKL_API.G_EXCEPTION_ERROR;
4698: END IF;
4699: -- Validate the Chr_id
4700: validate_chr_id(p_chr_id => p_new2_contract_id,

Line 4697: RAISE OKL_API.G_EXCEPTION_ERROR;

4693:
4694: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4695: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4696: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4697: RAISE OKL_API.G_EXCEPTION_ERROR;
4698: END IF;
4699: -- Validate the Chr_id
4700: validate_chr_id(p_chr_id => p_new2_contract_id,
4701: x_contract_number => lv2_contract_number,

Line 4708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4704: IF (G_DEBUG_SPLIT) THEN
4705: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Second Split Contract Validation Completed with ' || x_return_status);
4706: END IF;
4707:
4708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4709: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4711: RAISE OKL_API.G_EXCEPTION_ERROR;
4712: END IF;

Line 4709: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4705: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Second Split Contract Validation Completed with ' || x_return_status);
4706: END IF;
4707:
4708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4709: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4711: RAISE OKL_API.G_EXCEPTION_ERROR;
4712: END IF;
4713:

Line 4710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4706: END IF;
4707:
4708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4709: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4711: RAISE OKL_API.G_EXCEPTION_ERROR;
4712: END IF;
4713:
4714: -- Process first split contract for fees and service lines having linked

Line 4711: RAISE OKL_API.G_EXCEPTION_ERROR;

4707:
4708: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4709: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4710: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4711: RAISE OKL_API.G_EXCEPTION_ERROR;
4712: END IF;
4713:
4714: -- Process first split contract for fees and service lines having linked
4715: -- assets

Line 4731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4727: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
4728: END IF;
4729: END IF;
4730:
4731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4732: OKL_API.set_message(p_app_name => G_APP_NAME,
4733: p_msg_name => G_ERROR_NAL_SPK);
4734: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4735: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 4732: OKL_API.set_message(p_app_name => G_APP_NAME,

4728: END IF;
4729: END IF;
4730:
4731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4732: OKL_API.set_message(p_app_name => G_APP_NAME,
4733: p_msg_name => G_ERROR_NAL_SPK);
4734: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4735: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4736: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 4734: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4730:
4731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4732: OKL_API.set_message(p_app_name => G_APP_NAME,
4733: p_msg_name => G_ERROR_NAL_SPK);
4734: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4735: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4736: OKL_API.set_message(p_app_name => G_APP_NAME,
4737: p_msg_name => G_ERROR_NAL_SPK);
4738: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 4735: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4731: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4732: OKL_API.set_message(p_app_name => G_APP_NAME,
4733: p_msg_name => G_ERROR_NAL_SPK);
4734: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4735: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4736: OKL_API.set_message(p_app_name => G_APP_NAME,
4737: p_msg_name => G_ERROR_NAL_SPK);
4738: RAISE OKL_API.G_EXCEPTION_ERROR;
4739: END IF;

Line 4736: OKL_API.set_message(p_app_name => G_APP_NAME,

4732: OKL_API.set_message(p_app_name => G_APP_NAME,
4733: p_msg_name => G_ERROR_NAL_SPK);
4734: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4735: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4736: OKL_API.set_message(p_app_name => G_APP_NAME,
4737: p_msg_name => G_ERROR_NAL_SPK);
4738: RAISE OKL_API.G_EXCEPTION_ERROR;
4739: END IF;
4740:

Line 4738: RAISE OKL_API.G_EXCEPTION_ERROR;

4734: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4735: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4736: OKL_API.set_message(p_app_name => G_APP_NAME,
4737: p_msg_name => G_ERROR_NAL_SPK);
4738: RAISE OKL_API.G_EXCEPTION_ERROR;
4739: END IF;
4740:
4741: -- Delete all the service and fee lines of second split contract not having
4742: -- linked asset(s) attached to them.

Line 4757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4753: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
4754: END IF;
4755: END IF;
4756:
4757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4758: OKL_API.set_message(p_app_name => G_APP_NAME,
4759: p_msg_name => G_ERROR_NAL_SPK);
4760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4761: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 4758: OKL_API.set_message(p_app_name => G_APP_NAME,

4754: END IF;
4755: END IF;
4756:
4757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4758: OKL_API.set_message(p_app_name => G_APP_NAME,
4759: p_msg_name => G_ERROR_NAL_SPK);
4760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4761: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4762: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 4760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4756:
4757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4758: OKL_API.set_message(p_app_name => G_APP_NAME,
4759: p_msg_name => G_ERROR_NAL_SPK);
4760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4761: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4762: OKL_API.set_message(p_app_name => G_APP_NAME,
4763: p_msg_name => G_ERROR_NAL_SPK);
4764: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 4761: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4757: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4758: OKL_API.set_message(p_app_name => G_APP_NAME,
4759: p_msg_name => G_ERROR_NAL_SPK);
4760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4761: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4762: OKL_API.set_message(p_app_name => G_APP_NAME,
4763: p_msg_name => G_ERROR_NAL_SPK);
4764: RAISE OKL_API.G_EXCEPTION_ERROR;
4765: END IF;

Line 4762: OKL_API.set_message(p_app_name => G_APP_NAME,

4758: OKL_API.set_message(p_app_name => G_APP_NAME,
4759: p_msg_name => G_ERROR_NAL_SPK);
4760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4761: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4762: OKL_API.set_message(p_app_name => G_APP_NAME,
4763: p_msg_name => G_ERROR_NAL_SPK);
4764: RAISE OKL_API.G_EXCEPTION_ERROR;
4765: END IF;
4766:

Line 4764: RAISE OKL_API.G_EXCEPTION_ERROR;

4760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4761: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4762: OKL_API.set_message(p_app_name => G_APP_NAME,
4763: p_msg_name => G_ERROR_NAL_SPK);
4764: RAISE OKL_API.G_EXCEPTION_ERROR;
4765: END IF;
4766:
4767: -- Process second split contract for fees and service lines having linked
4768: -- assets

Line 4784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4780: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
4781: END IF;
4782: END IF;
4783:
4784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4785: OKL_API.set_message(p_app_name => G_APP_NAME,
4786: p_msg_name => G_ERROR_NAL_SPK);
4787: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 4785: OKL_API.set_message(p_app_name => G_APP_NAME,

4781: END IF;
4782: END IF;
4783:
4784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4785: OKL_API.set_message(p_app_name => G_APP_NAME,
4786: p_msg_name => G_ERROR_NAL_SPK);
4787: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4789: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 4787: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4783:
4784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4785: OKL_API.set_message(p_app_name => G_APP_NAME,
4786: p_msg_name => G_ERROR_NAL_SPK);
4787: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4789: OKL_API.set_message(p_app_name => G_APP_NAME,
4790: p_msg_name => G_ERROR_NAL_SPK);
4791: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 4788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4784: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4785: OKL_API.set_message(p_app_name => G_APP_NAME,
4786: p_msg_name => G_ERROR_NAL_SPK);
4787: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4789: OKL_API.set_message(p_app_name => G_APP_NAME,
4790: p_msg_name => G_ERROR_NAL_SPK);
4791: RAISE OKL_API.G_EXCEPTION_ERROR;
4792: END IF;

Line 4789: OKL_API.set_message(p_app_name => G_APP_NAME,

4785: OKL_API.set_message(p_app_name => G_APP_NAME,
4786: p_msg_name => G_ERROR_NAL_SPK);
4787: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4789: OKL_API.set_message(p_app_name => G_APP_NAME,
4790: p_msg_name => G_ERROR_NAL_SPK);
4791: RAISE OKL_API.G_EXCEPTION_ERROR;
4792: END IF;
4793: -- To run the QA checker we need to get the QCL_ID for the first contract

Line 4791: RAISE OKL_API.G_EXCEPTION_ERROR;

4787: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4788: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4789: OKL_API.set_message(p_app_name => G_APP_NAME,
4790: p_msg_name => G_ERROR_NAL_SPK);
4791: RAISE OKL_API.G_EXCEPTION_ERROR;
4792: END IF;
4793: -- To run the QA checker we need to get the QCL_ID for the first contract
4794: -- since we assume for now the split contract will be split into Two contracts
4795: -- only.If the source contract do not have QCL_ID(which is never the case)

Line 4806: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4802: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'get_qcl_id procedure completed with '
4803: || x_return_status || ' for first Split contract');
4804: END IF;
4805:
4806: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4807: OKL_API.set_message(p_app_name => G_APP_NAME,
4808: p_msg_name => G_NO_MATCHING_RECORD,
4809: p_token1 => G_COL_NAME_TOKEN,
4810: p_token1_value => 'qcl_id');

Line 4807: OKL_API.set_message(p_app_name => G_APP_NAME,

4803: || x_return_status || ' for first Split contract');
4804: END IF;
4805:
4806: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4807: OKL_API.set_message(p_app_name => G_APP_NAME,
4808: p_msg_name => G_NO_MATCHING_RECORD,
4809: p_token1 => G_COL_NAME_TOKEN,
4810: p_token1_value => 'qcl_id');
4811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 4811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4807: OKL_API.set_message(p_app_name => G_APP_NAME,
4808: p_msg_name => G_NO_MATCHING_RECORD,
4809: p_token1 => G_COL_NAME_TOKEN,
4810: p_token1_value => 'qcl_id');
4811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4813: OKL_API.set_message(p_app_name => G_APP_NAME,
4814: p_msg_name => G_NO_MATCHING_RECORD,
4815: p_token1 => G_COL_NAME_TOKEN,

Line 4812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4808: p_msg_name => G_NO_MATCHING_RECORD,
4809: p_token1 => G_COL_NAME_TOKEN,
4810: p_token1_value => 'qcl_id');
4811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4813: OKL_API.set_message(p_app_name => G_APP_NAME,
4814: p_msg_name => G_NO_MATCHING_RECORD,
4815: p_token1 => G_COL_NAME_TOKEN,
4816: p_token1_value => 'qcl_id');

Line 4813: OKL_API.set_message(p_app_name => G_APP_NAME,

4809: p_token1 => G_COL_NAME_TOKEN,
4810: p_token1_value => 'qcl_id');
4811: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4812: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4813: OKL_API.set_message(p_app_name => G_APP_NAME,
4814: p_msg_name => G_NO_MATCHING_RECORD,
4815: p_token1 => G_COL_NAME_TOKEN,
4816: p_token1_value => 'qcl_id');
4817: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 4817: RAISE OKL_API.G_EXCEPTION_ERROR;

4813: OKL_API.set_message(p_app_name => G_APP_NAME,
4814: p_msg_name => G_NO_MATCHING_RECORD,
4815: p_token1 => G_COL_NAME_TOKEN,
4816: p_token1_value => 'qcl_id');
4817: RAISE OKL_API.G_EXCEPTION_ERROR;
4818: END IF;
4819: -- To run the QA checker we need to get the QCL_ID for the first Second
4820: -- since we assume for now the split contract will be split into Two contracts
4821: -- only.If the source contract do not have QCL_ID(which is never the case)

Line 4832: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4828: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'get_qcl_id procedure completed with '
4829: || x_return_status || ' for second Split contract');
4830: END IF;
4831:
4832: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4833: OKL_API.set_message(p_app_name => G_APP_NAME,
4834: p_msg_name => G_NO_MATCHING_RECORD,
4835: p_token1 => G_COL_NAME_TOKEN,
4836: p_token1_value => 'qcl_id');

Line 4833: OKL_API.set_message(p_app_name => G_APP_NAME,

4829: || x_return_status || ' for second Split contract');
4830: END IF;
4831:
4832: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4833: OKL_API.set_message(p_app_name => G_APP_NAME,
4834: p_msg_name => G_NO_MATCHING_RECORD,
4835: p_token1 => G_COL_NAME_TOKEN,
4836: p_token1_value => 'qcl_id');
4837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 4837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4833: OKL_API.set_message(p_app_name => G_APP_NAME,
4834: p_msg_name => G_NO_MATCHING_RECORD,
4835: p_token1 => G_COL_NAME_TOKEN,
4836: p_token1_value => 'qcl_id');
4837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4839: OKL_API.set_message(p_app_name => G_APP_NAME,
4840: p_msg_name => G_NO_MATCHING_RECORD,
4841: p_token1 => G_COL_NAME_TOKEN,

Line 4838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4834: p_msg_name => G_NO_MATCHING_RECORD,
4835: p_token1 => G_COL_NAME_TOKEN,
4836: p_token1_value => 'qcl_id');
4837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4839: OKL_API.set_message(p_app_name => G_APP_NAME,
4840: p_msg_name => G_NO_MATCHING_RECORD,
4841: p_token1 => G_COL_NAME_TOKEN,
4842: p_token1_value => 'qcl_id');

Line 4839: OKL_API.set_message(p_app_name => G_APP_NAME,

4835: p_token1 => G_COL_NAME_TOKEN,
4836: p_token1_value => 'qcl_id');
4837: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4838: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4839: OKL_API.set_message(p_app_name => G_APP_NAME,
4840: p_msg_name => G_NO_MATCHING_RECORD,
4841: p_token1 => G_COL_NAME_TOKEN,
4842: p_token1_value => 'qcl_id');
4843: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 4843: RAISE OKL_API.G_EXCEPTION_ERROR;

4839: OKL_API.set_message(p_app_name => G_APP_NAME,
4840: p_msg_name => G_NO_MATCHING_RECORD,
4841: p_token1 => G_COL_NAME_TOKEN,
4842: p_token1_value => 'qcl_id');
4843: RAISE OKL_API.G_EXCEPTION_ERROR;
4844: END IF;
4845: -- Now we run the QA checker for the First Contract
4846: okl_contract_book_pub.execute_qa_check_list(p_api_version => p_api_version,
4847: p_init_msg_list => p_init_msg_list,

Line 4863: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4859: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
4860: END IF;
4861: END IF;
4862:
4863: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4865: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4866: RAISE OKL_API.G_EXCEPTION_ERROR;
4867: END IF;

Line 4864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4860: END IF;
4861: END IF;
4862:
4863: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4865: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4866: RAISE OKL_API.G_EXCEPTION_ERROR;
4867: END IF;
4868: -- We need the handle the error so we run thru the message table to check if there

Line 4865: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4861: END IF;
4862:
4863: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4865: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4866: RAISE OKL_API.G_EXCEPTION_ERROR;
4867: END IF;
4868: -- We need the handle the error so we run thru the message table to check if there
4869: -- is error severity out there.

Line 4866: RAISE OKL_API.G_EXCEPTION_ERROR;

4862:
4863: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4864: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4865: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4866: RAISE OKL_API.G_EXCEPTION_ERROR;
4867: END IF;
4868: -- We need the handle the error so we run thru the message table to check if there
4869: -- is error severity out there.
4870: IF (lt1_msg_tbl.COUNT > 0) THEN

Line 4875: OKL_API.set_message(p_app_name => G_APP_NAME,

4871: i := lt1_msg_tbl.FIRST;
4872: LOOP
4873: lv_severity := lt1_msg_tbl(i).error_status;
4874: IF lv_severity = 'E' THEN
4875: OKL_API.set_message(p_app_name => G_APP_NAME,
4876: p_msg_name => G_ERROR_QA_CHECK);
4877: x_return_status := OKL_API.G_RET_STS_ERROR;
4878:
4879: IF (G_DEBUG_SPLIT) THEN

Line 4877: x_return_status := OKL_API.G_RET_STS_ERROR;

4873: lv_severity := lt1_msg_tbl(i).error_status;
4874: IF lv_severity = 'E' THEN
4875: OKL_API.set_message(p_app_name => G_APP_NAME,
4876: p_msg_name => G_ERROR_QA_CHECK);
4877: x_return_status := OKL_API.G_RET_STS_ERROR;
4878:
4879: IF (G_DEBUG_SPLIT) THEN
4880: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Severity in QA processing
4881: for first Split contract ' || x_return_status);

Line 4891: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

4887: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error data : Error Severity -> ' || lt1_msg_tbl(i).severity);
4888: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error data : Data -> ' || lt1_msg_tbl(i).data);
4889: END IF;
4890:
4891: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
4892: END IF;
4893: EXIT WHEN (i = lt1_msg_tbl.LAST);
4894: i := lt1_msg_tbl.NEXT(i);
4895: END LOOP;

Line 4898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4894: i := lt1_msg_tbl.NEXT(i);
4895: END LOOP;
4896: END IF;
4897:
4898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4899: -- halt validation as it has no parent record
4900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4901: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4902: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 4900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4896: END IF;
4897:
4898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4899: -- halt validation as it has no parent record
4900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4901: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4902: RAISE OKL_API.G_EXCEPTION_ERROR;
4903: END IF;
4904:

Line 4901: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4897:
4898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4899: -- halt validation as it has no parent record
4900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4901: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4902: RAISE OKL_API.G_EXCEPTION_ERROR;
4903: END IF;
4904:
4905: -- Now we are submitting the the first contract for stream Generation.

Line 4902: RAISE OKL_API.G_EXCEPTION_ERROR;

4898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4899: -- halt validation as it has no parent record
4900: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4901: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4902: RAISE OKL_API.G_EXCEPTION_ERROR;
4903: END IF;
4904:
4905: -- Now we are submitting the the first contract for stream Generation.
4906: OKL_LA_STREAM_PUB.GEN_INTR_EXTR_STREAM(p_api_version => p_api_version,

Line 4925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4921: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
4922: END IF;
4923: END IF;
4924:
4925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4928: RAISE OKL_API.G_EXCEPTION_ERROR;
4929: END IF;

Line 4926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4922: END IF;
4923: END IF;
4924:
4925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4928: RAISE OKL_API.G_EXCEPTION_ERROR;
4929: END IF;
4930: -- We need to commit this transaction also since we have to get the

Line 4927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4923: END IF;
4924:
4925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4928: RAISE OKL_API.G_EXCEPTION_ERROR;
4929: END IF;
4930: -- We need to commit this transaction also since we have to get the
4931: -- Stream generation Kicked off

Line 4928: RAISE OKL_API.G_EXCEPTION_ERROR;

4924:
4925: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4926: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4927: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4928: RAISE OKL_API.G_EXCEPTION_ERROR;
4929: END IF;
4930: -- We need to commit this transaction also since we have to get the
4931: -- Stream generation Kicked off
4932: --l_stream_path := okl_streams_util.get_pricing_engine (p_khr_id => p_new1_contract_id);

Line 4938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

4934: (p_khr_id => p_new1_contract_id,
4935: x_pricing_engine => l_stream_path,
4936: x_return_status => x_return_status
4937: );
4938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4941: RAISE OKL_API.G_EXCEPTION_ERROR;
4942: END IF;

Line 4939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4935: x_pricing_engine => l_stream_path,
4936: x_return_status => x_return_status
4937: );
4938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4941: RAISE OKL_API.G_EXCEPTION_ERROR;
4942: END IF;
4943:

Line 4940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

4936: x_return_status => x_return_status
4937: );
4938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4941: RAISE OKL_API.G_EXCEPTION_ERROR;
4942: END IF;
4943:
4944: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN

Line 4941: RAISE OKL_API.G_EXCEPTION_ERROR;

4937: );
4938: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4939: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4941: RAISE OKL_API.G_EXCEPTION_ERROR;
4942: END IF;
4943:
4944: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN
4945: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN

Line 4944: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN

4940: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4941: RAISE OKL_API.G_EXCEPTION_ERROR;
4942: END IF;
4943:
4944: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN
4945: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN
4946: COMMIT;
4947: END IF;
4948:

Line 4945: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN

4941: RAISE OKL_API.G_EXCEPTION_ERROR;
4942: END IF;
4943:
4944: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN
4945: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN
4946: COMMIT;
4947: END IF;
4948:
4949: -- Need to make sure that the stream generation process has actually completed successfully

Line 4964: OKL_API.set_message(p_app_name => G_APP_NAME,

4960: OPEN c_ok_stream_loop(p_khr_id => p_new1_contract_id,
4961: p_stream_id => r_ok_stream.id);
4962: FETCH c_ok_stream_loop INTO lv1_sis_code, lv1_sts_code;
4963: IF c_ok_stream_loop%NOTFOUND THEN
4964: OKL_API.set_message(p_app_name => G_APP_NAME,
4965: p_msg_name => G_NO_MATCHING_RECORD,
4966: p_token1 => G_COL_NAME_TOKEN,
4967: p_token1_value => 'OKL_STREAM_INTERFACES.SIS_CODE');
4968: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 4968: x_return_status := OKL_API.G_RET_STS_ERROR;

4964: OKL_API.set_message(p_app_name => G_APP_NAME,
4965: p_msg_name => G_NO_MATCHING_RECORD,
4966: p_token1 => G_COL_NAME_TOKEN,
4967: p_token1_value => 'OKL_STREAM_INTERFACES.SIS_CODE');
4968: x_return_status := OKL_API.G_RET_STS_ERROR;
4969:
4970: IF (G_DEBUG_SPLIT) THEN
4971: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation information missing
4972: for first Split contract ' || x_return_status);

Line 4975: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);

4971: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation information missing
4972: for first Split contract ' || x_return_status);
4973: END IF;
4974:
4975: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
4976: END IF;
4977: CLOSE c_ok_stream_loop;
4978:
4979: IF lv1_sis_code = 'PROCESS_COMPLETE' AND

Line 4981: x_return_status := OKL_API.G_RET_STS_SUCCESS;

4977: CLOSE c_ok_stream_loop;
4978:
4979: IF lv1_sis_code = 'PROCESS_COMPLETE' AND
4980: lv1_sts_code = 'COMPLETE' THEN
4981: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4982: EXIT WHEN(lv1_sis_code = 'PROCESS_COMPLETE');
4983: ELSIF lv1_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
4984: OKL_API.set_message(p_app_name => G_APP_NAME,
4985: p_msg_name => G_ERROR_STR_GEN);

Line 4984: OKL_API.set_message(p_app_name => G_APP_NAME,

4980: lv1_sts_code = 'COMPLETE' THEN
4981: x_return_status := OKL_API.G_RET_STS_SUCCESS;
4982: EXIT WHEN(lv1_sis_code = 'PROCESS_COMPLETE');
4983: ELSIF lv1_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
4984: OKL_API.set_message(p_app_name => G_APP_NAME,
4985: p_msg_name => G_ERROR_STR_GEN);
4986: x_return_status := OKL_API.G_RET_STS_ERROR;
4987: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
4988: END IF;

Line 4986: x_return_status := OKL_API.G_RET_STS_ERROR;

4982: EXIT WHEN(lv1_sis_code = 'PROCESS_COMPLETE');
4983: ELSIF lv1_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
4984: OKL_API.set_message(p_app_name => G_APP_NAME,
4985: p_msg_name => G_ERROR_STR_GEN);
4986: x_return_status := OKL_API.G_RET_STS_ERROR;
4987: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
4988: END IF;
4989: -- need below because of performance issue
4990: dbms_lock.sleep(5);

Line 4987: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);

4983: ELSIF lv1_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
4984: OKL_API.set_message(p_app_name => G_APP_NAME,
4985: p_msg_name => G_ERROR_STR_GEN);
4986: x_return_status := OKL_API.G_RET_STS_ERROR;
4987: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
4988: END IF;
4989: -- need below because of performance issue
4990: dbms_lock.sleep(5);
4991: END LOOP;

Line 4993: IF x_return_status = OKL_API.G_RET_STS_ERROR THEN

4989: -- need below because of performance issue
4990: dbms_lock.sleep(5);
4991: END LOOP;
4992:
4993: IF x_return_status = OKL_API.G_RET_STS_ERROR THEN
4994:
4995: IF (G_DEBUG_SPLIT) THEN
4996: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation completion status
4997: for first Split contract :' || x_return_status);

Line 5000: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);

4996: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation completion status
4997: for first Split contract :' || x_return_status);
4998: END IF;
4999:
5000: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
5001: END IF;
5002: END LOOP;
5003: END IF;
5004:

Line 5006: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5002: END LOOP;
5003: END IF;
5004:
5005:
5006: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5007: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5008: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5009: RAISE OKL_API.G_EXCEPTION_ERROR;
5010: END IF;

Line 5007: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5003: END IF;
5004:
5005:
5006: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5007: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5008: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5009: RAISE OKL_API.G_EXCEPTION_ERROR;
5010: END IF;
5011:

Line 5008: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5004:
5005:
5006: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5007: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5008: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5009: RAISE OKL_API.G_EXCEPTION_ERROR;
5010: END IF;
5011:
5012: OPEN c_get_sts_code(p_khr_id => p_new1_contract_id);

Line 5009: RAISE OKL_API.G_EXCEPTION_ERROR;

5005:
5006: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5007: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5008: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5009: RAISE OKL_API.G_EXCEPTION_ERROR;
5010: END IF;
5011:
5012: OPEN c_get_sts_code(p_khr_id => p_new1_contract_id);
5013: FETCH c_get_sts_code INTO lv1_sts_code;

Line 5015: OKL_API.set_message(p_app_name => G_APP_NAME,

5011:
5012: OPEN c_get_sts_code(p_khr_id => p_new1_contract_id);
5013: FETCH c_get_sts_code INTO lv1_sts_code;
5014: IF c_get_sts_code%NOTFOUND THEN
5015: OKL_API.set_message(p_app_name => G_APP_NAME,
5016: p_msg_name => G_NO_MATCHING_RECORD,
5017: p_token1 => G_COL_NAME_TOKEN,
5018: p_token1_value => 'OKC_K_HEADERS_B.STS_CODE');
5019: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 5019: x_return_status := OKL_API.G_RET_STS_ERROR;

5015: OKL_API.set_message(p_app_name => G_APP_NAME,
5016: p_msg_name => G_NO_MATCHING_RECORD,
5017: p_token1 => G_COL_NAME_TOKEN,
5018: p_token1_value => 'OKC_K_HEADERS_B.STS_CODE');
5019: x_return_status := OKL_API.G_RET_STS_ERROR;
5020: END IF;
5021: CLOSE c_get_sts_code;
5022:
5023: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Post Stream generation Contract status for first

Line 5027: OKL_API.set_message(p_app_name => G_APP_NAME,

5023: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Post Stream generation Contract status for first
5024: Split contract : ' || lv1_sts_code);
5025:
5026: IF lv1_sts_code <> 'COMPLETE' THEN
5027: OKL_API.set_message(p_app_name => G_APP_NAME,
5028: p_msg_name => G_ERROR_STR_GEN);
5029: x_return_status := OKL_API.G_RET_STS_ERROR;
5030: END IF;
5031: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 5029: x_return_status := OKL_API.G_RET_STS_ERROR;

5025:
5026: IF lv1_sts_code <> 'COMPLETE' THEN
5027: OKL_API.set_message(p_app_name => G_APP_NAME,
5028: p_msg_name => G_ERROR_STR_GEN);
5029: x_return_status := OKL_API.G_RET_STS_ERROR;
5030: END IF;
5031: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5032: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5033: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 5031: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5027: OKL_API.set_message(p_app_name => G_APP_NAME,
5028: p_msg_name => G_ERROR_STR_GEN);
5029: x_return_status := OKL_API.G_RET_STS_ERROR;
5030: END IF;
5031: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5032: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5033: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5034: RAISE OKL_API.G_EXCEPTION_ERROR;
5035: END IF;

Line 5032: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5028: p_msg_name => G_ERROR_STR_GEN);
5029: x_return_status := OKL_API.G_RET_STS_ERROR;
5030: END IF;
5031: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5032: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5033: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5034: RAISE OKL_API.G_EXCEPTION_ERROR;
5035: END IF;
5036:

Line 5033: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5029: x_return_status := OKL_API.G_RET_STS_ERROR;
5030: END IF;
5031: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5032: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5033: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5034: RAISE OKL_API.G_EXCEPTION_ERROR;
5035: END IF;
5036:
5037: -- We are now doing post stream generation process for first contract

Line 5034: RAISE OKL_API.G_EXCEPTION_ERROR;

5030: END IF;
5031: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5032: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5033: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5034: RAISE OKL_API.G_EXCEPTION_ERROR;
5035: END IF;
5036:
5037: -- We are now doing post stream generation process for first contract
5038: -- Like the Journal entries and Booking of the contract

Line 5054: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5050: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
5051: END IF;
5052: END IF;
5053:
5054: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5056: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5057: RAISE OKL_API.G_EXCEPTION_ERROR;
5058: END IF;

Line 5055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5051: END IF;
5052: END IF;
5053:
5054: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5056: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5057: RAISE OKL_API.G_EXCEPTION_ERROR;
5058: END IF;
5059:

Line 5056: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5052: END IF;
5053:
5054: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5056: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5057: RAISE OKL_API.G_EXCEPTION_ERROR;
5058: END IF;
5059:
5060: -- Set Context

Line 5057: RAISE OKL_API.G_EXCEPTION_ERROR;

5053:
5054: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5055: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5056: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5057: RAISE OKL_API.G_EXCEPTION_ERROR;
5058: END IF;
5059:
5060: -- Set Context
5061: OPEN c_org_csr(p_new2_contract_id);

Line 5088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5084: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
5085: END IF;
5086: END IF;
5087:
5088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_ERROR;
5092: END IF;

Line 5089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5085: END IF;
5086: END IF;
5087:
5088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_ERROR;
5092: END IF;
5093:

Line 5090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5086: END IF;
5087:
5088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_ERROR;
5092: END IF;
5093:
5094: IF (lt2_msg_tbl.COUNT > 0) THEN

Line 5091: RAISE OKL_API.G_EXCEPTION_ERROR;

5087:
5088: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5089: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5090: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_ERROR;
5092: END IF;
5093:
5094: IF (lt2_msg_tbl.COUNT > 0) THEN
5095: i := lt2_msg_tbl.FIRST;

Line 5099: OKL_API.set_message(p_app_name => G_APP_NAME,

5095: i := lt2_msg_tbl.FIRST;
5096: LOOP
5097: lv_severity := lt2_msg_tbl(i).error_status;
5098: IF lv_severity = 'E' THEN
5099: OKL_API.set_message(p_app_name => G_APP_NAME,
5100: p_msg_name => G_ERROR_QA_CHECK);
5101: x_return_status := OKL_API.G_RET_STS_ERROR;
5102:
5103: IF (G_DEBUG_SPLIT) THEN

Line 5101: x_return_status := OKL_API.G_RET_STS_ERROR;

5097: lv_severity := lt2_msg_tbl(i).error_status;
5098: IF lv_severity = 'E' THEN
5099: OKL_API.set_message(p_app_name => G_APP_NAME,
5100: p_msg_name => G_ERROR_QA_CHECK);
5101: x_return_status := OKL_API.G_RET_STS_ERROR;
5102:
5103: IF (G_DEBUG_SPLIT) THEN
5104: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Severity in QA processing
5105: for second Split contract ' || x_return_status);

Line 5115: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

5111: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error data : Error Severity -> ' || lt2_msg_tbl(i).severity);
5112: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error data : Data -> ' || lt2_msg_tbl(i).data);
5113: END IF;
5114:
5115: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5116: END IF;
5117: EXIT WHEN (i = lt2_msg_tbl.LAST);
5118: i := lt2_msg_tbl.NEXT(i);
5119: END LOOP;

Line 5122: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5118: i := lt2_msg_tbl.NEXT(i);
5119: END LOOP;
5120: END IF;
5121:
5122: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5123: -- halt validation as it has no parent record
5124: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5125: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5126: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 5124: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5120: END IF;
5121:
5122: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5123: -- halt validation as it has no parent record
5124: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5125: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5126: RAISE OKL_API.G_EXCEPTION_ERROR;
5127: END IF;
5128:

Line 5125: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5121:
5122: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5123: -- halt validation as it has no parent record
5124: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5125: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5126: RAISE OKL_API.G_EXCEPTION_ERROR;
5127: END IF;
5128:
5129:

Line 5126: RAISE OKL_API.G_EXCEPTION_ERROR;

5122: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5123: -- halt validation as it has no parent record
5124: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5125: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5126: RAISE OKL_API.G_EXCEPTION_ERROR;
5127: END IF;
5128:
5129:
5130: -- Now we are submitting the the second contract for stream Generation.

Line 5150: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5146: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
5147: END IF;
5148: END IF;
5149:
5150: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5151: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5152: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5153: RAISE OKL_API.G_EXCEPTION_ERROR;
5154: END IF;

Line 5151: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5147: END IF;
5148: END IF;
5149:
5150: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5151: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5152: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5153: RAISE OKL_API.G_EXCEPTION_ERROR;
5154: END IF;
5155: -- We are using the below since we have commit the workflow

Line 5152: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5148: END IF;
5149:
5150: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5151: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5152: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5153: RAISE OKL_API.G_EXCEPTION_ERROR;
5154: END IF;
5155: -- We are using the below since we have commit the workflow
5156: -- Of generating the Streams

Line 5153: RAISE OKL_API.G_EXCEPTION_ERROR;

5149:
5150: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5151: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5152: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5153: RAISE OKL_API.G_EXCEPTION_ERROR;
5154: END IF;
5155: -- We are using the below since we have commit the workflow
5156: -- Of generating the Streams
5157: --l_stream_path := okl_streams_util.get_pricing_engine (p_khr_id => p_new2_contract_id);

Line 5163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5159: (p_khr_id => p_new2_contract_id,
5160: x_pricing_engine => l_stream_path,
5161: x_return_status => x_return_status
5162: );
5163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5166: RAISE OKL_API.G_EXCEPTION_ERROR;
5167: END IF;

Line 5164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5160: x_pricing_engine => l_stream_path,
5161: x_return_status => x_return_status
5162: );
5163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5166: RAISE OKL_API.G_EXCEPTION_ERROR;
5167: END IF;
5168:

Line 5165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5161: x_return_status => x_return_status
5162: );
5163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5166: RAISE OKL_API.G_EXCEPTION_ERROR;
5167: END IF;
5168:
5169: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN

Line 5166: RAISE OKL_API.G_EXCEPTION_ERROR;

5162: );
5163: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5164: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5166: RAISE OKL_API.G_EXCEPTION_ERROR;
5167: END IF;
5168:
5169: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN
5170: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN

Line 5169: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN

5165: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5166: RAISE OKL_API.G_EXCEPTION_ERROR;
5167: END IF;
5168:
5169: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN
5170: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN
5171: COMMIT;
5172: END IF;
5173:

Line 5170: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN

5166: RAISE OKL_API.G_EXCEPTION_ERROR;
5167: END IF;
5168:
5169: --IF (p_commit = OKL_API.G_TRUE AND (FND_PROFILE.VALUE('OKL_STREAMS_GEN_PATH') = 'EXTERNAL')) THEN
5170: IF (p_commit = OKL_API.G_TRUE AND (l_stream_path = 'EXTERNAL')) THEN
5171: COMMIT;
5172: END IF;
5173:
5174: -- Need to make sure that the stream generation process has actually completed successfully

Line 5188: OKL_API.set_message(p_app_name => G_APP_NAME,

5184: OPEN c_ok_stream_loop(p_khr_id => p_new2_contract_id,
5185: p_stream_id => r_ok_stream.id);
5186: FETCH c_ok_stream_loop INTO lv2_sis_code, lv2_sts_code;
5187: IF c_ok_stream_loop%NOTFOUND THEN
5188: OKL_API.set_message(p_app_name => G_APP_NAME,
5189: p_msg_name => G_NO_MATCHING_RECORD,
5190: p_token1 => G_COL_NAME_TOKEN,
5191: p_token1_value => 'OKL_STREAM_INTERFACES.SIS_CODE');
5192: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 5192: x_return_status := OKL_API.G_RET_STS_ERROR;

5188: OKL_API.set_message(p_app_name => G_APP_NAME,
5189: p_msg_name => G_NO_MATCHING_RECORD,
5190: p_token1 => G_COL_NAME_TOKEN,
5191: p_token1_value => 'OKL_STREAM_INTERFACES.SIS_CODE');
5192: x_return_status := OKL_API.G_RET_STS_ERROR;
5193:
5194: IF (G_DEBUG_SPLIT) THEN
5195: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation information missing
5196: for second Split contract ' || x_return_status);

Line 5199: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);

5195: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation information missing
5196: for second Split contract ' || x_return_status);
5197: END IF;
5198:
5199: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
5200: END IF;
5201: CLOSE c_ok_stream_loop;
5202:
5203: IF lv2_sis_code = 'PROCESS_COMPLETE'AND

Line 5205: x_return_status := OKL_API.G_RET_STS_SUCCESS;

5201: CLOSE c_ok_stream_loop;
5202:
5203: IF lv2_sis_code = 'PROCESS_COMPLETE'AND
5204: lv2_sts_code = 'COMPLETE' THEN
5205: x_return_status := OKL_API.G_RET_STS_SUCCESS;
5206: EXIT WHEN(lv2_sis_code = 'PROCESS_COMPLETE');
5207: ELSIF lv2_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
5208: OKL_API.set_message(p_app_name => G_APP_NAME,
5209: p_msg_name => G_ERROR_STR_GEN);

Line 5208: OKL_API.set_message(p_app_name => G_APP_NAME,

5204: lv2_sts_code = 'COMPLETE' THEN
5205: x_return_status := OKL_API.G_RET_STS_SUCCESS;
5206: EXIT WHEN(lv2_sis_code = 'PROCESS_COMPLETE');
5207: ELSIF lv2_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
5208: OKL_API.set_message(p_app_name => G_APP_NAME,
5209: p_msg_name => G_ERROR_STR_GEN);
5210: x_return_status := OKL_API.G_RET_STS_ERROR;
5211: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
5212: END IF;

Line 5210: x_return_status := OKL_API.G_RET_STS_ERROR;

5206: EXIT WHEN(lv2_sis_code = 'PROCESS_COMPLETE');
5207: ELSIF lv2_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
5208: OKL_API.set_message(p_app_name => G_APP_NAME,
5209: p_msg_name => G_ERROR_STR_GEN);
5210: x_return_status := OKL_API.G_RET_STS_ERROR;
5211: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
5212: END IF;
5213: -- need below because of performance issue
5214: dbms_lock.sleep(5);

Line 5211: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);

5207: ELSIF lv2_sis_code NOT IN ('PROCESSING_REQUEST', 'PROCESS_COMPLETE', 'RET_DATA_RECEIVED') THEN
5208: OKL_API.set_message(p_app_name => G_APP_NAME,
5209: p_msg_name => G_ERROR_STR_GEN);
5210: x_return_status := OKL_API.G_RET_STS_ERROR;
5211: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
5212: END IF;
5213: -- need below because of performance issue
5214: dbms_lock.sleep(5);
5215: END LOOP;

Line 5216: IF x_return_status = OKL_API.G_RET_STS_ERROR THEN

5212: END IF;
5213: -- need below because of performance issue
5214: dbms_lock.sleep(5);
5215: END LOOP;
5216: IF x_return_status = OKL_API.G_RET_STS_ERROR THEN
5217:
5218: IF (G_DEBUG_SPLIT) THEN
5219: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation completion status
5220: for second Split contract :' || x_return_status);

Line 5223: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);

5219: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'External Stream Generation completion status
5220: for second Split contract :' || x_return_status);
5221: END IF;
5222:
5223: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
5224: END IF;
5225: END LOOP;
5226: END IF;
5227: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 5227: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5223: EXIT WHEN(x_return_status = OKL_API.G_RET_STS_ERROR);
5224: END IF;
5225: END LOOP;
5226: END IF;
5227: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5228: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5229: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5230: RAISE OKL_API.G_EXCEPTION_ERROR;
5231: END IF;

Line 5228: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5224: END IF;
5225: END LOOP;
5226: END IF;
5227: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5228: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5229: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5230: RAISE OKL_API.G_EXCEPTION_ERROR;
5231: END IF;
5232:

Line 5229: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5225: END LOOP;
5226: END IF;
5227: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5228: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5229: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5230: RAISE OKL_API.G_EXCEPTION_ERROR;
5231: END IF;
5232:
5233: OPEN c_get_sts_code(p_khr_id => p_new2_contract_id);

Line 5230: RAISE OKL_API.G_EXCEPTION_ERROR;

5226: END IF;
5227: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5228: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5229: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5230: RAISE OKL_API.G_EXCEPTION_ERROR;
5231: END IF;
5232:
5233: OPEN c_get_sts_code(p_khr_id => p_new2_contract_id);
5234: FETCH c_get_sts_code INTO lv2_sts_code;

Line 5236: OKL_API.set_message(p_app_name => G_APP_NAME,

5232:
5233: OPEN c_get_sts_code(p_khr_id => p_new2_contract_id);
5234: FETCH c_get_sts_code INTO lv2_sts_code;
5235: IF c_get_sts_code%NOTFOUND THEN
5236: OKL_API.set_message(p_app_name => G_APP_NAME,
5237: p_msg_name => G_NO_MATCHING_RECORD,
5238: p_token1 => G_COL_NAME_TOKEN,
5239: p_token1_value => 'OKC_K_HEADERS_B.STS_CODE');
5240: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 5240: x_return_status := OKL_API.G_RET_STS_ERROR;

5236: OKL_API.set_message(p_app_name => G_APP_NAME,
5237: p_msg_name => G_NO_MATCHING_RECORD,
5238: p_token1 => G_COL_NAME_TOKEN,
5239: p_token1_value => 'OKC_K_HEADERS_B.STS_CODE');
5240: x_return_status := OKL_API.G_RET_STS_ERROR;
5241: END IF;
5242: CLOSE c_get_sts_code;
5243:
5244: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Post Stream generation Contract status for second

Line 5248: OKL_API.set_message(p_app_name => G_APP_NAME,

5244: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Post Stream generation Contract status for second
5245: Split contract : ' || lv2_sts_code);
5246:
5247: IF lv2_sts_code <> 'COMPLETE' THEN
5248: OKL_API.set_message(p_app_name => G_APP_NAME,
5249: p_msg_name => G_ERROR_STR_GEN);
5250: x_return_status := OKL_API.G_RET_STS_ERROR;
5251: END IF;
5252: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 5250: x_return_status := OKL_API.G_RET_STS_ERROR;

5246:
5247: IF lv2_sts_code <> 'COMPLETE' THEN
5248: OKL_API.set_message(p_app_name => G_APP_NAME,
5249: p_msg_name => G_ERROR_STR_GEN);
5250: x_return_status := OKL_API.G_RET_STS_ERROR;
5251: END IF;
5252: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5254: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 5252: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5248: OKL_API.set_message(p_app_name => G_APP_NAME,
5249: p_msg_name => G_ERROR_STR_GEN);
5250: x_return_status := OKL_API.G_RET_STS_ERROR;
5251: END IF;
5252: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5254: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5255: RAISE OKL_API.G_EXCEPTION_ERROR;
5256: END IF;

Line 5253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5249: p_msg_name => G_ERROR_STR_GEN);
5250: x_return_status := OKL_API.G_RET_STS_ERROR;
5251: END IF;
5252: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5254: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5255: RAISE OKL_API.G_EXCEPTION_ERROR;
5256: END IF;
5257:

Line 5254: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5250: x_return_status := OKL_API.G_RET_STS_ERROR;
5251: END IF;
5252: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5254: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5255: RAISE OKL_API.G_EXCEPTION_ERROR;
5256: END IF;
5257:
5258: -- We are now doing post stream generation process for second contract

Line 5255: RAISE OKL_API.G_EXCEPTION_ERROR;

5251: END IF;
5252: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5254: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5255: RAISE OKL_API.G_EXCEPTION_ERROR;
5256: END IF;
5257:
5258: -- We are now doing post stream generation process for second contract
5259: -- Like the Journal entries and Booking of the contract

Line 5275: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5271: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
5272: END IF;
5273: END IF;
5274:
5275: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5276: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5277: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5278: RAISE OKL_API.G_EXCEPTION_ERROR;
5279: END IF;

Line 5276: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5272: END IF;
5273: END IF;
5274:
5275: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5276: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5277: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5278: RAISE OKL_API.G_EXCEPTION_ERROR;
5279: END IF;
5280: -- Now post the Journal Entries into GL for the first contract

Line 5277: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5273: END IF;
5274:
5275: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5276: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5277: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5278: RAISE OKL_API.G_EXCEPTION_ERROR;
5279: END IF;
5280: -- Now post the Journal Entries into GL for the first contract
5281: FOR r_get_source_id IN c_get_source_id(p_khr_id => p_new1_contract_id) LOOP

Line 5278: RAISE OKL_API.G_EXCEPTION_ERROR;

5274:
5275: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5276: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5277: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5278: RAISE OKL_API.G_EXCEPTION_ERROR;
5279: END IF;
5280: -- Now post the Journal Entries into GL for the first contract
5281: FOR r_get_source_id IN c_get_source_id(p_khr_id => p_new1_contract_id) LOOP
5282: OKL_ACCOUNT_DIST_PUB.UPDATE_POST_TO_GL(

Line 5290: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5286: x_msg_count => x_msg_count,
5287: x_msg_data => x_msg_data,
5288: p_source_id => r_get_source_id.id,
5289: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5290: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5291: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5292: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5293: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5294: END IF;

Line 5291: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

5287: x_msg_data => x_msg_data,
5288: p_source_id => r_get_source_id.id,
5289: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5290: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5291: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5292: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5293: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5294: END IF;
5295: END LOOP;

Line 5292: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5288: p_source_id => r_get_source_id.id,
5289: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5290: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5291: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5292: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5293: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5294: END IF;
5295: END LOOP;
5296:

Line 5293: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

5289: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5290: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5291: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5292: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5293: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5294: END IF;
5295: END LOOP;
5296:
5297: IF (G_DEBUG_SPLIT) THEN

Line 5305: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5301: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
5302: END IF;
5303: END IF;
5304:
5305: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5306: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5307: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5308: RAISE OKL_API.G_EXCEPTION_ERROR;
5309: END IF;

Line 5306: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5302: END IF;
5303: END IF;
5304:
5305: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5306: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5307: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5308: RAISE OKL_API.G_EXCEPTION_ERROR;
5309: END IF;
5310: -- Now post the Journal Entries into GL for the second contract

Line 5307: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5303: END IF;
5304:
5305: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5306: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5307: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5308: RAISE OKL_API.G_EXCEPTION_ERROR;
5309: END IF;
5310: -- Now post the Journal Entries into GL for the second contract
5311: FOR r_get_source_id IN c_get_source_id(p_khr_id => p_new2_contract_id) LOOP

Line 5308: RAISE OKL_API.G_EXCEPTION_ERROR;

5304:
5305: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5306: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5307: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5308: RAISE OKL_API.G_EXCEPTION_ERROR;
5309: END IF;
5310: -- Now post the Journal Entries into GL for the second contract
5311: FOR r_get_source_id IN c_get_source_id(p_khr_id => p_new2_contract_id) LOOP
5312: OKL_ACCOUNT_DIST_PUB.UPDATE_POST_TO_GL(

Line 5320: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5316: x_msg_count => x_msg_count,
5317: x_msg_data => x_msg_data,
5318: p_source_id => r_get_source_id.id,
5319: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5320: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5321: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5322: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5323: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5324: END IF;

Line 5321: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);

5317: x_msg_data => x_msg_data,
5318: p_source_id => r_get_source_id.id,
5319: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5320: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5321: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5322: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5323: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5324: END IF;
5325: END LOOP;

Line 5322: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5318: p_source_id => r_get_source_id.id,
5319: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5320: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5321: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5322: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5323: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5324: END IF;
5325: END LOOP;
5326:

Line 5323: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);

5319: p_source_table => 'OKL_TXL_CNTRCT_LNS');
5320: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5321: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR);
5322: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5323: EXIT WHEN (x_return_status = OKL_API.G_RET_STS_ERROR);
5324: END IF;
5325: END LOOP;
5326:
5327: IF (G_DEBUG_SPLIT) THEN

Line 5335: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5331: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error Message : ' || x_msg_data);
5332: END IF;
5333: END IF;
5334:
5335: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5337: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5338: RAISE OKL_API.G_EXCEPTION_ERROR;
5339: END IF;

Line 5336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5332: END IF;
5333: END IF;
5334:
5335: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5337: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5338: RAISE OKL_API.G_EXCEPTION_ERROR;
5339: END IF;
5340:

Line 5337: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5333: END IF;
5334:
5335: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5337: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5338: RAISE OKL_API.G_EXCEPTION_ERROR;
5339: END IF;
5340:
5341: /*

Line 5338: RAISE OKL_API.G_EXCEPTION_ERROR;

5334:
5335: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5336: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5337: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5338: RAISE OKL_API.G_EXCEPTION_ERROR;
5339: END IF;
5340:
5341: /*
5342: -- mvasudev, 08/23/2004

Line 5346: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5342: -- mvasudev, 08/23/2004
5343: -- Code change to enable Business Event
5344: */
5345: raise_business_event(x_return_status => x_return_status);
5346: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5347: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5348: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5349: RAISE OKL_API.G_EXCEPTION_ERROR;
5350: END IF;

Line 5347: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

5343: -- Code change to enable Business Event
5344: */
5345: raise_business_event(x_return_status => x_return_status);
5346: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5347: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5348: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5349: RAISE OKL_API.G_EXCEPTION_ERROR;
5350: END IF;
5351:

Line 5348: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5344: */
5345: raise_business_event(x_return_status => x_return_status);
5346: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5347: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5348: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5349: RAISE OKL_API.G_EXCEPTION_ERROR;
5350: END IF;
5351:
5352: /*

Line 5349: RAISE OKL_API.G_EXCEPTION_ERROR;

5345: raise_business_event(x_return_status => x_return_status);
5346: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5347: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5348: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5349: RAISE OKL_API.G_EXCEPTION_ERROR;
5350: END IF;
5351:
5352: /*
5353: -- mvasudev, 08/23/2004

Line 5356: OKL_API.END_ACTIVITY (x_msg_count,

5352: /*
5353: -- mvasudev, 08/23/2004
5354: -- END, Code change to enable Business Event
5355: */
5356: OKL_API.END_ACTIVITY (x_msg_count,
5357: x_msg_data );
5358:
5359: IF (G_DEBUG_SPLIT) THEN
5360: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '+--- End Split Contract Process Flow ---+');

Line 5363: WHEN OKL_API.G_EXCEPTION_ERROR THEN

5359: IF (G_DEBUG_SPLIT) THEN
5360: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '+--- End Split Contract Process Flow ---+');
5361: END IF;
5362: EXCEPTION
5363: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5364: IF c_ok_stream%ISOPEN THEN
5365: CLOSE c_ok_stream;
5366: END IF;
5367: IF c_get_source_id%ISOPEN THEN

Line 5382: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5378: x_return_status => x_return_status,
5379: x_msg_count => x_msg_count,
5380: x_msg_data => x_msg_data,
5381: p_contract_id => p_new1_contract_id);
5382: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5383: OKL_API.set_message(p_app_name => G_APP_NAME,
5384: p_msg_name => G_ERROR_CLEAN_SPK);
5385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5386: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 5383: OKL_API.set_message(p_app_name => G_APP_NAME,

5379: x_msg_count => x_msg_count,
5380: x_msg_data => x_msg_data,
5381: p_contract_id => p_new1_contract_id);
5382: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5383: OKL_API.set_message(p_app_name => G_APP_NAME,
5384: p_msg_name => G_ERROR_CLEAN_SPK);
5385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5386: OKL_API.set_message(p_app_name => G_APP_NAME,
5387: p_msg_name => G_ERROR_CLEAN_SPK);

Line 5385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5381: p_contract_id => p_new1_contract_id);
5382: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5383: OKL_API.set_message(p_app_name => G_APP_NAME,
5384: p_msg_name => G_ERROR_CLEAN_SPK);
5385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5386: OKL_API.set_message(p_app_name => G_APP_NAME,
5387: p_msg_name => G_ERROR_CLEAN_SPK);
5388: END IF;
5389: l_delete_contract_line(p_api_version => p_api_version,

Line 5386: OKL_API.set_message(p_app_name => G_APP_NAME,

5382: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5383: OKL_API.set_message(p_app_name => G_APP_NAME,
5384: p_msg_name => G_ERROR_CLEAN_SPK);
5385: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5386: OKL_API.set_message(p_app_name => G_APP_NAME,
5387: p_msg_name => G_ERROR_CLEAN_SPK);
5388: END IF;
5389: l_delete_contract_line(p_api_version => p_api_version,
5390: p_init_msg_list => p_init_msg_list,

Line 5395: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5391: x_return_status => x_return_status,
5392: x_msg_count => x_msg_count,
5393: x_msg_data => x_msg_data,
5394: p_contract_id => p_new2_contract_id);
5395: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5396: OKL_API.set_message(p_app_name => G_APP_NAME,
5397: p_msg_name => G_ERROR_CLEAN_SPK);
5398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5399: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 5396: OKL_API.set_message(p_app_name => G_APP_NAME,

5392: x_msg_count => x_msg_count,
5393: x_msg_data => x_msg_data,
5394: p_contract_id => p_new2_contract_id);
5395: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5396: OKL_API.set_message(p_app_name => G_APP_NAME,
5397: p_msg_name => G_ERROR_CLEAN_SPK);
5398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5399: OKL_API.set_message(p_app_name => G_APP_NAME,
5400: p_msg_name => G_ERROR_CLEAN_SPK);

Line 5398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5394: p_contract_id => p_new2_contract_id);
5395: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5396: OKL_API.set_message(p_app_name => G_APP_NAME,
5397: p_msg_name => G_ERROR_CLEAN_SPK);
5398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5399: OKL_API.set_message(p_app_name => G_APP_NAME,
5400: p_msg_name => G_ERROR_CLEAN_SPK);
5401: END IF;
5402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 5399: OKL_API.set_message(p_app_name => G_APP_NAME,

5395: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5396: OKL_API.set_message(p_app_name => G_APP_NAME,
5397: p_msg_name => G_ERROR_CLEAN_SPK);
5398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5399: OKL_API.set_message(p_app_name => G_APP_NAME,
5400: p_msg_name => G_ERROR_CLEAN_SPK);
5401: END IF;
5402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
5403: l_api_name,

Line 5402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

5398: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5399: OKL_API.set_message(p_app_name => G_APP_NAME,
5400: p_msg_name => G_ERROR_CLEAN_SPK);
5401: END IF;
5402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
5403: l_api_name,
5404: G_PKG_NAME,
5405: 'OKL_API.G_RET_STS_ERROR',
5406: x_msg_count,

Line 5405: 'OKL_API.G_RET_STS_ERROR',

5401: END IF;
5402: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
5403: l_api_name,
5404: G_PKG_NAME,
5405: 'OKL_API.G_RET_STS_ERROR',
5406: x_msg_count,
5407: x_msg_data,
5408: '_PVT');
5409: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 5409: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

5405: 'OKL_API.G_RET_STS_ERROR',
5406: x_msg_count,
5407: x_msg_data,
5408: '_PVT');
5409: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5410: IF c_ok_stream%ISOPEN THEN
5411: CLOSE c_ok_stream;
5412: END IF;
5413: IF c_get_sts_code%ISOPEN THEN

Line 5431: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5427: x_return_status => x_return_status,
5428: x_msg_count => x_msg_count,
5429: x_msg_data => x_msg_data,
5430: p_contract_id => p_new1_contract_id);
5431: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5432: OKL_API.set_message(p_app_name => G_APP_NAME,
5433: p_msg_name => G_ERROR_CLEAN_SPK);
5434: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5435: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 5432: OKL_API.set_message(p_app_name => G_APP_NAME,

5428: x_msg_count => x_msg_count,
5429: x_msg_data => x_msg_data,
5430: p_contract_id => p_new1_contract_id);
5431: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5432: OKL_API.set_message(p_app_name => G_APP_NAME,
5433: p_msg_name => G_ERROR_CLEAN_SPK);
5434: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5435: OKL_API.set_message(p_app_name => G_APP_NAME,
5436: p_msg_name => G_ERROR_CLEAN_SPK);

Line 5434: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5430: p_contract_id => p_new1_contract_id);
5431: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5432: OKL_API.set_message(p_app_name => G_APP_NAME,
5433: p_msg_name => G_ERROR_CLEAN_SPK);
5434: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5435: OKL_API.set_message(p_app_name => G_APP_NAME,
5436: p_msg_name => G_ERROR_CLEAN_SPK);
5437: END IF;
5438: l_delete_contract_line(p_api_version => p_api_version,

Line 5435: OKL_API.set_message(p_app_name => G_APP_NAME,

5431: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5432: OKL_API.set_message(p_app_name => G_APP_NAME,
5433: p_msg_name => G_ERROR_CLEAN_SPK);
5434: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5435: OKL_API.set_message(p_app_name => G_APP_NAME,
5436: p_msg_name => G_ERROR_CLEAN_SPK);
5437: END IF;
5438: l_delete_contract_line(p_api_version => p_api_version,
5439: p_init_msg_list => p_init_msg_list,

Line 5444: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5440: x_return_status => x_return_status,
5441: x_msg_count => x_msg_count,
5442: x_msg_data => x_msg_data,
5443: p_contract_id => p_new2_contract_id);
5444: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5445: OKL_API.set_message(p_app_name => G_APP_NAME,
5446: p_msg_name => G_ERROR_CLEAN_SPK);
5447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5448: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 5445: OKL_API.set_message(p_app_name => G_APP_NAME,

5441: x_msg_count => x_msg_count,
5442: x_msg_data => x_msg_data,
5443: p_contract_id => p_new2_contract_id);
5444: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5445: OKL_API.set_message(p_app_name => G_APP_NAME,
5446: p_msg_name => G_ERROR_CLEAN_SPK);
5447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5448: OKL_API.set_message(p_app_name => G_APP_NAME,
5449: p_msg_name => G_ERROR_CLEAN_SPK);

Line 5447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5443: p_contract_id => p_new2_contract_id);
5444: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5445: OKL_API.set_message(p_app_name => G_APP_NAME,
5446: p_msg_name => G_ERROR_CLEAN_SPK);
5447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5448: OKL_API.set_message(p_app_name => G_APP_NAME,
5449: p_msg_name => G_ERROR_CLEAN_SPK);
5450: END IF;
5451: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

Line 5448: OKL_API.set_message(p_app_name => G_APP_NAME,

5444: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5445: OKL_API.set_message(p_app_name => G_APP_NAME,
5446: p_msg_name => G_ERROR_CLEAN_SPK);
5447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5448: OKL_API.set_message(p_app_name => G_APP_NAME,
5449: p_msg_name => G_ERROR_CLEAN_SPK);
5450: END IF;
5451: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
5452: l_api_name,

Line 5451: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

5447: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5448: OKL_API.set_message(p_app_name => G_APP_NAME,
5449: p_msg_name => G_ERROR_CLEAN_SPK);
5450: END IF;
5451: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
5452: l_api_name,
5453: G_PKG_NAME,
5454: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5455: x_msg_count,

Line 5454: 'OKL_API.G_RET_STS_UNEXP_ERROR',

5450: END IF;
5451: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
5452: l_api_name,
5453: G_PKG_NAME,
5454: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5455: x_msg_count,
5456: x_msg_data,
5457: '_PVT');
5458: WHEN OTHERS THEN

Line 5480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5476: x_return_status => x_return_status,
5477: x_msg_count => x_msg_count,
5478: x_msg_data => x_msg_data,
5479: p_contract_id => p_new1_contract_id);
5480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5481: OKL_API.set_message(p_app_name => G_APP_NAME,
5482: p_msg_name => G_ERROR_CLEAN_SPK);
5483: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5484: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 5481: OKL_API.set_message(p_app_name => G_APP_NAME,

5477: x_msg_count => x_msg_count,
5478: x_msg_data => x_msg_data,
5479: p_contract_id => p_new1_contract_id);
5480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5481: OKL_API.set_message(p_app_name => G_APP_NAME,
5482: p_msg_name => G_ERROR_CLEAN_SPK);
5483: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5484: OKL_API.set_message(p_app_name => G_APP_NAME,
5485: p_msg_name => G_ERROR_CLEAN_SPK);

Line 5483: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5479: p_contract_id => p_new1_contract_id);
5480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5481: OKL_API.set_message(p_app_name => G_APP_NAME,
5482: p_msg_name => G_ERROR_CLEAN_SPK);
5483: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5484: OKL_API.set_message(p_app_name => G_APP_NAME,
5485: p_msg_name => G_ERROR_CLEAN_SPK);
5486: END IF;
5487: l_delete_contract_line(p_api_version => p_api_version,

Line 5484: OKL_API.set_message(p_app_name => G_APP_NAME,

5480: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5481: OKL_API.set_message(p_app_name => G_APP_NAME,
5482: p_msg_name => G_ERROR_CLEAN_SPK);
5483: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5484: OKL_API.set_message(p_app_name => G_APP_NAME,
5485: p_msg_name => G_ERROR_CLEAN_SPK);
5486: END IF;
5487: l_delete_contract_line(p_api_version => p_api_version,
5488: p_init_msg_list => p_init_msg_list,

Line 5493: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

5489: x_return_status => x_return_status,
5490: x_msg_count => x_msg_count,
5491: x_msg_data => x_msg_data,
5492: p_contract_id => p_new2_contract_id);
5493: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5494: OKL_API.set_message(p_app_name => G_APP_NAME,
5495: p_msg_name => G_ERROR_CLEAN_SPK);
5496: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5497: OKL_API.set_message(p_app_name => G_APP_NAME,

Line 5494: OKL_API.set_message(p_app_name => G_APP_NAME,

5490: x_msg_count => x_msg_count,
5491: x_msg_data => x_msg_data,
5492: p_contract_id => p_new2_contract_id);
5493: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5494: OKL_API.set_message(p_app_name => G_APP_NAME,
5495: p_msg_name => G_ERROR_CLEAN_SPK);
5496: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5497: OKL_API.set_message(p_app_name => G_APP_NAME,
5498: p_msg_name => G_ERROR_CLEAN_SPK);

Line 5496: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

5492: p_contract_id => p_new2_contract_id);
5493: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5494: OKL_API.set_message(p_app_name => G_APP_NAME,
5495: p_msg_name => G_ERROR_CLEAN_SPK);
5496: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5497: OKL_API.set_message(p_app_name => G_APP_NAME,
5498: p_msg_name => G_ERROR_CLEAN_SPK);
5499: END IF;
5500: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

Line 5497: OKL_API.set_message(p_app_name => G_APP_NAME,

5493: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5494: OKL_API.set_message(p_app_name => G_APP_NAME,
5495: p_msg_name => G_ERROR_CLEAN_SPK);
5496: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5497: OKL_API.set_message(p_app_name => G_APP_NAME,
5498: p_msg_name => G_ERROR_CLEAN_SPK);
5499: END IF;
5500: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
5501: l_api_name,

Line 5500: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(

5496: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
5497: OKL_API.set_message(p_app_name => G_APP_NAME,
5498: p_msg_name => G_ERROR_CLEAN_SPK);
5499: END IF;
5500: x_return_status :=OKL_API.HANDLE_EXCEPTIONS(
5501: l_api_name,
5502: G_PKG_NAME,
5503: 'OTHERS',
5504: x_msg_count,