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 2006/07/14 12:00:18 dkagrawa noship $ */
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 93: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

89: p_event_name => p_event_name,
90: p_parameters => l_parameter_list);
91: EXCEPTION
92: WHEN OTHERS THEN
93: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
94: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
95: END raise_business_event;
96: /*
97: -- mvasudev, 09/09/2004

Line 94: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

90: p_parameters => l_parameter_list);
91: EXCEPTION
92: WHEN OTHERS THEN
93: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
94: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
95: END raise_business_event;
96: /*
97: -- mvasudev, 09/09/2004
98: -- END, PROCEDURE to enable Business Event

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

1106:
1107: l_lty_code okc_line_styles_b.lty_code%TYPE;
1108: l_parent_line_id okc_k_lines_b.id%TYPE;
1109: l_parameter_list wf_parameter_list_t;
1110: l_raise_business_event VARCHAR2(1) := OKL_API.G_FALSE;
1111: l_business_event_name WF_EVENTS.NAME%TYPE := NULL;
1112: --vthiruva end, 15-Sep-2004
1113:
1114: BEGIN

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

1184: FETCH lty_code_csr into l_lty_code, l_parent_line_id;
1185: CLOSE lty_code_csr;
1186:
1187: IF(l_lty_code = 'LINK_FEE_ASSET' AND
1188: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1189:
1190: l_raise_business_event := OKL_API.G_TRUE;
1191: l_business_event_name := G_WF_EVT_ASSET_FEE_CREATED;
1192: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID,l_parent_line_id,l_parameter_list);

Line 1190: l_raise_business_event := OKL_API.G_TRUE;

1186:
1187: IF(l_lty_code = 'LINK_FEE_ASSET' AND
1188: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1189:
1190: l_raise_business_event := OKL_API.G_TRUE;
1191: l_business_event_name := G_WF_EVT_ASSET_FEE_CREATED;
1192: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID,l_parent_line_id,l_parameter_list);
1193:
1194: ELSIF(l_lty_code = 'LINK_SERV_ASSET' AND

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

1191: l_business_event_name := G_WF_EVT_ASSET_FEE_CREATED;
1192: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID,l_parent_line_id,l_parameter_list);
1193:
1194: ELSIF(l_lty_code = 'LINK_SERV_ASSET' AND
1195: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1196:
1197: l_raise_business_event := OKL_API.G_TRUE;
1198: l_business_event_name := G_WF_EVT_ASSET_SERV_FEE_CRTD;
1199: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID,l_parent_line_id,l_parameter_list);

Line 1197: l_raise_business_event := OKL_API.G_TRUE;

1193:
1194: ELSIF(l_lty_code = 'LINK_SERV_ASSET' AND
1195: okl_lla_util_pvt.is_lease_contract(p_cimv_rec.dnz_chr_id) = OKL_API.G_TRUE)THEN
1196:
1197: l_raise_business_event := OKL_API.G_TRUE;
1198: l_business_event_name := G_WF_EVT_ASSET_SERV_FEE_CRTD;
1199: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID,l_parent_line_id,l_parameter_list);
1200:
1201: END IF;

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

1199: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID,l_parent_line_id,l_parameter_list);
1200:
1201: END IF;
1202:
1203: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL)THEN
1204: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID,p_cimv_rec.dnz_chr_id,l_parameter_list);
1205: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID,p_cimv_rec.object1_id1,l_parameter_list);
1206:
1207: raise_business_event(p_api_version => p_api_version

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

1353: lr_cimv_rec_type_in);
1354:
1355: -- smereddy,09/08/2005,Bug#4378699
1356: IF (lr_cimv_rec_type_in.dnz_chr_id IS NOT NULL OR
1357: lr_cimv_rec_type_in.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
1358: l_dnz_chr_id := lr_cimv_rec_type_in.dnz_chr_id;
1359: ELSE
1360: FOR l_dnz_chr_id_rec IN l_dnz_chr_id_csr(p_cimv_rec.id)
1361: LOOP

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

1735:
1736: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
1737: -- edit points for lease contract are any modifications between statuses
1738: -- 'PASSED' and 'APPROVED'
1739: IF (x_cplv_rec.dnz_chr_id IS NOT NULL) AND (x_cplv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
1740:
1741: okl_contract_status_pub.cascade_lease_status_edit
1742: (p_api_version => p_api_version,
1743: p_init_msg_list => p_init_msg_list,

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

1757: /*
1758: -- mvasudev, 09/09/2004
1759: -- Code change to enable Business Event
1760: */
1761: IF (okl_lla_util_pvt.is_lease_contract(p_cplv_rec.dnz_chr_id) = OKL_API.G_TRUE) THEN
1762: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID,p_cplv_rec.dnz_chr_id,l_parameter_list);
1763: --vthiruva..04-jan-2004.. Modified to pass object1_id1 as party id and
1764: --added party_role_id to list of paramters passed to raise business event.
1765: wf_event.AddParameterToList(G_WF_ITM_PARTY_ID,p_cplv_rec.object1_id1,l_parameter_list);

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

1772: ,x_msg_data => x_msg_data
1773: ,p_event_name => G_WF_EVT_KHR_PARTY_CREATED
1774: ,p_event_param_list => l_parameter_list);
1775:
1776: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1777: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1778: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1779: RAISE OKL_API.G_EXCEPTION_ERROR;
1780: END IF;

Line 1777: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1773: ,p_event_name => G_WF_EVT_KHR_PARTY_CREATED
1774: ,p_event_param_list => l_parameter_list);
1775:
1776: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1777: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1778: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1779: RAISE OKL_API.G_EXCEPTION_ERROR;
1780: END IF;
1781: END IF;

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

1774: ,p_event_param_list => l_parameter_list);
1775:
1776: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1777: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1778: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1779: RAISE OKL_API.G_EXCEPTION_ERROR;
1780: END IF;
1781: END IF;
1782:

Line 1779: RAISE OKL_API.G_EXCEPTION_ERROR;

1775:
1776: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1777: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1778: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1779: RAISE OKL_API.G_EXCEPTION_ERROR;
1780: END IF;
1781: END IF;
1782:
1783: /*

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

1973: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
1974: -- edit points for lease contract are any modifications between statuses
1975: -- 'PASSED' and 'APPROVED'
1976: --output will not be created with null dnz_chr_id
1977: IF (x_cplv_rec.dnz_chr_id IS NOT NULL) AND (x_cplv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
1978:
1979: okl_contract_status_pub.cascade_lease_status_edit
1980: (p_api_version => p_api_version,
1981: p_init_msg_list => p_init_msg_list,

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

2125: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2126: -- edit points for lease contract are any modifications between statuses
2127: -- 'PASSED' and 'APPROVED'
2128:
2129: IF (p_cplv_rec.dnz_chr_id IS NULL) OR (p_cplv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN
2130: OPEN chr_id_crs(p_cpl_id => p_cplv_rec.id);
2131: FETCH chr_id_crs INTO l_dnz_chr_id;
2132: IF chr_id_crs%NOTFOUND THEN
2133: NULL; --this error should have been trapped earlier (party not attached to chr)

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

2136: ELSE
2137: l_dnz_chr_id := p_cplv_rec.dnz_chr_id;
2138: END IF;
2139:
2140: IF (l_dnz_chr_id IS NOT NULL AND l_dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2141:
2142: okl_contract_status_pub.cascade_lease_status_edit
2143: (p_api_version => p_api_version,
2144: p_init_msg_list => p_init_msg_list,

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

2358:
2359: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2360: -- edit points for lease contract are any modifications between statuses
2361: -- 'PASSED' and 'APPROVED'
2362: IF (x_ctcv_rec.dnz_chr_id IS NOT NULL) AND (x_ctcv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2363:
2364: okl_contract_status_pub.cascade_lease_status_edit
2365: (p_api_version => p_api_version,
2366: p_init_msg_list => p_init_msg_list,

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

2565:
2566: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2567: -- edit points for lease contract are any modifications between statuses
2568: -- 'PASSED' and 'APPROVED'
2569: IF (x_ctcv_rec.dnz_chr_id IS NOT NULL) AND (x_ctcv_rec.dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2570:
2571: okl_contract_status_pub.cascade_lease_status_edit
2572: (p_api_version => p_api_version,
2573: p_init_msg_list => p_init_msg_list,

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

2715: --code to flip status to 'INCOMPLETE' for lease contract if this is an edit point
2716: -- edit points for lease contract are any modifications between statuses
2717: -- 'PASSED' and 'APPROVED'
2718:
2719: IF (p_ctcv_rec.dnz_chr_id IS NULL) OR (p_ctcv_rec.dnz_chr_id = OKL_API.G_MISS_NUM) THEN
2720: OPEN chr_id_crs(p_ctc_id => p_ctcv_rec.id);
2721: FETCH chr_id_crs INTO l_dnz_chr_id;
2722: IF chr_id_crs%NOTFOUND THEN
2723: NULL; --this error should have been trapped earlier (party not attached to chr)

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

2726: ELSE
2727: l_dnz_chr_id := p_ctcv_rec.dnz_chr_id;
2728: END IF;
2729:
2730: IF (l_dnz_chr_id IS NOT NULL) AND (l_dnz_chr_id <> OKL_API.G_MISS_NUM) THEN
2731:
2732: okl_contract_status_pub.cascade_lease_status_edit
2733: (p_api_version => p_api_version,
2734: p_init_msg_list => p_init_msg_list,

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

4447:
4448: l_process_type VARCHAR2(20);
4449: l_request_id NUMBER := -1;
4450: l_parameter_list wf_parameter_list_t;
4451: l_raise_business_event VARCHAR2(1) := OKL_API.G_FALSE;
4452: l_business_event_name wf_events.name%TYPE;
4453:
4454: BEGIN
4455: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 4503: l_raise_business_event := OKL_API.G_TRUE;

4499: IF(l_process_type IS NOT NULL AND l_process_type = 'HEADER')THEN
4500: IF(l_rgpv_rec.rgd_code = 'LAAFLG')THEN
4501: -- raise business event for the Liens and Title for Terms and Conditions for the Contract
4502: -- set raise business event flag to true
4503: l_raise_business_event := OKL_API.G_TRUE;
4504: -- set the event name to be raised. this event name will vary for each rule group
4505: l_business_event_name := G_WF_EVT_CONTRACT_TERM_UPDATED;
4506: wf_event.AddParameterToList(G_WF_ITM_TERMS_ID, x_rgpv_rec.id, l_parameter_list);
4507: END IF;

Line 4512: l_raise_business_event := OKL_API.G_TRUE;

4508: ELSIF(l_process_type IS NOT NULL AND l_process_type = 'LINE')THEN
4509: IF(l_rgpv_rec.rgd_code = 'LAAFLG')THEN
4510: -- raise business event for Liens Title and Registration for the Assets
4511: -- set raise business event flag to true
4512: l_raise_business_event := OKL_API.G_TRUE;
4513: -- set the event name to be raised. this event name will vary for each rule group
4514: l_business_event_name := G_WF_EVT_ASSET_FILING_UPDATED;
4515: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID, l_rgpv_rec.cle_id, l_parameter_list);
4516: ELSIF(l_rgpv_rec.rgd_code = 'LAASTX')THEN

Line 4518: l_raise_business_event := OKL_API.G_TRUE;

4514: l_business_event_name := G_WF_EVT_ASSET_FILING_UPDATED;
4515: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID, l_rgpv_rec.cle_id, l_parameter_list);
4516: ELSIF(l_rgpv_rec.rgd_code = 'LAASTX')THEN
4517: -- raise business event for tax, property tax updated.
4518: l_raise_business_event := OKL_API.G_TRUE;
4519: l_business_event_name := G_WF_EVT_ASSET_PROPTAX_UPDATED;
4520: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID, l_rgpv_rec.cle_id, l_parameter_list);
4521: ELSIF(l_rgpv_rec.rgd_code = 'LAPSTH')THEN
4522: OPEN get_line_style(l_rgpv_rec.cle_id);

Line 4527: l_raise_business_event := OKL_API.G_TRUE;

4523: FETCH get_line_style INTO l_line_style;
4524: CLOSE get_line_style;
4525: -- raise business event for service line update passthru
4526: IF(l_line_style IS NOT NULL AND l_line_style = 'SOLD_SERVICE')THEN
4527: l_raise_business_event := OKL_API.G_TRUE;
4528: l_business_event_name := G_WF_EVT_SERV_PASS_UPDATED;
4529: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4530: -- check if the service line in context has a service contract associated with it
4531: -- if so, pass the service contract id and service contract line id as parameters

Line 4545: l_raise_business_event := OKL_API.G_TRUE;

4541: wf_event.AddParameterToList(G_WF_ITM_SERV_CLE_ID, l_service_top_line_id, l_parameter_list);
4542: END IF;
4543: -- raise the business event for update passthrough for Fee Line
4544: ELSIF(l_line_style IS NOT NULL AND l_line_style = 'FEE')THEN
4545: l_raise_business_event := OKL_API.G_TRUE;
4546: l_business_event_name := G_WF_EVT_FEE_PASS_UPDATED;
4547: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4548: END IF;
4549: ELSIF(l_rgpv_rec.rgd_code = 'LAFEXP')THEN

Line 4555: l_raise_business_event := OKL_API.G_TRUE;

4551: FETCH get_line_style INTO l_line_style;
4552: CLOSE get_line_style;
4553: -- raise business event for service line update expense
4554: IF(l_line_style IS NOT NULL AND l_line_style = 'SOLD_SERVICE')THEN
4555: l_raise_business_event := OKL_API.G_TRUE;
4556: l_business_event_name := G_WF_EVT_SERV_FEXP_UPDATED;
4557: wf_event.AddParameterToList(G_WF_ITM_SERV_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4558: -- check if the service line in context has a service contract associated with it
4559: -- if so, pass the service contract id and service contract line id as parameters

Line 4571: l_raise_business_event := OKL_API.G_TRUE;

4567: wf_event.AddParameterToList(G_WF_ITM_SERV_CHR_ID, l_serv_contract_id, l_parameter_list);
4568: wf_event.AddParameterToList(G_WF_ITM_SERV_CLE_ID, l_service_top_line_id, l_parameter_list);
4569: END IF;
4570: ELSIF(l_line_style IS NOT NULL AND l_line_style = 'FEE')THEN
4571: l_raise_business_event := OKL_API.G_TRUE;
4572: l_business_event_name := G_WF_EVT_FEE_EXP_UPDATED;
4573: wf_event.AddParameterToList(G_WF_ITM_FEE_LINE_ID, l_rgpv_rec.cle_id, l_parameter_list);
4574: END IF; -- end if for l_line_style is not null
4575: END IF; -- end if for rgd_code

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

4574: END IF; -- end if for l_line_style is not null
4575: END IF; -- end if for rgd_code
4576: END IF; -- end if for l_process_type
4577: -- check if the business event needs to be raised
4578: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL AND
4579: OKL_LLA_UTIL_PVT.is_lease_contract(l_rgpv_rec.dnz_chr_id)= OKL_API.G_TRUE)THEN
4580: -- since contract id is called as 'CONTRACT_ID' for all the above events, it is being
4581: -- added to the parameter list here, than duplicating it in all the above if conditions
4582: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID, l_rgpv_rec.dnz_chr_id, l_parameter_list);

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

4575: END IF; -- end if for rgd_code
4576: END IF; -- end if for l_process_type
4577: -- check if the business event needs to be raised
4578: IF(l_raise_business_event = OKL_API.G_TRUE AND l_business_event_name IS NOT NULL AND
4579: OKL_LLA_UTIL_PVT.is_lease_contract(l_rgpv_rec.dnz_chr_id)= OKL_API.G_TRUE)THEN
4580: -- since contract id is called as 'CONTRACT_ID' for all the above events, it is being
4581: -- added to the parameter list here, than duplicating it in all the above if conditions
4582: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID, l_rgpv_rec.dnz_chr_id, l_parameter_list);
4583: raise_business_event(p_api_version => p_api_version,

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

4587: x_msg_data => x_msg_data,
4588: p_event_name => l_business_event_name,
4589: p_event_param_list => l_parameter_list
4590: );
4591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4594: RAISE OKL_API.G_EXCEPTION_ERROR;
4595: END IF;

Line 4592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

4588: p_event_name => l_business_event_name,
4589: p_event_param_list => l_parameter_list
4590: );
4591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4594: RAISE OKL_API.G_EXCEPTION_ERROR;
4595: END IF;
4596: END IF;

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

4589: p_event_param_list => l_parameter_list
4590: );
4591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4594: RAISE OKL_API.G_EXCEPTION_ERROR;
4595: END IF;
4596: END IF;
4597:

Line 4594: RAISE OKL_API.G_EXCEPTION_ERROR;

4590: );
4591: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4592: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4593: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
4594: RAISE OKL_API.G_EXCEPTION_ERROR;
4595: END IF;
4596: END IF;
4597:
4598: END IF; -- end if for request id