1 PACKAGE LNS_PAYOFF_PUB AS
2 /* $Header: LNS_PAYOFF_S.pls 120.0 2005/05/31 17:46:11 appldev noship $ */
3
4 /*========================================================================+
5 | Declare PUBLIC Data Types and Variables
6 +========================================================================*/
7
8 /*========================================================================+
9 | special rec_type for payoff
10 | billed flag ='Y' for existing invoices;
11 | billed flag = 'N' for invoices to be created
12 +========================================================================*/
13 TYPE INVOICE_DETAILS_REC IS RECORD(CUST_TRX_ID NUMBER
14 ,PAYMENT_SCHEDULE_ID NUMBER
15 ,INVOICE_NUMBER VARCHAR2(60)
16 ,INSTALLMENT_NUMBER NUMBER
17 ,TRANSACTION_TYPE VARCHAR2(20) --change this to translated type
18 ,REMAINING_AMOUNT NUMBER
19 ,DUE_DATE DATE
20 ,PURPOSE VARCHAR2(30)
21 ,BILLED_FLAG VARCHAR2(1));
22
23 TYPE INVOICE_DETAILS_TBL IS TABLE OF INVOICE_DETAILS_REC INDEX BY BINARY_INTEGER;
24
25 /*========================================================================+
26 | special rec_types for processPayoff
27 +========================================================================*/
28 TYPE CASH_RECEIPT_REC IS RECORD(CASH_RECEIPT_ID NUMBER
29 ,RECEIPT_AMOUNT NUMBER
30 ,RECEIPT_CURRENCY VARCHAR2(10)
31 ,EXCHANGE_RATE NUMBER
32 ,EXCHANGE_DATE DATE
33 ,EXCHANGE_RATE_TYPE VARCHAR2(30)
34 ,ORIGINAL_CURRENCY VARCHAR2(10)
35 ,RECEIPT_NUMBER VARCHAR2(30));
36
37 TYPE CASH_RECEIPT_TBL IS TABLE OF CASH_RECEIPT_REC INDEX BY BINARY_INTEGER;
38
39 --TYPE CUSTOMER_TRX_ID IS RECORD(CUSTOMER_TRX_ID NUMBER);
40
41 --TYPE CUSTOMER_TRX_TBL IS TABLE OF CUSTOMER_TRX_ID INDEX BY BINARY_INTEGER;
42
43 -- new payoffAPI
44 procedure processPayoff(p_api_version IN NUMBER
45 ,p_init_msg_list IN VARCHAR2
46 ,p_loan_id in number
47 ,p_payoff_date in date
48 ,p_cash_receipt_ids in LNS_PAYOFF_PUB.CASH_RECEIPT_TBL
49 ,x_return_status OUT NOCOPY VARCHAR2
50 ,x_msg_count OUT NOCOPY NUMBER
51 ,x_msg_data OUT NOCOPY VARCHAR2);
52
53 procedure getLoanInvoices(p_api_version IN NUMBER
54 ,p_init_msg_list IN VARCHAR2
55 ,p_loan_id in number
56 ,p_payoff_date in date
57 ,x_invoices_tbl OUT NOCOPY LNS_PAYOFF_PUB.INVOICE_DETAILS_TBL
58 ,x_return_status OUT NOCOPY VARCHAR2
59 ,x_msg_count OUT NOCOPY NUMBER
60 ,x_msg_data OUT NOCOPY VARCHAR2);
61
62 PROCEDURE APPLY_RECEIPT(P_CASH_RECEIPT_ID IN NUMBER
63 ,P_PAYMENT_SCHEDULE_ID IN NUMBER
64 ,P_APPLY_AMOUNT IN NUMBER
65 ,p_apply_date in DATE
66 ,p_apply_amount_from IN NUMBER
67 ,p_trans_to_receipt_rate IN NUMBER
68 ,x_return_status OUT NOCOPY VARCHAR2
69 ,x_msg_count OUT NOCOPY NUMBER
70 ,x_msg_data OUT NOCOPY VARCHAR2);
71
72
73 -- This function returns the receipt balance amount in loan currency
74 FUNCTION getConvertedReceiptAmount(p_receipt_id in number, p_loan_id in number) return NUMBER;
75
76 END LNS_PAYOFF_PUB;