DBA Data[Home] [Help]

APPS.LNS_FUNDING_PUB dependencies on LNS_DISB_HEADERS

Line 132: WHEN ((select nvl(max(DISBURSEMENT_NUMBER), 0) + 1 from lns_disb_headers

128: WHEN (head.status = 'CANCELLED') THEN
129: 'N'
130: WHEN (head.status is null) THEN
131: CASE
132: WHEN ((select nvl(max(DISBURSEMENT_NUMBER), 0) + 1 from lns_disb_headers
133: where loan_id = head.loan_id and status = 'FULLY_FUNDED') = head.DISBURSEMENT_NUMBER) THEN
134: 'Y'
135: ELSE
136: 'N'

Line 143: from lns_disb_headers head,

139: -- END
140: ELSE
141: 'N'
142: END
143: from lns_disb_headers head,
144: lns_loan_headers loan
145: where head.DISB_HEADER_ID = P_DISB_HEADER_ID and
146: head.LOAN_ID = loan.LOAN_ID;
147:

Line 207: WHEN ((select nvl(count(1), 0) from lns_disb_lines line, lns_disb_headers head

203: (nvl(loan.CURRENT_PHASE, 'TERM') = 'TERM' and
204: loan.MULTIPLE_FUNDING_FLAG = 'N' and loan.LOAN_STATUS = 'APPROVED'))
205: THEN
206: CASE
207: WHEN ((select nvl(count(1), 0) from lns_disb_lines line, lns_disb_headers head
208: where head.loan_id = loan.LOAN_ID and head.disb_header_id = line.disb_header_id and
209: (line.status is null or line.status = 'FUNDING_ERROR' or line.status = 'IN_FUNDING')) > 0) THEN
210: 'Y'
211: ELSE

Line 293: from lns_disb_headers head,

289: END
290: ELSE
291: 'Y'
292: END
293: from lns_disb_headers head,
294: lns_loan_headers_all loan
295: where head.DISB_HEADER_ID = P_DISB_HEADER_ID and
296: head.loan_id = loan.loan_id;
297:

Line 367: lns_disb_headers head,

363: 'N'
364: END
365: END
366: from lns_disb_lines line,
367: lns_disb_headers head,
368: lns_loan_headers_all loan
369: where line.DISB_LINE_ID = P_DISB_LINE_ID and
370: line.disb_header_id = head.disb_header_id and
371: head.loan_id = loan.loan_id;

Line 428: WHEN ((select max(DISBURSEMENT_NUMBER) from lns_disb_headers where loan_id = loan.loan_id) = head.DISBURSEMENT_NUMBER) THEN

424: select
425: CASE
426: WHEN (loan.current_phase = 'OPEN' and loan.OPEN_TO_TERM_FLAG = 'Y' and loan.OPEN_TO_TERM_EVENT = 'AUTO_FINAL_DISBURSEMENT') THEN
427: CASE
428: WHEN ((select max(DISBURSEMENT_NUMBER) from lns_disb_headers where loan_id = loan.loan_id) = head.DISBURSEMENT_NUMBER) THEN
429: 'Y'
430: ELSE
431: 'N'
432: END

Line 436: from lns_disb_headers head,

432: END
433: ELSE
434: 'N'
435: END
436: from lns_disb_headers head,
437: lns_loan_headers_all loan
438: where head.DISB_HEADER_ID = P_DISB_HEADER_ID and
439: head.loan_id = loan.loan_id;
440:

Line 470: | P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC

466: | P_API_VERSION IN Standard in parameter
467: | P_INIT_MSG_LIST IN Standard in parameter
468: | P_COMMIT IN Standard in parameter
469: | P_VALIDATION_LEVEL IN Standard in parameter
470: | P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC
471: | X_RETURN_STATUS OUT NOCOPY Standard out parameter
472: | X_MSG_COUNT OUT NOCOPY Standard out parameter
473: | X_MSG_DATA OUT NOCOPY Standard out parameter
474: |

Line 492: P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC,

488: P_API_VERSION IN NUMBER,
489: P_INIT_MSG_LIST IN VARCHAR2,
490: P_COMMIT IN VARCHAR2,
491: P_VALIDATION_LEVEL IN NUMBER,
492: P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC,
493: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
494: X_MSG_COUNT OUT NOCOPY NUMBER,
495: X_MSG_DATA OUT NOCOPY VARCHAR2)
496: IS

Line 578: from lns_disb_headers

574: l_disb_number := P_DISB_HEADER_REC.DISBURSEMENT_NUMBER;
575: if P_DISB_HEADER_REC.DISBURSEMENT_NUMBER is null then
576:
577: select nvl(max(disbursement_number),0)+1 into l_disb_number
578: from lns_disb_headers
579: where loan_id = P_DISB_HEADER_REC.LOAN_ID and phase = l_phase;
580:
581: end if;
582:

Line 584: LNS_DISB_HEADERS_PKG.Insert_Row(

580:
581: end if;
582:
583: -- calling table handler api
584: LNS_DISB_HEADERS_PKG.Insert_Row(
585: X_DISB_HEADER_ID => l_pk_id,
586: P_LOAN_ID => P_DISB_HEADER_REC.LOAN_ID,
587: P_ACTIVITY_CODE => P_DISB_HEADER_REC.ACTIVITY_CODE,
588: P_DISBURSEMENT_NUMBER => l_disb_number,

Line 661: | P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC

657: | P_API_VERSION IN Standard in parameter
658: | P_INIT_MSG_LIST IN Standard in parameter
659: | P_COMMIT IN Standard in parameter
660: | P_VALIDATION_LEVEL IN Standard in parameter
661: | P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC
662: | X_RETURN_STATUS OUT NOCOPY Standard out parameter
663: | X_MSG_COUNT OUT NOCOPY Standard out parameter
664: | X_MSG_DATA OUT NOCOPY Standard out parameter
665: |

Line 683: P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC,

679: P_API_VERSION IN NUMBER,
680: P_INIT_MSG_LIST IN VARCHAR2,
681: P_COMMIT IN VARCHAR2,
682: P_VALIDATION_LEVEL IN NUMBER,
683: P_DISB_HEADER_REC IN LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC,
684: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
685: X_MSG_COUNT OUT NOCOPY NUMBER,
686: X_MSG_DATA OUT NOCOPY VARCHAR2)
687: IS

Line 707: from lns_disb_headers

703:
704: -- getting disbursement header info from db
705: CURSOR disb_head_cur(P_DISB_HEADER_ID number) IS
706: select OBJECT_VERSION_NUMBER
707: from lns_disb_headers
708: where disb_header_id = P_DISB_HEADER_ID;
709: -- FOR UPDATE OF disb_header_id NOWAIT;
710:
711: BEGIN

Line 786: FND_MESSAGE.SET_TOKEN('TABLE', 'LNS_DISB_HEADERS');

782: if l_disb_header_version <> P_DISB_HEADER_REC.OBJECT_VERSION_NUMBER then
783:
784: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Disbursement header record has already been changed');
785: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_RECORD_CHANGED');
786: FND_MESSAGE.SET_TOKEN('TABLE', 'LNS_DISB_HEADERS');
787: FND_MSG_PUB.ADD;
788: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
789: RAISE FND_API.G_EXC_ERROR;
790:

Line 796: LNS_DISB_HEADERS_PKG.Update_Row(

792:
793: l_disb_header_version := nvl(l_disb_header_version, 1) + 1;
794:
795: -- calling table handler api
796: LNS_DISB_HEADERS_PKG.Update_Row(
797: P_DISB_HEADER_ID => P_DISB_HEADER_REC.DISB_HEADER_ID,
798: P_LOAN_ID => P_DISB_HEADER_REC.LOAN_ID,
799: P_ACTIVITY_CODE => P_DISB_HEADER_REC.ACTIVITY_CODE,
800: P_DISBURSEMENT_NUMBER => P_DISB_HEADER_REC.DISBURSEMENT_NUMBER,

Line 918: from lns_disb_headers

914:
915: -- getting disbursement header info from db
916: CURSOR disb_head_cur(P_DISB_HEADER_ID number) IS
917: select status
918: from lns_disb_headers
919: where disb_header_id = P_DISB_HEADER_ID;
920:
921: -- getting disbursement lines
922: CURSOR disb_line_cur(P_DISB_HEADER_ID number) IS

Line 1027: LNS_DISB_HEADERS_PKG.Delete_Row(P_DISB_HEADER_ID);

1023:
1024: delete from lns_distributions where disb_header_id = P_DISB_HEADER_ID;
1025:
1026: -- calling table handler api
1027: LNS_DISB_HEADERS_PKG.Delete_Row(P_DISB_HEADER_ID);
1028:
1029: if P_COMMIT = FND_API.G_TRUE then
1030: COMMIT WORK;
1031: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');

Line 1555: from lns_disb_headers hdr,

1551:
1552: -- getting disbursement header and line info from db
1553: CURSOR disb_head_cur(P_DISB_LINE_ID number) IS
1554: select hdr.status
1555: from lns_disb_headers hdr,
1556: lns_disb_lines ln
1557: where hdr.disb_header_id = ln.disb_header_id and
1558: ln.disb_line_id = P_DISB_LINE_ID;
1559:

Line 1733: LNS_DISB_HEADERS head,

1729: CURSOR payees_cur(P_DISB_HEADER_ID number) IS
1730: select line.PAYEE_PARTY_ID,
1731: loan.org_id
1732: from LNS_DISB_LINES line,
1733: LNS_DISB_HEADERS head,
1734: LNS_LOAN_HEADERS_ALL loan
1735: where head.DISB_HEADER_ID = P_DISB_HEADER_ID and
1736: head.DISB_HEADER_ID = line.DISB_HEADER_ID and
1737: head.loan_id = loan.loan_id and not exists

Line 1900: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

1896: l_party_site_id number;
1897: l_due_date date;
1898: l_current_phase varchar2(30);
1899:
1900: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
1901: l_DISB_LINE_REC LNS_FUNDING_PUB.LNS_DISB_LINES_REC;
1902:
1903: /*-----------------------------------------------------------------------+
1904: | Cursor Declarations |

Line 1928: from LNS_DISB_HEADERS head,

1924: head.STATUS,
1925: head.TARGET_DATE,
1926: decode(nvl(loan.CURRENT_PHASE, 'TERM'), 'TERM', loan.LOAN_START_DATE, loan.OPEN_LOAN_START_DATE),
1927: loan.OPEN_MATURITY_DATE
1928: from LNS_DISB_HEADERS head,
1929: LNS_LOAN_HEADERS_ALL loan
1930: where loan.LOAN_ID = P_LOAN_ID and
1931: head.LOAN_ID = loan.LOAN_ID
1932: order by head.DISBURSEMENT_NUMBER;

Line 1947: LNS_DISB_HEADERS head

1943: line.PAYMENT_METHOD_CODE,
1944: line.REQUEST_DATE,
1945: nvl(head.PAYMENT_REQUEST_DATE, head.TARGET_DATE)
1946: from LNS_DISB_LINES line,
1947: LNS_DISB_HEADERS head
1948: where line.DISB_HEADER_ID = P_DISB_HEADER_ID and
1949: line.DISB_HEADER_ID = head.DISB_HEADER_ID
1950: order by line.DISB_LINE_NUMBER;
1951:

Line 2363: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

2359: l_msg_data VARCHAR2(32767);
2360: l_no_pay_mtd_count NUMBER;
2361: l_open_start_date DATE;
2362:
2363: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
2364:
2365: /*-----------------------------------------------------------------------+
2366: | Cursor Declarations |
2367: +-----------------------------------------------------------------------*/

Line 2381: from LNS_DISB_HEADERS head,

2377: head.phase,
2378: decode(loan.current_phase, 'OPEN', loan.OPEN_LOAN_START_DATE, loan.LOAN_START_DATE),
2379: (select count(1) from lns_disb_lines where disb_header_id = head.DISB_HEADER_ID and
2380: PAYMENT_METHOD_CODE is null)
2381: from LNS_DISB_HEADERS head,
2382: LNS_LOAN_HEADERS_ALL loan
2383: where head.DISB_HEADER_ID = P_DISB_HEADER_ID and
2384: head.LOAN_ID = loan.LOAN_ID and
2385: nvl(loan.current_phase, 'TERM') = nvl(head.phase, 'OPEN');

Line 2628: LNS_DISB_HEADERS head,

2624: loan.ORG_ID,
2625: loan.LEGAL_ENTITY_ID,
2626: nvl(head.PAYMENT_REQUEST_DATE, head.TARGET_DATE)
2627: from LNS_DISB_LINES line,
2628: LNS_DISB_HEADERS head,
2629: LNS_LOAN_HEADERS_ALL loan
2630: where line.DISB_HEADER_ID = P_DISB_HEADER_ID and
2631: line.DISB_HEADER_ID = head.DISB_HEADER_ID and
2632: head.LOAN_ID = loan.LOAN_ID

Line 2954: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

2950: l_loan_maturity_date date;
2951: l_loan_status varchar2(30);
2952: l_move_maturity_date number;
2953:
2954: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
2955: TYPE DISB_HEADERS_TBL IS TABLE OF LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC INDEX BY BINARY_INTEGER;
2956: l_DISB_HEADERS_TBL DISB_HEADERS_TBL;
2957:
2958: /*-----------------------------------------------------------------------+

Line 2955: TYPE DISB_HEADERS_TBL IS TABLE OF LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC INDEX BY BINARY_INTEGER;

2951: l_loan_status varchar2(30);
2952: l_move_maturity_date number;
2953:
2954: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
2955: TYPE DISB_HEADERS_TBL IS TABLE OF LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC INDEX BY BINARY_INTEGER;
2956: l_DISB_HEADERS_TBL DISB_HEADERS_TBL;
2957:
2958: /*-----------------------------------------------------------------------+
2959: | Cursor Declarations |

Line 2982: from LNS_DISB_HEADERS head,

2978: loan.loan_status,
2979: head.payment_request_date,
2980: head.phase,
2981: head.description
2982: from LNS_DISB_HEADERS head,
2983: LNS_LOAN_HEADERS_ALL loan
2984: where loan.LOAN_ID = P_LOAN_ID and
2985: head.LOAN_ID = loan.LOAN_ID and
2986: nvl(loan.current_phase, 'TERM') = nvl(head.phase, 'OPEN')

Line 2994: (select trunc(max(PAYMENT_REQUEST_DATE)) from LNS_DISB_HEADERS where LOAN_ID = loan.LOAN_ID))

2990: select
2991: CASE
2992: WHEN (nvl(loan.CURRENT_PHASE, 'TERM') = 'OPEN') THEN
2993: sign(trunc(loan.OPEN_MATURITY_DATE) -
2994: (select trunc(max(PAYMENT_REQUEST_DATE)) from LNS_DISB_HEADERS where LOAN_ID = loan.LOAN_ID))
2995: WHEN (nvl(loan.CURRENT_PHASE, 'TERM') = 'TERM' and loan.MULTIPLE_FUNDING_FLAG = 'N') THEN
2996: sign(trunc(loan.LOAN_MATURITY_DATE) -
2997: (select trunc(max(PAYMENT_REQUEST_DATE)) from LNS_DISB_HEADERS where LOAN_ID = loan.LOAN_ID))
2998: ELSE

Line 2997: (select trunc(max(PAYMENT_REQUEST_DATE)) from LNS_DISB_HEADERS where LOAN_ID = loan.LOAN_ID))

2993: sign(trunc(loan.OPEN_MATURITY_DATE) -
2994: (select trunc(max(PAYMENT_REQUEST_DATE)) from LNS_DISB_HEADERS where LOAN_ID = loan.LOAN_ID))
2995: WHEN (nvl(loan.CURRENT_PHASE, 'TERM') = 'TERM' and loan.MULTIPLE_FUNDING_FLAG = 'N') THEN
2996: sign(trunc(loan.LOAN_MATURITY_DATE) -
2997: (select trunc(max(PAYMENT_REQUEST_DATE)) from LNS_DISB_HEADERS where LOAN_ID = loan.LOAN_ID))
2998: ELSE
2999: 1
3000: END
3001: from lns_loan_headers_all loan

Line 3636: FOR Disb_Rec in (SELECT lns_disb_headers_s.NEXTVAL disb_header_id

3632: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_precision: ' || l_precision);
3633:
3634: l_total_disb_percent := 0;
3635: l_total_disb_amount := 0;
3636: FOR Disb_Rec in (SELECT lns_disb_headers_s.NEXTVAL disb_header_id
3637: , loan_product_lines_id
3638: , activity_code
3639: , disb_percent
3640: , sequence_number

Line 3651: from lns_disb_headers ldh

3647: AND lpl.LOAN_PRODUCT_LINE_TYPE = 'DISBURSEMENT'
3648: AND SYSDATE BETWEEN NVL(lpl.start_date_active,SYSDATE)
3649: AND NVL(lpl.end_date_active,SYSDATE)
3650: AND NOT EXISTS (select 1
3651: from lns_disb_headers ldh
3652: where ldh.loan_id = llh.loan_id)) LOOP
3653:
3654: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Creating default disbursement');
3655:

Line 3666: LNS_DISB_HEADERS_PKG.Insert_Row(

3662: l_total_disb_amount := l_total_disb_amount + l_disb_amount;
3663: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_disb_amount: ' || l_disb_amount);
3664:
3665: -- Default Product Disbursements
3666: LNS_DISB_HEADERS_PKG.Insert_Row(
3667: X_DISB_HEADER_ID => Disb_Rec.disb_header_id,
3668: P_LOAN_ID => p_loan_id,
3669: P_ACTIVITY_CODE => Disb_Rec.activity_code,
3670: P_DISBURSEMENT_NUMBER => Disb_Rec.sequence_number,

Line 3773: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

3769: l_api_version CONSTANT NUMBER := 1.0;
3770: l_return_status VARCHAR2(1);
3771: l_msg_count NUMBER;
3772: l_msg_data VARCHAR2(32767);
3773: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
3774: l_DISB_LINE_REC LNS_FUNDING_PUB.LNS_DISB_LINES_REC;
3775:
3776: TYPE DISB_LINES_TBL IS TABLE OF LNS_FUNDING_PUB.LNS_DISB_LINES_REC INDEX BY BINARY_INTEGER;
3777: l_DISB_LINES_TBL DISB_LINES_TBL;

Line 3866: LNS_DISB_HEADERS head,

3862: line.PARTY_SITE_ID,
3863: line.INCOME_TAX_REGION,
3864: line.TYPE_1099
3865: from LNS_DISB_LINES line,
3866: LNS_DISB_HEADERS head,
3867: lns_lookups lkp,
3868: LNS_LOAN_HEADERS_ALL loan
3869: where line.DISB_LINE_ID = P_DISB_LINE_ID and
3870: head.DISB_HEADER_ID = line.DISB_HEADER_ID and

Line 4937: LNS_DISB_HEADERS head

4933: CURSOR disb_headers_cur(P_LOAN_ID number) IS
4934: select head.DISB_HEADER_ID,
4935: nvl(head.AUTOFUNDING_FLAG, 'N')
4936: from LNS_LOAN_HEADERS_ALL loan,
4937: LNS_DISB_HEADERS head
4938: where loan.LOAN_ID = P_LOAN_ID and
4939: loan.loan_id = head.loan_id and
4940: head.DISBURSEMENT_NUMBER = 1 and
4941: nvl(loan.CURRENT_PHASE, 'TERM') = nvl(head.PHASE, 'OPEN');

Line 5084: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

5080: l_api_version CONSTANT NUMBER := 1.0;
5081: l_return_status VARCHAR2(1);
5082: l_msg_count NUMBER;
5083: l_msg_data VARCHAR2(32767);
5084: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
5085: l_DISB_LINE_REC LNS_FUNDING_PUB.LNS_DISB_LINES_REC;
5086:
5087: TYPE DISB_LINES_TBL IS TABLE OF LNS_FUNDING_PUB.LNS_DISB_LINES_REC INDEX BY BINARY_INTEGER;
5088: l_DISB_LINES_TBL DISB_LINES_TBL;

Line 5135: LNS_DISB_HEADERS head

5131: loan.LOAN_STATUS,
5132: head.DISBURSEMENT_NUMBER,
5133: nvl(loan.FUNDS_RESERVED_FLAG,'N')
5134: from LNS_LOAN_HEADERS_ALL loan,
5135: LNS_DISB_HEADERS head
5136: where head.DISB_HEADER_ID = P_DISB_HEADER_ID and
5137: head.LOAN_ID = loan.LOAN_ID;
5138:
5139: -- checking for conditions

Line 5503: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

5499: l_last_api_called varchar2(500);
5500: l_agreement_reason varchar2(500);
5501:
5502: l_DISB_LINE_REC LNS_FUNDING_PUB.LNS_DISB_LINES_REC;
5503: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
5504: l_loan_header_rec LNS_LOAN_HEADER_PUB.loan_header_rec_type;
5505: l_term_rec LNS_TERMS_PUB.loan_term_rec_type;
5506: l_loan_details LNS_FINANCIALS.LOAN_DETAILS_REC;
5507: l_event_table lns_distributions_pub.acc_event_tbl;

Line 5518: TYPE lns_disb_hdr_id_type IS TABLE OF LNS_DISB_HEADERS.DISB_HEADER_ID%TYPE INDEX BY PLS_INTEGER;

5514: l_currency varchar2(15);
5515: l_disb_desc varchar2(80);
5516: l_installment_number number;
5517:
5518: TYPE lns_disb_hdr_id_type IS TABLE OF LNS_DISB_HEADERS.DISB_HEADER_ID%TYPE INDEX BY PLS_INTEGER;
5519: l_disb_hdr_id_tbl lns_disb_hdr_id_type;
5520: l_fee_basis_tbl LNS_FEE_ENGINE.FEE_BASIS_TBL;
5521: l_fee_structures LNS_FEE_ENGINE.FEE_STRUCTURE_TBL;
5522: l_fees_tbl LNS_FEE_ENGINE.FEE_CALC_TBL;

Line 5551: LNS_DISB_HEADERS head,

5547: head.phase,
5548: loan.LOAN_CURRENCY,
5549: decode(head.ACTIVITY_CODE, null, head.DESCRIPTION, lns_utility_pub.get_lookup_meaning('DISB_ACTIVITY', head.ACTIVITY_CODE))
5550: from LNS_DISB_LINES lines,
5551: LNS_DISB_HEADERS head,
5552: LNS_LOAN_HEADERS loan
5553: where lines.INVOICE_ID = P_INVOICE_ID and
5554: lines.DISB_HEADER_ID = head.DISB_HEADER_ID and
5555: lines.status is not null and lines.status <> 'FULLY_FUNDED' and

Line 5577: LNS_DISB_HEADERS head,

5573: -- getting sum of all disbursed amount for this loan from ap_invoices_all - real situation
5574: CURSOR disb_amount_cur(P_LOAN_ID number) IS
5575: select nvl(sum(inv.amount_paid), 0)
5576: from LNS_DISB_LINES lines,
5577: LNS_DISB_HEADERS head,
5578: ap_invoices_all inv,
5579: lns_loan_headers_all loan
5580: where head.LOAN_ID = P_LOAN_ID and
5581: head.loan_id = loan.loan_id and

Line 5591: LNS_DISB_HEADERS head

5587: -- getting sum of all disbursed amount for this loan from lns_disb_lines - testing
5588: CURSOR disb_amount_cur1(P_LOAN_ID number) IS
5589: select nvl(sum(lines.LINE_AMOUNT), 0)
5590: from LNS_DISB_LINES lines,
5591: LNS_DISB_HEADERS head
5592: where head.LOAN_ID = P_LOAN_ID and
5593: lines.DISB_HEADER_ID = head.DISB_HEADER_ID and
5594: (lines.STATUS is not null and lines.STATUS = 'FULLY_FUNDED') and
5595: lines.DISBURSEMENT_DATE is not null;

Line 5639: from lns_disb_headers dh

5635: INVOICE_ID = P_INVOICE_ID;
5636: /*
5637: CURSOR c_disb_hdr_id(c_disb_hdr_id NUMBER) IS
5638: select dh.disb_header_id
5639: from lns_disb_headers dh
5640: where dh.loan_id = l_loan_header_rec.loan_id
5641: and dh.disb_header_id >= c_disb_hdr_id;
5642: */
5643: CURSOR get_instal_num(p_loan_id number, p_disb_header_id NUMBER) IS

Line 6665: LNS_DISB_HEADERS head

6661: -- getting all available disbursements
6662: CURSOR avail_disb_cur(P_LOAN_ID number) IS
6663: select line.INVOICE_ID
6664: from LNS_DISB_LINES line,
6665: LNS_DISB_HEADERS head
6666: where head.LOAN_ID = P_LOAN_ID and
6667: head.DISB_HEADER_ID = line.DISB_HEADER_ID and
6668: line.status is not null and
6669: line.status = 'IN_FUNDING' and

Line 6830: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

6826: l_success boolean;
6827: l_success_str varchar2(10);
6828:
6829: l_DISB_LINE_REC LNS_FUNDING_PUB.LNS_DISB_LINES_REC;
6830: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
6831: l_cancel_fed_disb varchar2(1);
6832: l_dist_count NUMBER;
6833:
6834: /*-----------------------------------------------------------------------+

Line 6847: from LNS_DISB_HEADERS head

6843: from lns_disb_lines
6844: where DISB_HEADER_ID = head.DISB_HEADER_ID and
6845: status <> 'CANCELLED'),
6846: head.LOAN_ID
6847: from LNS_DISB_HEADERS head
6848: where head.DISB_HEADER_ID = P_DISB_HEADER_ID;
6849:
6850: -- getting disbursement lines info
6851: CURSOR disb_lines_cur(P_DISB_HEADER_ID number) IS

Line 7205: from LNS_DISB_HEADERS head,

7201: CURSOR avail_disb_cur(P_LOAN_ID number) IS
7202: select head.DISB_HEADER_ID,
7203: loan.LOAN_STATUS,
7204: loan.OBJECT_VERSION_NUMBER
7205: from LNS_DISB_HEADERS head,
7206: LNS_LOAN_HEADERS loan
7207: where head.LOAN_ID = P_LOAN_ID and
7208: head.LOAN_ID = loan.LOAN_ID and
7209: nvl(loan.current_phase, 'TERM') = nvl(head.phase, 'OPEN');

Line 7214: from LNS_DISB_HEADERS head,

7210:
7211: -- getting number of already submitted disbursements
7212: CURSOR submitted_disb_cur(P_LOAN_ID number) IS
7213: select count(head.DISB_HEADER_ID)
7214: from LNS_DISB_HEADERS head,
7215: LNS_LOAN_HEADERS loan
7216: where head.LOAN_ID = P_LOAN_ID and
7217: head.status <> 'CANCELLED' and
7218: head.LOAN_ID = loan.LOAN_ID and

Line 8270: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

8266: l_DISB_HEADER_ID NUMBER;
8267: l_OBJECT_VERSION_NUMBER NUMBER;
8268: l_cond_count number;
8269:
8270: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
8271:
8272: /*-----------------------------------------------------------------------+
8273: | Cursor Declarations |
8274: +-----------------------------------------------------------------------*/

Line 8281: from LNS_DISB_HEADERS head,

8277: CURSOR disb_headers_cur(P_LOAN_ID number) IS
8278: select
8279: head.DISB_HEADER_ID,
8280: head.OBJECT_VERSION_NUMBER
8281: from LNS_DISB_HEADERS head,
8282: LNS_LOAN_HEADERS_ALL loan
8283: where loan.LOAN_ID = P_LOAN_ID and
8284: head.LOAN_ID = loan.LOAN_ID and
8285: head.DISBURSEMENT_NUMBER = 1 and

Line 8432: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully updated record into LNS_DISB_HEADERS');

8428: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Call to UPDATE_DISB_HEADER failed');
8429: RAISE FND_API.G_EXC_ERROR;
8430: END IF;
8431:
8432: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully updated record into LNS_DISB_HEADERS');
8433:
8434: if P_COMMIT = FND_API.G_TRUE then
8435: COMMIT WORK;
8436: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');

Line 9138: LNS_DISB_HEADERS head

9134: -- querying disbursement lines info
9135: CURSOR in_fund_count_cur(P_LOAN_ID number) IS
9136: select nvl(count(line.DISB_LINE_ID), 0)
9137: from LNS_DISB_LINES line,
9138: LNS_DISB_HEADERS head
9139: where head.LOAN_ID = P_LOAN_ID and
9140: line.DISB_HEADER_ID = head.DISB_HEADER_ID and
9141: line.status is not null and
9142: line.status = 'IN_FUNDING';

Line 9274: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

9270: l_hist_version number;
9271: l_found boolean;
9272:
9273: l_DISB_LINE_REC LNS_FUNDING_PUB.LNS_DISB_LINES_REC;
9274: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
9275: l_loan_header_rec LNS_LOAN_HEADER_PUB.loan_header_rec_type;
9276: l_ids_tbl DBMS_SQL.NUMBER_TABLE;
9277:
9278: /*-----------------------------------------------------------------------+

Line 9291: LNS_DISB_HEADERS head,

9287: head.DISB_HEADER_ID,
9288: inv.INVOICE_NUM,
9289: inv.cancelled_date
9290: from LNS_DISB_LINES lines,
9291: LNS_DISB_HEADERS head,
9292: ap_invoices_all inv
9293: where head.loan_id = P_LOAN_ID and
9294: head.DISB_HEADER_ID = lines.DISB_HEADER_ID and
9295: lines.status is not null and

Line 9310: from LNS_DISB_HEADERS head

9306: (select count(1)
9307: from lns_disb_lines
9308: where DISB_HEADER_ID = head.DISB_HEADER_ID and
9309: status <> 'CANCELLED')
9310: from LNS_DISB_HEADERS head
9311: where head.DISB_HEADER_ID = P_DISB_HEADER_ID;
9312:
9313: -- getting last history record to update status
9314: CURSOR last_hist_rec_cur(P_DISB_LINE_ID number) IS

Line 9548: LNS_DISB_HEADERS head

9544:
9545: CURSOR disb_amount_cur(P_LOAN_ID number) IS
9546: select nvl(sum(lines.LINE_AMOUNT), 0)
9547: from LNS_DISB_LINES lines,
9548: LNS_DISB_HEADERS head
9549: where head.LOAN_ID = P_LOAN_ID and
9550: lines.DISB_HEADER_ID = head.DISB_HEADER_ID and
9551: (lines.STATUS is not null and lines.STATUS = 'FULLY_FUNDED') and
9552: lines.DISBURSEMENT_DATE is not null;

Line 9556: from LNS_DISB_HEADERS head

9552: lines.DISBURSEMENT_DATE is not null;
9553:
9554: CURSOR disb_count_cur(P_LOAN_ID number, P_STATUS VARCHAR2) IS
9555: select count(1)
9556: from LNS_DISB_HEADERS head
9557: where head.LOAN_ID = P_LOAN_ID and
9558: (head.STATUS is not null and head.STATUS = P_STATUS);
9559:
9560: BEGIN

Line 9702: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;

9698: l_payee_party_id lns_disb_lines.payee_party_id%TYPE;
9699: l_current_phase varchar2(30);
9700: l_currency varchar2(15);
9701:
9702: l_DISB_HEADER_REC LNS_FUNDING_PUB.LNS_DISB_HEADERS_REC;
9703: l_DISB_LINE_REC LNS_FUNDING_PUB.LNS_DISB_LINES_REC;
9704:
9705: /*-----------------------------------------------------------------------+
9706: | Cursor Declarations |

Line 9811: select lns_disb_headers_s.NEXTVAL into l_DISB_HEADER_REC.DISB_HEADER_ID from dual;

9807: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_payment_method_code: ' || l_payment_method_code);
9808: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_bank_account_id: ' || l_bank_account_id);
9809:
9810: -- create disb header
9811: select lns_disb_headers_s.NEXTVAL into l_DISB_HEADER_REC.DISB_HEADER_ID from dual;
9812:
9813: l_DISB_HEADER_REC.LOAN_ID := p_loan_id;
9814: l_DISB_HEADER_REC.HEADER_AMOUNT := P_AMOUNT;
9815: l_DISB_HEADER_REC.PAYMENT_REQUEST_DATE := P_DUE_DATE;