713: x_msg_data => x_msg_data,
714: p_rgpv_rec => lp_rgpv_rec,
715: x_rgpv_rec => lx_rgpv_rec);
716:
717: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
720: raise OKC_API.G_EXCEPTION_ERROR;
721: End If;
714: p_rgpv_rec => lp_rgpv_rec,
715: x_rgpv_rec => lx_rgpv_rec);
716:
717: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
720: raise OKC_API.G_EXCEPTION_ERROR;
721: End If;
722:
715: x_rgpv_rec => lx_rgpv_rec);
716:
717: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
720: raise OKC_API.G_EXCEPTION_ERROR;
721: End If;
722:
723: l_rgpv_id := lx_rgpv_rec.id;
716:
717: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
720: raise OKC_API.G_EXCEPTION_ERROR;
721: End If;
722:
723: l_rgpv_id := lx_rgpv_rec.id;
724: END IF;
770: x_msg_data => x_msg_data,
771: p_rulv_rec => lp_rulv_rec,
772: x_rulv_rec => lx_rulv_rec);
773:
774: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
775: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
776: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
777: raise OKC_API.G_EXCEPTION_ERROR;
778: End If;
771: p_rulv_rec => lp_rulv_rec,
772: x_rulv_rec => lx_rulv_rec);
773:
774: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
775: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
776: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
777: raise OKC_API.G_EXCEPTION_ERROR;
778: End If;
779:
772: x_rulv_rec => lx_rulv_rec);
773:
774: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
775: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
776: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
777: raise OKC_API.G_EXCEPTION_ERROR;
778: End If;
779:
780: END LOOP;
773:
774: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
775: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
776: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
777: raise OKC_API.G_EXCEPTION_ERROR;
778: End If;
779:
780: END LOOP;
781: CLOSE c_chk_tpl2;
809: x_msg_data => x_msg_data,
810: p_rulv_rec => lp_rulv_rec,
811: x_rulv_rec => lx_rulv_rec);
812:
813: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
814: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
815: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
816: raise OKC_API.G_EXCEPTION_ERROR;
817: End If;
810: p_rulv_rec => lp_rulv_rec,
811: x_rulv_rec => lx_rulv_rec);
812:
813: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
814: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
815: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
816: raise OKC_API.G_EXCEPTION_ERROR;
817: End If;
818:
811: x_rulv_rec => lx_rulv_rec);
812:
813: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
814: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
815: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
816: raise OKC_API.G_EXCEPTION_ERROR;
817: End If;
818:
819: END LOOP;
812:
813: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
814: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
815: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
816: raise OKC_API.G_EXCEPTION_ERROR;
817: End If;
818:
819: END LOOP;
820: END IF;
1093: x_msg_count => x_msg_count,
1094: x_msg_data => x_msg_data,
1095: p_rulv_rec => ldel_rulv_rec);
1096:
1097: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1098: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1099: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1100: raise OKC_API.G_EXCEPTION_ERROR;
1101:
1094: x_msg_data => x_msg_data,
1095: p_rulv_rec => ldel_rulv_rec);
1096:
1097: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1098: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1099: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1100: raise OKC_API.G_EXCEPTION_ERROR;
1101:
1102: End If;
1095: p_rulv_rec => ldel_rulv_rec);
1096:
1097: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1098: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1099: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1100: raise OKC_API.G_EXCEPTION_ERROR;
1101:
1102: End If;
1103:
1096:
1097: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1098: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1099: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1100: raise OKC_API.G_EXCEPTION_ERROR;
1101:
1102: End If;
1103:
1104: END LOOP;
5645: x_msg_count => x_msg_count,
5646: x_msg_data => x_msg_data,
5647: p_fund_req_id => l_tapv_rec.id);
5648:
5649: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5650: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5651: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5652: raise OKC_API.G_EXCEPTION_ERROR;
5653: End If;
5646: x_msg_data => x_msg_data,
5647: p_fund_req_id => l_tapv_rec.id);
5648:
5649: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5650: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5651: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5652: raise OKC_API.G_EXCEPTION_ERROR;
5653: End If;
5654:
5647: p_fund_req_id => l_tapv_rec.id);
5648:
5649: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5650: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5651: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5652: raise OKC_API.G_EXCEPTION_ERROR;
5653: End If;
5654:
5655: l_tapv_rec.trx_status_code := 'APPROVED';
5648:
5649: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5650: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5651: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5652: raise OKC_API.G_EXCEPTION_ERROR;
5653: End If;
5654:
5655: l_tapv_rec.trx_status_code := 'APPROVED';
5656: l_tapv_rec.DATE_FUNDING_APPROVED := sysdate;
5721: x_msg_count => x_msg_count,
5722: x_msg_data => x_msg_data,
5723: p_fund_req_id => l_tapv_rec.id);
5724:
5725: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5726: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5727: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5728: raise OKC_API.G_EXCEPTION_ERROR;
5729: End If;
5722: x_msg_data => x_msg_data,
5723: p_fund_req_id => l_tapv_rec.id);
5724:
5725: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5726: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5727: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5728: raise OKC_API.G_EXCEPTION_ERROR;
5729: End If;
5730:
5723: p_fund_req_id => l_tapv_rec.id);
5724:
5725: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5726: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5727: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5728: raise OKC_API.G_EXCEPTION_ERROR;
5729: End If;
5730:
5731: OKL_FUNDING_WF.raise_approval_event(
5724:
5725: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
5726: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5727: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
5728: raise OKC_API.G_EXCEPTION_ERROR;
5729: End If;
5730:
5731: OKL_FUNDING_WF.raise_approval_event(
5732: p_api_version => p_api_version,
8801: ,x_lease_app_id OUT NOCOPY NUMBER
8802: ,x_credit_id OUT NOCOPY NUMBER
8803: ) IS
8804:
8805: l_lease_app_id number := OKC_API.G_MISS_NUM;
8806: l_lease_app_found boolean := FALSE;
8807: l_dummy number;
8808: l_lease_app_list_found boolean := FALSE;
8809: l_credit_id okc_k_headers_b.id%TYPE;
8806: l_lease_app_found boolean := FALSE;
8807: l_dummy number;
8808: l_lease_app_list_found boolean := FALSE;
8809: l_credit_id okc_k_headers_b.id%TYPE;
8810: l_funding_checklist_tpl okc_rules_b.rule_information2%TYPE := OKC_API.G_MISS_CHAR;
8811:
8812: --------------------------------------------------------------------------------------------
8813: -- Checklists link check
8814: --------------------------------------------------------------------------------------------
9033: x_msg_data => x_msg_data,
9034: p_rulv_tbl => lp_rulv_tbl,
9035: x_rulv_tbl => lx_rulv_tbl);
9036:
9037: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
9038: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
9039: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
9040: raise OKC_API.G_EXCEPTION_ERROR;
9041: End If;
9034: p_rulv_tbl => lp_rulv_tbl,
9035: x_rulv_tbl => lx_rulv_tbl);
9036:
9037: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
9038: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
9039: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
9040: raise OKC_API.G_EXCEPTION_ERROR;
9041: End If;
9042: END IF;
9035: x_rulv_tbl => lx_rulv_tbl);
9036:
9037: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
9038: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
9039: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
9040: raise OKC_API.G_EXCEPTION_ERROR;
9041: End If;
9042: END IF;
9043:
9036:
9037: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
9038: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
9039: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
9040: raise OKC_API.G_EXCEPTION_ERROR;
9041: End If;
9042: END IF;
9043:
9044: /*** End API body ******************************************************/