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_OKC_MIGRATION_PVT dependencies on OKL_API

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

1: PACKAGE BODY okl_okc_migration_pvt AS
2: /* $Header: OKLROKCB.pls 120.5.12020000.2 2013/02/07 11:10:56 vsgandhi ship $ */
3: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
4: -- The Enities we are Handling are as listed below
5: --1.OKC_K_VERS_NUMBERS_V -- cvmv
6: --2.OKC_K_HEADERS_V -- chrv
7: --3.OKC_K_LINES_V -- clev

Line 102: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

98: p_event_name => p_event_name,
99: p_parameters => l_parameter_list);
100: EXCEPTION
101: WHEN OTHERS THEN
102: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
104: END raise_business_event;
105: /*
106: -- mvasudev, 09/09/2004

Line 103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

99: p_parameters => l_parameter_list);
100: EXCEPTION
101: WHEN OTHERS THEN
102: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
103: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
104: END raise_business_event;
105: /*
106: -- mvasudev, 09/09/2004
107: -- END, PROCEDURE to enable Business Event

Line 1163: l_raise_business_event VARCHAR2(1) := OKL_API.G_FALSE;

1159:
1160: l_lty_code okc_line_styles_b.lty_code%TYPE;
1161: l_parent_line_id okc_k_lines_b.id%TYPE;
1162: l_parameter_list wf_parameter_list_t;
1163: l_raise_business_event VARCHAR2(1) := OKL_API.G_FALSE;
1164: l_business_event_name WF_EVENTS.NAME%TYPE := NULL;
1165: --vthiruva end, 15-Sep-2004
1166:
1167: BEGIN

Line 1241: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN

1237: FETCH lty_code_csr into l_lty_code, l_parent_line_id;
1238: CLOSE lty_code_csr;
1239:
1240: IF(l_lty_code = 'LINK_FEE_ASSET' AND
1241: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1242:
1243: l_raise_business_event := OKL_API.G_TRUE;
1244: l_business_event_name := G_WF_EVT_ASSET_FEE_CREATED;
1245: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID,l_parent_line_id,l_parameter_list);

Line 1243: l_raise_business_event := OKL_API.G_TRUE;

1239:
1240: IF(l_lty_code = 'LINK_FEE_ASSET' AND
1241: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1242:
1243: l_raise_business_event := OKL_API.G_TRUE;
1244: l_business_event_name := G_WF_EVT_ASSET_FEE_CREATED;
1245: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID,l_parent_line_id,l_parameter_list);
1246:
1247: ELSIF(l_lty_code = 'LINK_SERV_ASSET' AND

Line 1248: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN

1244: l_business_event_name := G_WF_EVT_ASSET_FEE_CREATED;
1245: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID,l_parent_line_id,l_parameter_list);
1246:
1247: ELSIF(l_lty_code = 'LINK_SERV_ASSET' AND
1248: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1249:
1250: l_raise_business_event := OKL_API.G_TRUE;
1251: l_business_event_name := G_WF_EVT_ASSET_SERV_FEE_CRTD;
1252: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID,l_parent_line_id,l_parameter_list);

Line 1250: l_raise_business_event := OKL_API.G_TRUE;

1246:
1247: ELSIF(l_lty_code = 'LINK_SERV_ASSET' AND
1248: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1249:
1250: l_raise_business_event := OKL_API.G_TRUE;
1251: l_business_event_name := G_WF_EVT_ASSET_SERV_FEE_CRTD;
1252: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID,l_parent_line_id,l_parameter_list);
1253:
1254: END IF;

Line 1256: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL)THEN

1252: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID,l_parent_line_id,l_parameter_list);
1253:
1254: END IF;
1255:
1256: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL)THEN
1257: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID,p_cimv_rec.dnz_chr_id,l_parameter_list);
1258: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID,p_cimv_rec.object1_id1,l_parameter_list);
1259:
1260: raise_business_event(p_api_version => p_api_version

Line 1410: lr_cimv_rec_type_in.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN

1406: lr_cimv_rec_type_in);
1407:
1408: -- smereddy,09/08/2005,Bug#4378699
1409: IF (lr_cimv_rec_type_in.dnz_chr_id IS NOT NULL OR
1410: lr_cimv_rec_type_in.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
1411: l_dnz_chr_id := lr_cimv_rec_type_in.dnz_chr_id;
1412: ELSE
1413: FOR l_dnz_chr_id_rec IN l_dnz_chr_id_csr(p_cimv_rec.id)
1414: LOOP

Line 1792: IF (x_cplv_rec.dnz_chr_id IS NOT NULL) AND (x_cplv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN

1788:
1789: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
1790: -- edit points for lease contract are any modifications between statuses
1791: -- 'PASSED' and 'APPROVED'
1792: IF (x_cplv_rec.dnz_chr_id IS NOT NULL) AND (x_cplv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
1793:
1794: okl_contract_status_pub.cascade_lease_status_edit
1795: (p_api_version => p_api_version,
1796: p_init_msg_list => p_init_msg_list,

Line 1814: IF (okl_lla_util_pvt.is_lease_contract(p_cplv_rec.dnz_chr_id) = OKL_API.G_TRUE) THEN

1810: /*
1811: -- mvasudev, 09/09/2004
1812: -- Code change to enable Business Event
1813: */
1814: IF (okl_lla_util_pvt.is_lease_contract(p_cplv_rec.dnz_chr_id) = OKL_API.G_TRUE) THEN
1815: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID,p_cplv_rec.dnz_chr_id,l_parameter_list);
1816: --vthiruva..04-jan-2004.. Modified to pass object1_id1 as party id and
1817: --added party_role_id to list of paramters passed to raise business event.
1818: wf_event.AddParameterToList(G_WF_ITM_PARTY_ID,p_cplv_rec.object1_id1,l_parameter_list);

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

1825: ,x_msg_data => x_msg_data
1826: ,p_event_name => G_WF_EVT_KHR_PARTY_CREATED
1827: ,p_event_param_list => l_parameter_list);
1828:
1829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;

Line 1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1826: ,p_event_name => G_WF_EVT_KHR_PARTY_CREATED
1827: ,p_event_param_list => l_parameter_list);
1828:
1829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: END IF;

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

1827: ,p_event_param_list => l_parameter_list);
1828:
1829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: END IF;
1835:

Line 1832: RAISE OKL_API.G_EXCEPTION_ERROR;

1828:
1829: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1832: RAISE OKL_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: END IF;
1835:
1836: /*

Line 2030: IF (x_cplv_rec.dnz_chr_id IS NOT NULL) AND (x_cplv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN

2026: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2027: -- edit points for lease contract are any modifications between statuses
2028: -- 'PASSED' and 'APPROVED'
2029: --output will not be created with null dnz_chr_id
2030: IF (x_cplv_rec.dnz_chr_id IS NOT NULL) AND (x_cplv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2031:
2032: okl_contract_status_pub.cascade_lease_status_edit
2033: (p_api_version => p_api_version,
2034: p_init_msg_list => p_init_msg_list,

Line 2182: IF (p_cplv_rec.dnz_chr_id IS NULL) OR (p_cplv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN

2178: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2179: -- edit points for lease contract are any modifications between statuses
2180: -- 'PASSED' and 'APPROVED'
2181:
2182: IF (p_cplv_rec.dnz_chr_id IS NULL) OR (p_cplv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN
2183: OPEN chr_id_crs(p_cpl_id => p_cplv_rec.id);
2184: FETCH chr_id_crs INTO l_dnz_chr_id;
2185: IF chr_id_crs%NOTFOUND THEN
2186: NULL; --this error should have been trapped earlier (party not attached to chr)

Line 2193: IF (l_dnz_chr_id IS NOT NULL AND l_dnz_chr_id <> OKL_API.G_MISS_NUM) THEN

2189: ELSE
2190: l_dnz_chr_id := p_cplv_rec.dnz_chr_id;
2191: END IF;
2192:
2193: IF (l_dnz_chr_id IS NOT NULL AND l_dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2194:
2195: okl_contract_status_pub.cascade_lease_status_edit
2196: (p_api_version => p_api_version,
2197: p_init_msg_list => p_init_msg_list,

Line 2415: IF (x_ctcv_rec.dnz_chr_id IS NOT NULL) AND (x_ctcv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN

2411:
2412: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2413: -- edit points for lease contract are any modifications between statuses
2414: -- 'PASSED' and 'APPROVED'
2415: IF (x_ctcv_rec.dnz_chr_id IS NOT NULL) AND (x_ctcv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2416:
2417: okl_contract_status_pub.cascade_lease_status_edit
2418: (p_api_version => p_api_version,
2419: p_init_msg_list => p_init_msg_list,

Line 2622: IF (x_ctcv_rec.dnz_chr_id IS NOT NULL) AND (x_ctcv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN

2618:
2619: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2620: -- edit points for lease contract are any modifications between statuses
2621: -- 'PASSED' and 'APPROVED'
2622: IF (x_ctcv_rec.dnz_chr_id IS NOT NULL) AND (x_ctcv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2623:
2624: okl_contract_status_pub.cascade_lease_status_edit
2625: (p_api_version => p_api_version,
2626: p_init_msg_list => p_init_msg_list,

Line 2772: IF (p_ctcv_rec.dnz_chr_id IS NULL) OR (p_ctcv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN

2768: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2769: -- edit points for lease contract are any modifications between statuses
2770: -- 'PASSED' and 'APPROVED'
2771:
2772: IF (p_ctcv_rec.dnz_chr_id IS NULL) OR (p_ctcv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN
2773: OPEN chr_id_crs(p_ctc_id => p_ctcv_rec.id);
2774: FETCH chr_id_crs INTO l_dnz_chr_id;
2775: IF chr_id_crs%NOTFOUND THEN
2776: NULL; --this error should have been trapped earlier (party not attached to chr)

Line 2783: IF (l_dnz_chr_id IS NOT NULL) AND (l_dnz_chr_id <> OKL_API.G_MISS_NUM) THEN

2779: ELSE
2780: l_dnz_chr_id := p_ctcv_rec.dnz_chr_id;
2781: END IF;
2782:
2783: IF (l_dnz_chr_id IS NOT NULL) AND (l_dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2784:
2785: okl_contract_status_pub.cascade_lease_status_edit
2786: (p_api_version => p_api_version,
2787: p_init_msg_list => p_init_msg_list,

Line 4504: l_raise_business_event VARCHAR2(1) := OKL_API.G_FALSE;

4500:
4501: l_process_type VARCHAR2(20);
4502: l_request_id NUMBER := -1;
4503: l_parameter_list wf_parameter_list_t;
4504: l_raise_business_event VARCHAR2(1) := OKL_API.G_FALSE;
4505: l_business_event_name wf_events.name%TYPE;
4506:
4507: BEGIN
4508: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 4556: l_raise_business_event := OKL_API.G_TRUE;

4552: IF(l_process_type IS NOT NULL AND l_process_type = 'HEADER')THEN
4553: IF(l_rgpv_rec.rgd_code = 'LAAFLG')THEN
4554: -- raise business event for the Liens and Title for Terms and Conditions for the Contract
4555: -- set raise business event flag to true
4556: l_raise_business_event := OKL_API.G_TRUE;
4557: -- set the event name to be raised. this event name will vary for each rule group
4558: l_business_event_name := G_WF_EVT_CONTRACT_TERM_UPDATED;
4559: wf_event.AddParameterToList(G_WF_ITM_TERMS_ID, x_rgpv_rec.id, l_parameter_list);
4560: END IF;

Line 4565: l_raise_business_event := OKL_API.G_TRUE;

4561: ELSIF(l_process_type IS NOT NULL AND l_process_type = 'LINE')THEN
4562: IF(l_rgpv_rec.rgd_code = 'LAAFLG')THEN
4563: -- raise business event for Liens Title and Registration for the Assets
4564: -- set raise business event flag to true
4565: l_raise_business_event := OKL_API.G_TRUE;
4566: -- set the event name to be raised. this event name will vary for each rule group
4567: l_business_event_name := G_WF_EVT_ASSET_FILING_UPDATED;
4568: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID, l_rgpv_rec.cle_id, l_parameter_list);
4569: ELSIF(l_rgpv_rec.rgd_code = 'LAASTX')THEN

Line 4571: l_raise_business_event := OKL_API.G_TRUE;

4567: l_business_event_name := G_WF_EVT_ASSET_FILING_UPDATED;
4568: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID, l_rgpv_rec.cle_id, l_parameter_list);
4569: ELSIF(l_rgpv_rec.rgd_code = 'LAASTX')THEN
4570: -- raise business event for tax, property tax updated.
4571: l_raise_business_event := OKL_API.G_TRUE;
4572: l_business_event_name := G_WF_EVT_ASSET_PROPTAX_UPDATED;
4573: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID, l_rgpv_rec.cle_id, l_parameter_list);
4574: ELSIF(l_rgpv_rec.rgd_code = 'LAPSTH')THEN
4575: OPEN get_line_style(l_rgpv_rec.cle_id);

Line 4580: l_raise_business_event := OKL_API.G_TRUE;

4576: FETCH get_line_style INTO l_line_style;
4577: CLOSE get_line_style;
4578: -- raise business event for service line update passthru
4579: IF(l_line_style IS NOT NULL AND l_line_style = 'SOLD_SERVICE')THEN
4580: l_raise_business_event := OKL_API.G_TRUE;
4581: l_business_event_name := G_WF_EVT_SERV_PASS_UPDATED;
4582: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4583: -- check if the service line in context has a service contract associated with it
4584: -- if so, pass the service contract id and service contract line id as parameters

Line 4598: l_raise_business_event := OKL_API.G_TRUE;

4594: wf_event.AddParameterToList(G_WF_ITM_SERV_CLE_ID, l_service_top_line_id, l_parameter_list);
4595: END IF;
4596: -- raise the business event for update passthrough for Fee Line
4597: ELSIF(l_line_style IS NOT NULL AND l_line_style = 'FEE')THEN
4598: l_raise_business_event := OKL_API.G_TRUE;
4599: l_business_event_name := G_WF_EVT_FEE_PASS_UPDATED;
4600: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4601: END IF;
4602: ELSIF(l_rgpv_rec.rgd_code = 'LAFEXP')THEN

Line 4608: l_raise_business_event := OKL_API.G_TRUE;

4604: FETCH get_line_style INTO l_line_style;
4605: CLOSE get_line_style;
4606: -- raise business event for service line update expense
4607: IF(l_line_style IS NOT NULL AND l_line_style = 'SOLD_SERVICE')THEN
4608: l_raise_business_event := OKL_API.G_TRUE;
4609: l_business_event_name := G_WF_EVT_SERV_FEXP_UPDATED;
4610: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4611: -- check if the service line in context has a service contract associated with it
4612: -- if so, pass the service contract id and service contract line id as parameters

Line 4624: l_raise_business_event := OKL_API.G_TRUE;

4620: wf_event.AddParameterToList(G_WF_ITM_SERV_CHR_ID, l_serv_contract_id, l_parameter_list);
4621: wf_event.AddParameterToList(G_WF_ITM_SERV_CLE_ID, l_service_top_line_id, l_parameter_list);
4622: END IF;
4623: ELSIF(l_line_style IS NOT NULL AND l_line_style = 'FEE')THEN
4624: l_raise_business_event := OKL_API.G_TRUE;
4625: l_business_event_name := G_WF_EVT_FEE_EXP_UPDATED;
4626: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4627: END IF; -- end if for l_line_style is not null
4628: END IF; -- end if for rgd_code

Line 4631: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL AND

4627: END IF; -- end if for l_line_style is not null
4628: END IF; -- end if for rgd_code
4629: END IF; -- end if for l_process_type
4630: -- check if the business event needs to be raised
4631: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL AND
4632: OKL_LLA_UTIL_PVT.is_lease_contract(l_rgpv_rec.dnz_chr_id)= OKL_API.G_TRUE)THEN
4633: -- since contract id is called as 'CONTRACT_ID' for all the above events, it is being
4634: -- added to the parameter list here, than duplicating it in all the above if conditions
4635: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID, l_rgpv_rec.dnz_chr_id, l_parameter_list);

Line 4632: OKL_LLA_UTIL_PVT.is_lease_contract(l_rgpv_rec.dnz_chr_id)= OKL_API.G_TRUE)THEN

4628: END IF; -- end if for rgd_code
4629: END IF; -- end if for l_process_type
4630: -- check if the business event needs to be raised
4631: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL AND
4632: OKL_LLA_UTIL_PVT.is_lease_contract(l_rgpv_rec.dnz_chr_id)= OKL_API.G_TRUE)THEN
4633: -- since contract id is called as 'CONTRACT_ID' for all the above events, it is being
4634: -- added to the parameter list here, than duplicating it in all the above if conditions
4635: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID, l_rgpv_rec.dnz_chr_id, l_parameter_list);
4636: raise_business_event(p_api_version => p_api_version,

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

4640: x_msg_data => x_msg_data,
4641: p_event_name => l_business_event_name,
4642: p_event_param_list => l_parameter_list
4643: );
4644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4647: RAISE OKL_API.G_EXCEPTION_ERROR;
4648: END IF;

Line 4645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4641: p_event_name => l_business_event_name,
4642: p_event_param_list => l_parameter_list
4643: );
4644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4647: RAISE OKL_API.G_EXCEPTION_ERROR;
4648: END IF;
4649: END IF;

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

4642: p_event_param_list => l_parameter_list
4643: );
4644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4647: RAISE OKL_API.G_EXCEPTION_ERROR;
4648: END IF;
4649: END IF;
4650:

Line 4647: RAISE OKL_API.G_EXCEPTION_ERROR;

4643: );
4644: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4645: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4646: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4647: RAISE OKL_API.G_EXCEPTION_ERROR;
4648: END IF;
4649: END IF;
4650:
4651: END IF; -- end if for request id