DBA Data[Home] [Help]

APPS.OKL_LTE_INT_PVT dependencies on OKL_API

Line 24: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

20: ) IS
21:
22: l_api_version CONSTANT NUMBER := 1;
23: l_api_name CONSTANT VARCHAR2(30) := 'calculate_late_interest';
24: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
25: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
26: l_init_msg_list VARCHAR2(1) ;
27: l_msg_count NUMBER ;
28:

Line 25: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

21:
22: l_api_version CONSTANT NUMBER := 1;
23: l_api_name CONSTANT VARCHAR2(30) := 'calculate_late_interest';
24: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
25: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
26: l_init_msg_list VARCHAR2(1) ;
27: l_msg_count NUMBER ;
28:
29: l_amt_applied AR_RECEIVABLE_APPLICATIONS_ALL.AMOUNT_APPLIED%type;

Line 395: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

391:
392:
393:
394: BEGIN
395: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
396: G_PKG_NAME,
397: p_init_msg_list,
398: l_api_version,
399: p_api_version,

Line 404: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

400: '_PVT',
401: x_return_status);
402:
403:
404: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
406: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
407: RAISE OKL_API.G_EXCEPTION_ERROR;
408: END IF;

Line 405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

401: x_return_status);
402:
403:
404: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
406: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
407: RAISE OKL_API.G_EXCEPTION_ERROR;
408: END IF;
409:

Line 406: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

402:
403:
404: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
406: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
407: RAISE OKL_API.G_EXCEPTION_ERROR;
408: END IF;
409:
410: l_init_msg_list := p_init_msg_list ;

Line 407: RAISE OKL_API.G_EXCEPTION_ERROR;

403:
404: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
405: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
406: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
407: RAISE OKL_API.G_EXCEPTION_ERROR;
408: END IF;
409:
410: l_init_msg_list := p_init_msg_list ;
411:

Line 570: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

566: ELSE
567: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose LATE_INTEREST.');
568: END IF;
569:
570: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
573: RAISE Okl_Api.G_EXCEPTION_ERROR;
574: END IF;

Line 571: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

567: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose LATE_INTEREST.');
568: END IF;
569:
570: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
573: RAISE Okl_Api.G_EXCEPTION_ERROR;
574: END IF;
575: --check for stream

Line 572: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

568: END IF;
569:
570: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
573: RAISE Okl_Api.G_EXCEPTION_ERROR;
574: END IF;
575: --check for stream
576: l_stm_id := null;

Line 573: RAISE Okl_Api.G_EXCEPTION_ERROR;

569:
570: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
571: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
572: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
573: RAISE Okl_Api.G_EXCEPTION_ERROR;
574: END IF;
575: --check for stream
576: l_stm_id := null;
577: l_se_line_number := null;

Line 614: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

610:
611: l_stm_id := lx_stmv_rec.id;
612: l_se_line_number := 1;
613:
614: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
615: l_error_flag := TRUE;
616: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for LATE INTEREST');
617: ELSE
618: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for LATE INTEREST');

Line 658: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

654:
655: l_sel_id := lx_selv_rec.id;
656: l_sec_stream_id := lx_selv_rec.source_id;
657:
658: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
659: l_error_flag := TRUE;
660: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Stream Element for Contract: '
661: ||l_inv_cur.contract_number
662: ||' Stream Purpose: '||cns_late_interest

Line 696: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

692: ELSE
693: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
694: END IF;
695:
696: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
697: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
698: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
699: RAISE Okl_Api.G_EXCEPTION_ERROR;
700: END IF;

Line 697: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

693: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
694: END IF;
695:
696: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
697: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
698: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
699: RAISE Okl_Api.G_EXCEPTION_ERROR;
700: END IF;
701: --check for stream

Line 698: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

694: END IF;
695:
696: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
697: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
698: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
699: RAISE Okl_Api.G_EXCEPTION_ERROR;
700: END IF;
701: --check for stream
702: l_stm_id := null;

Line 699: RAISE Okl_Api.G_EXCEPTION_ERROR;

695:
696: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
697: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
698: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
699: RAISE Okl_Api.G_EXCEPTION_ERROR;
700: END IF;
701: --check for stream
702: l_stm_id := null;
703: l_se_line_number := null;

Line 745: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

741: l_stm_id := lx_stmv_rec.id;
742: l_se_line_number := 1;
743:
744: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
745: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
746: l_error_flag := TRUE;
747: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
748: ELSE
749: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');

Line 785: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

781: x_msg_data,
782: l_selv_rec,
783: lx_selv_rec);
784:
785: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
786: l_error_flag := TRUE;
787: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Payable Stream Element for Contract: '
788: ||l_inv_cur.contract_number
789: ||' Stream Purpose: '||cns_late_interest

Line 820: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN

816: ELSE
817: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
818: END IF;
819:
820: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
821: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
822: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
823: RAISE Okl_Api.G_EXCEPTION_ERROR;
824: END IF;

Line 821: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

817: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose INVESTOR_LATE_INTEREST_PAY.');
818: END IF;
819:
820: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
821: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
822: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
823: RAISE Okl_Api.G_EXCEPTION_ERROR;
824: END IF;
825: --check for stream

Line 822: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN

818: END IF;
819:
820: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
821: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
822: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
823: RAISE Okl_Api.G_EXCEPTION_ERROR;
824: END IF;
825: --check for stream
826: l_stm_id := null;

Line 823: RAISE Okl_Api.G_EXCEPTION_ERROR;

819:
820: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
821: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
822: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
823: RAISE Okl_Api.G_EXCEPTION_ERROR;
824: END IF;
825: --check for stream
826: l_stm_id := null;
827: l_se_line_number := null;

Line 869: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

865: l_stm_id := lx_stmv_rec.id;
866: l_se_line_number := 1;
867:
868: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream element line number => ' || l_se_line_number);
869: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
870: l_error_flag := TRUE;
871: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Stream for INVESTOR LATE INTEREST PAYABLE');
872: ELSE
873: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- SUCCESS: Creating Stream for INVESTOR LATE INTEREST PAYABLE');

Line 909: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

905: x_msg_data,
906: l_selv_rec,
907: lx_selv_rec);
908:
909: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
910: l_error_flag := TRUE;
911: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Error Creating Payable Stream Element for Contract: '
912: ||l_inv_cur.contract_number
913: ||' Stream Purpose: '||cns_late_interest

Line 1001: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

997: --dkagrawa bug# 4728636 changes end
998:
999:
1000: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End of Calculate Late Interest.');
1001: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);
1005: x_return_status := Okl_Api.HANDLE_EXCEPTIONS

Line 1003: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

999:
1000: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'End of Calculate Late Interest.');
1001: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);
1005: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
1006: (
1007: l_api_name,

Line 1005: x_return_status := Okl_Api.HANDLE_EXCEPTIONS

1001: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1002: EXCEPTION
1003: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);
1005: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
1006: (
1007: l_api_name,
1008: G_PKG_NAME,
1009: 'Okl_Api.G_RET_STS_ERROR',

Line 1009: 'Okl_Api.G_RET_STS_ERROR',

1005: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
1006: (
1007: l_api_name,
1008: G_PKG_NAME,
1009: 'Okl_Api.G_RET_STS_ERROR',
1010: x_msg_count,
1011: x_msg_data,
1012: '_PVT'
1013: );

Line 1014: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN

1010: x_msg_count,
1011: x_msg_data,
1012: '_PVT'
1013: );
1014: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
1015: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (UNEXCP) => '||SQLERRM);
1016: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS
1017: (
1018: l_api_name,

Line 1016: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS

1012: '_PVT'
1013: );
1014: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
1015: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (UNEXCP) => '||SQLERRM);
1016: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS
1017: (
1018: l_api_name,
1019: G_PKG_NAME,
1020: 'Okl_Api.G_RET_STS_UNEXP_ERROR',

Line 1020: 'Okl_Api.G_RET_STS_UNEXP_ERROR',

1016: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS
1017: (
1018: l_api_name,
1019: G_PKG_NAME,
1020: 'Okl_Api.G_RET_STS_UNEXP_ERROR',
1021: x_msg_count,
1022: x_msg_data,
1023: '_PVT'
1024: );

Line 1027: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS

1023: '_PVT'
1024: );
1025: WHEN OTHERS THEN
1026: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (Others) => '||SQLERRM);
1027: x_return_status :=Okl_Api.HANDLE_EXCEPTIONS
1028: (
1029: l_api_name,
1030: G_PKG_NAME,
1031: 'OTHERS',