160: CLOSE c_get_gl_date;
161:
162: IF l_xcrv_rec.remittance_amount = 0 OR
163: l_xcrv_rec.remittance_amount IS NULL THEN
164: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: END IF;
167:
168: -- get IRM_ID, ILE_ID ...
161:
162: IF l_xcrv_rec.remittance_amount = 0 OR
163: l_xcrv_rec.remittance_amount IS NULL THEN
164: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: END IF;
167:
168: -- get IRM_ID, ILE_ID ...
169:
249: );
250:
251: x_return_status := l_return_status;
252:
253: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
256: RAISE OKL_API.G_EXCEPTION_ERROR;
257: END IF;
250:
251: x_return_status := l_return_status;
252:
253: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
256: RAISE OKL_API.G_EXCEPTION_ERROR;
257: END IF;
258:
251: x_return_status := l_return_status;
252:
253: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
256: RAISE OKL_API.G_EXCEPTION_ERROR;
257: END IF;
258:
259: END IF;
252:
253: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
256: RAISE OKL_API.G_EXCEPTION_ERROR;
257: END IF;
258:
259: END IF;
260:
338: );
339:
340: x_return_status := l_return_status;
341:
342: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
343: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
344: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
345: RAISE OKL_API.G_EXCEPTION_ERROR;
346: END IF;
339:
340: x_return_status := l_return_status;
341:
342: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
343: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
344: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
345: RAISE OKL_API.G_EXCEPTION_ERROR;
346: END IF;
347:
340: x_return_status := l_return_status;
341:
342: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
343: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
344: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
345: RAISE OKL_API.G_EXCEPTION_ERROR;
346: END IF;
347:
348: END IF;
341:
342: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
343: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
344: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
345: RAISE OKL_API.G_EXCEPTION_ERROR;
346: END IF;
347:
348: END IF;
349:
371: ,p_org_id => mo_global.get_current_org_id()
372: );
373:
374: x_return_status := l_return_status;
375: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
376: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
377: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
378: RAISE OKL_API.G_EXCEPTION_ERROR;
379: END IF;
372: );
373:
374: x_return_status := l_return_status;
375: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
376: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
377: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
378: RAISE OKL_API.G_EXCEPTION_ERROR;
379: END IF;
380:
373:
374: x_return_status := l_return_status;
375: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
376: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
377: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
378: RAISE OKL_API.G_EXCEPTION_ERROR;
379: END IF;
380:
381: END IF; -- ELSE LEAVE CASH AS UNAPPLIED.
374: x_return_status := l_return_status;
375: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
376: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
377: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
378: RAISE OKL_API.G_EXCEPTION_ERROR;
379: END IF;
380:
381: END IF; -- ELSE LEAVE CASH AS UNAPPLIED.
382:
404:
405: WHEN OTHERS THEN
406: NULL;
407: /* -- fix bug number 2439881
408: Okl_api.set_message( p_app_name => g_app_name
409: , p_msg_name => g_unexpected_error
410: , p_token1 => g_sqlcode_token
411: , p_token1_value => SQLCODE
412: , p_token2 => g_sqlerrm_token
521: ,p_org_id => l_rcpt_rec.org_id
522: );
523: x_return_status := l_return_status;
524:
525: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
528: RAISE OKL_API.G_EXCEPTION_ERROR;
529: END IF;
522: );
523: x_return_status := l_return_status;
524:
525: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
528: RAISE OKL_API.G_EXCEPTION_ERROR;
529: END IF;
530:
523: x_return_status := l_return_status;
524:
525: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
528: RAISE OKL_API.G_EXCEPTION_ERROR;
529: END IF;
530:
531: x_cash_receipt_id := l_cash_receipt_id;
524:
525: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
528: RAISE OKL_API.G_EXCEPTION_ERROR;
529: END IF;
530:
531: x_cash_receipt_id := l_cash_receipt_id;
532: x_return_status := l_return_status;
533: EXCEPTION
534:
535: WHEN G_EXCEPTION_HALT_VALIDATION THEN
536: ROLLBACK TO create_receipt;
537: x_return_status := OKL_API.G_RET_STS_ERROR;
538:
539: WHEN OKC_API.G_EXCEPTION_ERROR THEN
540: ROLLBACK TO create_receipt;
541: x_return_status := OKL_API.HANDLE_EXCEPTIONS
537: x_return_status := OKL_API.G_RET_STS_ERROR;
538:
539: WHEN OKC_API.G_EXCEPTION_ERROR THEN
540: ROLLBACK TO create_receipt;
541: x_return_status := OKL_API.HANDLE_EXCEPTIONS
542: (
543: l_api_name,
544: G_PKG_NAME,
545: 'OKC_API.G_RET_STS_ERROR',
764:
765:
766: IF l_xcrv_rec.remittance_amount = 0 OR
767: l_xcrv_rec.remittance_amount IS NULL THEN
768: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
770: END IF;
771:
772: -- get IRM_ID, ILE_ID ...
765:
766: IF l_xcrv_rec.remittance_amount = 0 OR
767: l_xcrv_rec.remittance_amount IS NULL THEN
768: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
769: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
770: END IF;
771:
772: -- get IRM_ID, ILE_ID ...
773:
888:
889:
890: x_return_status := l_return_status;
891:
892: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
893: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
894: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_ERROR;
896: END IF;
889:
890: x_return_status := l_return_status;
891:
892: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
893: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
894: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_ERROR;
896: END IF;
897:
890: x_return_status := l_return_status;
891:
892: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
893: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
894: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_ERROR;
896: END IF;
897:
898: END IF;
891:
892: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
893: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
894: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
895: RAISE OKL_API.G_EXCEPTION_ERROR;
896: END IF;
897:
898: END IF;
899:
964: );
965:
966: x_return_status := l_return_status;
967:
968: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
969: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
970: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
971: RAISE OKL_API.G_EXCEPTION_ERROR;
972: END IF;
965:
966: x_return_status := l_return_status;
967:
968: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
969: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
970: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
971: RAISE OKL_API.G_EXCEPTION_ERROR;
972: END IF;
973:
966: x_return_status := l_return_status;
967:
968: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
969: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
970: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
971: RAISE OKL_API.G_EXCEPTION_ERROR;
972: END IF;
973:
974: END IF;
967:
968: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
969: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
970: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
971: RAISE OKL_API.G_EXCEPTION_ERROR;
972: END IF;
973:
974: END IF;
975:
1003: ,p_org_id => mo_global.get_current_org_id()
1004: );
1005:
1006: x_return_status := l_return_status;
1007: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1008: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1009: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1010: RAISE OKL_API.G_EXCEPTION_ERROR;
1011: END IF;
1004: );
1005:
1006: x_return_status := l_return_status;
1007: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1008: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1009: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1010: RAISE OKL_API.G_EXCEPTION_ERROR;
1011: END IF;
1012:
1005:
1006: x_return_status := l_return_status;
1007: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1008: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1009: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1010: RAISE OKL_API.G_EXCEPTION_ERROR;
1011: END IF;
1012:
1013: END IF; -- ELSE LEAVE CASH AS UNAPPLIED.
1006: x_return_status := l_return_status;
1007: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1008: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1009: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1010: RAISE OKL_API.G_EXCEPTION_ERROR;
1011: END IF;
1012:
1013: END IF; -- ELSE LEAVE CASH AS UNAPPLIED.
1014:
1036:
1037: WHEN OTHERS THEN
1038: NULL;
1039: /* -- fix bug number 2439881
1040: Okl_api.set_message( p_app_name => g_app_name
1041: , p_msg_name => g_unexpected_error
1042: , p_token1 => g_sqlcode_token
1043: , p_token1_value => SQLCODE
1044: , p_token2 => g_sqlerrm_token