DBA Data[Home] [Help]

APPS.LNS_APPROVAL_ACTION_PUB dependencies on FND_API

Line 92: l_action_id <> FND_API.G_MISS_NUM

88: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin do_create_approval_action procedure');
89:
90: -- if primary key value is passed, check for uniqueness.
91: IF l_action_id IS NOT NULL AND
92: l_action_id <> FND_API.G_MISS_NUM
93: THEN
94: BEGIN
95: SELECT 'Y'
96: INTO l_dummy

Line 103: RAISE FND_API.G_EXC_ERROR;

99:
100: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_DUPLICATE_COLUMN');
101: FND_MESSAGE.SET_TOKEN('COLUMN', 'action_id');
102: FND_MSG_PUB.ADD;
103: RAISE FND_API.G_EXC_ERROR;
104:
105: EXCEPTION
106: WHEN NO_DATA_FOUND THEN
107: NULL;

Line 211: RAISE FND_API.G_EXC_ERROR;

207: THEN
208: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_RECORD_CHANGED');
209: FND_MESSAGE.SET_TOKEN('TABLE', 'lns_approval_actions');
210: FND_MSG_PUB.ADD;
211: RAISE FND_API.G_EXC_ERROR;
212: END IF;
213:
214: p_object_version_number := nvl(l_object_version_number, 1) + 1;
215:

Line 221: RAISE FND_API.G_EXC_ERROR;

217: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_NO_RECORD');
218: FND_MESSAGE.SET_TOKEN('RECORD', 'approval action_rec');
219: FND_MESSAGE.SET_TOKEN('VALUE', NVL(TO_CHAR(p_approval_action_rec.action_id), 'null'));
220: FND_MSG_PUB.ADD;
221: RAISE FND_API.G_EXC_ERROR;
222: END;
223:
224: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_approval_action procedure: Before call to LNS_APPROVAL_ACTIONS_PKG.Update_Row');
225:

Line 309: p_action_id <> FND_API.G_MISS_NUM

305:
306: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin do_delete_approval_action procedure');
307:
308: IF p_action_id IS NOT NULL AND
309: p_action_id <> FND_API.G_MISS_NUM
310: THEN
311: -- check whether record has been deleted by another user. If not, lock it.
312: BEGIN
313: SELECT 'Y'

Line 324: RAISE FND_API.G_EXC_ERROR;

320: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_NO_RECORD');
321: FND_MESSAGE.SET_TOKEN('RECORD', 'approval action_rec');
322: FND_MESSAGE.SET_TOKEN('VALUE', NVL(TO_CHAR(p_action_id), 'null'));
323: FND_MSG_PUB.ADD;
324: RAISE FND_API.G_EXC_ERROR;
325: END;
326: END IF;
327:
328: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_delete_approval_action procedure: Before call to LNS_APPROVAL_ACTIONS_PKG.Delete_Row');

Line 356: x_return_status := FND_API.G_RET_STS_ERROR;

352: l_install_number := LNS_FIN_UTILS.GETNUMBERINSTALLMENTS(p_approval_action_rec.loan_id);
353: OPEN C_Check_Fee_Violation (p_approval_action_rec.loan_id, l_install_number);
354: FETCH C_Check_Fee_Violation INTO l_dummy;
355: IF C_Check_Fee_Violation%FOUND THEN
356: x_return_status := FND_API.G_RET_STS_ERROR;
357: FND_MESSAGE.SET_NAME('LNS', 'LNS_NEGATIVE_NUMBER_ERROR');
358: FND_MSG_PUB.ADD;
359: CLOSE C_Check_Fee_Violation;
360: RAISE FND_API.G_EXC_ERROR;

Line 360: RAISE FND_API.G_EXC_ERROR;

356: x_return_status := FND_API.G_RET_STS_ERROR;
357: FND_MESSAGE.SET_NAME('LNS', 'LNS_NEGATIVE_NUMBER_ERROR');
358: FND_MSG_PUB.ADD;
359: CLOSE C_Check_Fee_Violation;
360: RAISE FND_API.G_EXC_ERROR;
361:
362: END IF;
363: CLOSE C_Check_Fee_Violation;
364: END IF;

Line 539: IF FND_API.to_Boolean(p_init_msg_list) THEN

535: -- standard start of API savepoint
536: SAVEPOINT create_approval_action;
537:
538: -- initialize message list if p_init_msg_list is set to TRUE.
539: IF FND_API.to_Boolean(p_init_msg_list) THEN
540: FND_MSG_PUB.initialize;
541: END IF;
542:
543: -- initialize API return status to success.

Line 544: x_return_status := FND_API.G_RET_STS_SUCCESS;

540: FND_MSG_PUB.initialize;
541: END IF;
542:
543: -- initialize API return status to success.
544: x_return_status := FND_API.G_RET_STS_SUCCESS;
545:
546: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to do_create_approval_action proc');
547:
548: -- call to business logic.

Line 582: RAISE FND_API.G_EXC_ERROR;

578: FND_MESSAGE.SET_TOKEN('VALUE', NVL(TO_CHAR(l_loan_header_rec.loan_id), 'null'));
579: FND_MSG_PUB.ADD;
580: CLOSE C_Get_Loan_Info;
581: l_last_api_called := 'C_Get_Loan_Info';
582: RAISE FND_API.G_EXC_ERROR;
583: END IF;
584: CLOSE C_Get_Loan_Info;
585: l_prev_loan_status := l_status;
586:

Line 596: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;

592: l_loan_header_rec.loan_id := l_approval_action_rec.loan_id;
593: IF (l_approval_action_rec.action_type = 'SUBMIT_FOR_APPR') THEN
594: IF l_status = 'INCOMPLETE' THEN
595: l_loan_header_rec.loan_status := 'PENDING';
596: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;
597: ELSE
598: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
599: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
600: FND_MSG_PUB.ADD;

Line 601: RAISE FND_API.G_EXC_ERROR;

597: ELSE
598: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
599: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
600: FND_MSG_PUB.ADD;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
603:
604: ELSIF (l_approval_action_rec.action_type = 'SUBMIT_FOR_CONV') THEN
605: IF (l_status = 'ACTIVE' AND l_current_phase = 'OPEN' AND l_multiple_funding_flag = 'Y' AND l_open_to_term_flag = 'Y') THEN

Line 611: RAISE FND_API.G_EXC_ERROR;

607: ELSE
608: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
609: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
610: FND_MSG_PUB.ADD;
611: RAISE FND_API.G_EXC_ERROR;
612: END IF;
613:
614: ELSIF (l_approval_action_rec.action_type = 'SUBMIT_FOR_CNCL') THEN
615: IF (l_loan_class_code = 'DIRECT') THEN

Line 619: ,P_INIT_MSG_LIST => FND_API.G_TRUE

615: IF (l_loan_class_code = 'DIRECT') THEN
616: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE');
617:
618: LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE(P_API_VERSION => 1.0
619: ,P_INIT_MSG_LIST => FND_API.G_TRUE
620: ,P_COMMIT => FND_API.G_FALSE
621: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
622: ,P_LOAN_ID => l_loan_header_rec.loan_id
623: ,X_RETURN_STATUS => x_return_status

Line 620: ,P_COMMIT => FND_API.G_FALSE

616: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE');
617:
618: LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE(P_API_VERSION => 1.0
619: ,P_INIT_MSG_LIST => FND_API.G_TRUE
620: ,P_COMMIT => FND_API.G_FALSE
621: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
622: ,P_LOAN_ID => l_loan_header_rec.loan_id
623: ,X_RETURN_STATUS => x_return_status
624: ,X_MSG_COUNT => x_msg_count

Line 621: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

617:
618: LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE(P_API_VERSION => 1.0
619: ,P_INIT_MSG_LIST => FND_API.G_TRUE
620: ,P_COMMIT => FND_API.G_FALSE
621: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
622: ,P_LOAN_ID => l_loan_header_rec.loan_id
623: ,X_RETURN_STATUS => x_return_status
624: ,X_MSG_COUNT => x_msg_count
625: ,X_MSG_DATA => x_msg_data);

Line 629: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

625: ,X_MSG_DATA => x_msg_data);
626:
627: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE');
628:
629: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
630: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE failed with status ' || x_return_status);
631: l_last_api_called := 'LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE';
632: RAISE FND_API.G_EXC_ERROR;
633: END IF;

Line 632: RAISE FND_API.G_EXC_ERROR;

628:
629: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
630: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE failed with status ' || x_return_status);
631: l_last_api_called := 'LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE';
632: RAISE FND_API.G_EXC_ERROR;
633: END IF;
634: ELSE
635: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
636: FND_MESSAGE.SET_TOKEN('VALUE', l_status);

Line 638: RAISE FND_API.G_EXC_ERROR;

634: ELSE
635: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
636: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
637: FND_MSG_PUB.ADD;
638: RAISE FND_API.G_EXC_ERROR;
639: END IF;
640:
641: ELSIF (l_approval_action_rec.action_type = 'APPROVE') THEN
642:

Line 661: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;

657: l_loan_header_rec.initial_loan_balance := l_requested_amt;
658:
659: elsif l_loan_class_code = 'DIRECT' then
660: l_loan_header_rec.loan_status := 'APPROVED';
661: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;
662: -- use resource ID
663: l_loan_header_rec.loan_approved_by := l_resource_id;
664: l_loan_header_rec.loan_approval_date := sysdate;
665: --if (l_gl_date is null) then

Line 676: ,P_INIT_MSG_LIST => FND_API.G_TRUE

672: ELSIF l_status = 'PENDING_CANCELLATION' THEN
673: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB');
674:
675: LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB(P_API_VERSION => 1.0
676: ,P_INIT_MSG_LIST => FND_API.G_TRUE
677: ,P_COMMIT => FND_API.G_FALSE
678: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
679: ,P_LOAN_ID => l_loan_header_rec.loan_id
680: ,X_RETURN_STATUS => x_return_status

Line 677: ,P_COMMIT => FND_API.G_FALSE

673: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB');
674:
675: LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB(P_API_VERSION => 1.0
676: ,P_INIT_MSG_LIST => FND_API.G_TRUE
677: ,P_COMMIT => FND_API.G_FALSE
678: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
679: ,P_LOAN_ID => l_loan_header_rec.loan_id
680: ,X_RETURN_STATUS => x_return_status
681: ,X_MSG_COUNT => x_msg_count

Line 678: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

674:
675: LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB(P_API_VERSION => 1.0
676: ,P_INIT_MSG_LIST => FND_API.G_TRUE
677: ,P_COMMIT => FND_API.G_FALSE
678: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
679: ,P_LOAN_ID => l_loan_header_rec.loan_id
680: ,X_RETURN_STATUS => x_return_status
681: ,X_MSG_COUNT => x_msg_count
682: ,X_MSG_DATA => x_msg_data);

Line 686: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

682: ,X_MSG_DATA => x_msg_data);
683:
684: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB');
685:
686: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
687: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB failed with status ' || x_return_status);
688: l_last_api_called := 'LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB';
689: RAISE FND_API.G_EXC_ERROR;
690: END IF;

Line 689: RAISE FND_API.G_EXC_ERROR;

685:
686: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
687: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB failed with status ' || x_return_status);
688: l_last_api_called := 'LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB';
689: RAISE FND_API.G_EXC_ERROR;
690: END IF;
691:
692: -- approval action type = 'APPROVE'
693: ELSIF (l_status = 'ACTIVE' AND l_current_phase = 'OPEN' AND l_multiple_funding_flag = 'Y' AND l_open_to_term_flag = 'Y') THEN

Line 709: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

705: ,x_return_status => x_return_status
706: ,x_msg_count => x_msg_count
707: ,x_msg_data => x_msg_data);
708:
709: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
710: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, l_api_name || ' - LNS_FINANCIALS.shiftLoanDates failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
711: l_last_api_called := 'LNS_FINANCIALS.shiftLoanDates';
712: RAISE FND_API.G_EXC_ERROR;
713: END IF;

Line 712: RAISE FND_API.G_EXC_ERROR;

708:
709: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
710: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, l_api_name || ' - LNS_FINANCIALS.shiftLoanDates failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
711: l_last_api_called := 'LNS_FINANCIALS.shiftLoanDates';
712: RAISE FND_API.G_EXC_ERROR;
713: END IF;
714:
715: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'New loan start date: ' || l_loan_details.loan_start_date);
716: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'New first payment date: ' || l_loan_details.first_payment_Date);

Line 737: ,p_init_msg_list => FND_API.G_FALSE

733: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'FIRST_PAYMENT_DATE: ' || l_term_rec.FIRST_PAYMENT_DATE);
734: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'NEXT_PAYMENT_DUE_DATE: ' || l_term_rec.NEXT_PAYMENT_DUE_DATE);
735:
736: LNS_TERMS_PUB.update_term(P_OBJECT_VERSION_NUMBER => l_TERM_VERSION_NUMBER
737: ,p_init_msg_list => FND_API.G_FALSE
738: ,p_loan_term_rec => l_term_rec
739: ,X_RETURN_STATUS => x_return_status
740: ,X_MSG_COUNT => x_msg_count
741: ,X_MSG_DATA => x_msg_data);

Line 745: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

741: ,X_MSG_DATA => x_msg_data);
742:
743: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'x_return_status: ' || x_return_status);
744:
745: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
746: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Successfully update LNS_TERMS');
747: ELSE
748: FND_MESSAGE.SET_NAME('LNS', 'LNS_UPD_TERM_FAIL');
749: FND_MSG_PUB.Add;

Line 752: RAISE FND_API.G_EXC_ERROR;

748: FND_MESSAGE.SET_NAME('LNS', 'LNS_UPD_TERM_FAIL');
749: FND_MSG_PUB.Add;
750: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, l_api_name || ' - LNS_TERMS_PUB.update_term failed with message: ' || FND_MSG_PUB.Get(p_encoded => 'F'));
751: l_last_api_called := 'LNS_TERMS_PUB.update_term';
752: RAISE FND_API.G_EXC_ERROR;
753: END IF;
754:
755: /* setting data for future loan update */
756: l_loan_header_rec.LOAN_START_DATE := l_loan_details.loan_start_date;

Line 760: l_loan_header_rec.LAST_PAYMENT_NUMBER := FND_API.G_MISS_NUM;

756: l_loan_header_rec.LOAN_START_DATE := l_loan_details.loan_start_date;
757: l_loan_header_rec.LOAN_MATURITY_DATE := l_loan_details.maturity_date;
758: l_loan_header_rec.current_phase := 'TERM';
759: l_loan_header_rec.secondary_status := 'CONVERTED_TO_TERM_PHASE';
760: l_loan_header_rec.LAST_PAYMENT_NUMBER := FND_API.G_MISS_NUM;
761: l_loan_header_rec.LAST_AMORTIZATION_ID := FND_API.G_MISS_NUM;
762:
763: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Data to Update loan header with during conversion...');
764: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'loan_id: ' || l_loan_header_rec.loan_id);

Line 761: l_loan_header_rec.LAST_AMORTIZATION_ID := FND_API.G_MISS_NUM;

757: l_loan_header_rec.LOAN_MATURITY_DATE := l_loan_details.maturity_date;
758: l_loan_header_rec.current_phase := 'TERM';
759: l_loan_header_rec.secondary_status := 'CONVERTED_TO_TERM_PHASE';
760: l_loan_header_rec.LAST_PAYMENT_NUMBER := FND_API.G_MISS_NUM;
761: l_loan_header_rec.LAST_AMORTIZATION_ID := FND_API.G_MISS_NUM;
762:
763: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Data to Update loan header with during conversion...');
764: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'loan_id: ' || l_loan_header_rec.loan_id);
765: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'LOAN_START_DATE: ' || l_loan_header_rec.LOAN_START_DATE);

Line 774: lns_fee_engine.processDisbursementFees(p_init_msg_list => FND_API.G_TRUE

770: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'LAST_AMORTIZATION_ID: ' || l_loan_header_rec.LAST_AMORTIZATION_ID);
771:
772: --Process Conversion Fees
773: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Before calling lns_fee_engine.processDisbursementFees to process Conversion fees for permanent conversion to TERM phase');
774: lns_fee_engine.processDisbursementFees(p_init_msg_list => FND_API.G_TRUE
775: ,p_commit => FND_API.G_FALSE
776: ,p_phase => 'TERM'
777: ,p_loan_id => l_loan_header_rec.loan_id
778: ,p_disb_head_id => NULL

Line 775: ,p_commit => FND_API.G_FALSE

771:
772: --Process Conversion Fees
773: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Before calling lns_fee_engine.processDisbursementFees to process Conversion fees for permanent conversion to TERM phase');
774: lns_fee_engine.processDisbursementFees(p_init_msg_list => FND_API.G_TRUE
775: ,p_commit => FND_API.G_FALSE
776: ,p_phase => 'TERM'
777: ,p_loan_id => l_loan_header_rec.loan_id
778: ,p_disb_head_id => NULL
779: ,x_return_status => x_return_status

Line 785: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

781: ,x_msg_data => x_msg_data);
782:
783: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - lns_fee_engine.processDisbursementFees to process Conversion fees for permanent conversion to TERM phase');
784:
785: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
786: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, l_api_name || ' - lns_fee_engine.processDisbursementFees to process Conversion fees for TERM phase failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
787: l_last_api_called := 'lns_fee_engine.processDisbursementFees';
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;

Line 788: RAISE FND_API.G_EXC_ERROR;

784:
785: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
786: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, l_api_name || ' - lns_fee_engine.processDisbursementFees to process Conversion fees for TERM phase failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
787: l_last_api_called := 'lns_fee_engine.processDisbursementFees';
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790: /**********************End Permanent Conversion to Term Phase*************/
791:
792: ELSE

Line 796: RAISE FND_API.G_EXC_ERROR;

792: ELSE
793: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
794: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
795: FND_MSG_PUB.ADD;
796: RAISE FND_API.G_EXC_ERROR;
797: END IF;
798:
799: ELSIF (l_approval_action_rec.action_type = 'REJECT') THEN
800: IF ( l_status = 'PENDING' OR (l_status = 'INCOMPLETE' AND l_loan_needs_approval = 'N') ) THEN

Line 802: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;

798:
799: ELSIF (l_approval_action_rec.action_type = 'REJECT') THEN
800: IF ( l_status = 'PENDING' OR (l_status = 'INCOMPLETE' AND l_loan_needs_approval = 'N') ) THEN
801: l_loan_header_rec.loan_status := 'REJECTED';
802: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;
803: ELSIF (l_status = 'PENDING_CANCELLATION') THEN
804: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
805:
806: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0

Line 807: ,P_INIT_MSG_LIST => FND_API.G_TRUE

803: ELSIF (l_status = 'PENDING_CANCELLATION') THEN
804: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
805:
806: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
807: ,P_INIT_MSG_LIST => FND_API.G_TRUE
808: ,P_COMMIT => FND_API.G_FALSE
809: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
810: ,P_LOAN_ID => l_loan_header_rec.loan_id
811: ,X_RETURN_STATUS => x_return_status

Line 808: ,P_COMMIT => FND_API.G_FALSE

804: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
805:
806: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
807: ,P_INIT_MSG_LIST => FND_API.G_TRUE
808: ,P_COMMIT => FND_API.G_FALSE
809: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
810: ,P_LOAN_ID => l_loan_header_rec.loan_id
811: ,X_RETURN_STATUS => x_return_status
812: ,X_MSG_COUNT => x_msg_count

Line 809: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

805:
806: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
807: ,P_INIT_MSG_LIST => FND_API.G_TRUE
808: ,P_COMMIT => FND_API.G_FALSE
809: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
810: ,P_LOAN_ID => l_loan_header_rec.loan_id
811: ,X_RETURN_STATUS => x_return_status
812: ,X_MSG_COUNT => x_msg_count
813: ,X_MSG_DATA => x_msg_data);

Line 817: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

813: ,X_MSG_DATA => x_msg_data);
814:
815: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
816:
817: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
818: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
819: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
820: RAISE FND_API.G_EXC_ERROR;
821: END IF;

Line 820: RAISE FND_API.G_EXC_ERROR;

816:
817: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
818: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
819: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
820: RAISE FND_API.G_EXC_ERROR;
821: END IF;
822: ELSIF (l_status = 'ACTIVE' and l_secondary_status = 'PENDING_CONVERSION') THEN
823: -- getting loan previous status
824: open prev_sec_status_cur(l_loan_header_rec.loan_id);

Line 827: l_loan_header_rec.secondary_status := nvl(l_prev_sec_status,FND_API.G_MISS_CHAR);

823: -- getting loan previous status
824: open prev_sec_status_cur(l_loan_header_rec.loan_id);
825: fetch prev_sec_status_cur into l_prev_sec_status;
826: close prev_sec_status_cur;
827: l_loan_header_rec.secondary_status := nvl(l_prev_sec_status,FND_API.G_MISS_CHAR);
828: ELSE
829: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
830: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
831: FND_MSG_PUB.ADD;

Line 832: RAISE FND_API.G_EXC_ERROR;

828: ELSE
829: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
830: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
831: FND_MSG_PUB.ADD;
832: RAISE FND_API.G_EXC_ERROR;
833: END IF;
834:
835: ELSIF (l_approval_action_rec.action_type = 'REQUEST_FOR_INFO') THEN
836: IF (l_status = 'INCOMPLETE' AND l_loan_needs_approval = 'N') THEN

Line 845: ,P_INIT_MSG_LIST => FND_API.G_TRUE

841: ELSIF (l_status = 'PENDING_CANCELLATION') THEN
842: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
843:
844: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
845: ,P_INIT_MSG_LIST => FND_API.G_TRUE
846: ,P_COMMIT => FND_API.G_FALSE
847: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
848: ,P_LOAN_ID => l_loan_header_rec.loan_id
849: ,X_RETURN_STATUS => x_return_status

Line 846: ,P_COMMIT => FND_API.G_FALSE

842: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
843:
844: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
845: ,P_INIT_MSG_LIST => FND_API.G_TRUE
846: ,P_COMMIT => FND_API.G_FALSE
847: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
848: ,P_LOAN_ID => l_loan_header_rec.loan_id
849: ,X_RETURN_STATUS => x_return_status
850: ,X_MSG_COUNT => x_msg_count

Line 847: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

843:
844: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
845: ,P_INIT_MSG_LIST => FND_API.G_TRUE
846: ,P_COMMIT => FND_API.G_FALSE
847: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
848: ,P_LOAN_ID => l_loan_header_rec.loan_id
849: ,X_RETURN_STATUS => x_return_status
850: ,X_MSG_COUNT => x_msg_count
851: ,X_MSG_DATA => x_msg_data);

Line 855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

851: ,X_MSG_DATA => x_msg_data);
852:
853: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
854:
855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
856: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
857: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
858: RAISE FND_API.G_EXC_ERROR;
859: END IF;

Line 858: RAISE FND_API.G_EXC_ERROR;

854:
855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
856: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
857: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
858: RAISE FND_API.G_EXC_ERROR;
859: END IF;
860:
861: --Loan Status change is already handled in the above procedure call. no need to update loan header again
862: ELSIF l_status = 'ACTIVE' then

Line 870: RAISE FND_API.G_EXC_ERROR;

866: ELSE
867: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
868: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
869: FND_MSG_PUB.ADD;
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872: END IF;
873:
874: /* 08-12-2005 raverma added defaultDistributions call for DIRECT loan */

Line 881: ,p_init_msg_list => FND_API.G_TRUE

877: IF (l_approval_action_rec.action_type = 'APPROVE' and (l_loan_header_rec.loan_status = 'ACTIVE' or l_loan_header_rec.loan_status = 'APPROVED') and l_loan_class_code = 'DIRECT') THEN
878:
879: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - before default distributions');
880: Lns_distributions_pub.defaultDistributions(p_api_version => 1.0
881: ,p_init_msg_list => FND_API.G_TRUE
882: ,p_commit => FND_API.G_FALSE
883: ,p_loan_id => l_loan_header_rec.loan_id
884: ,p_loan_class_code => l_loan_class_code
885: ,x_return_status => x_return_status

Line 882: ,p_commit => FND_API.G_FALSE

878:
879: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - before default distributions');
880: Lns_distributions_pub.defaultDistributions(p_api_version => 1.0
881: ,p_init_msg_list => FND_API.G_TRUE
882: ,p_commit => FND_API.G_FALSE
883: ,p_loan_id => l_loan_header_rec.loan_id
884: ,p_loan_class_code => l_loan_class_code
885: ,x_return_status => x_return_status
886: ,x_msg_count => x_msg_count

Line 892: lns_distributions_pub.budgetary_control(p_init_msg_list => FND_API.G_FALSE

888: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - after default distributions ' || x_return_status);
889:
890: begin
891: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'calling lns_distributions_pub.budgetary_control');
892: lns_distributions_pub.budgetary_control(p_init_msg_list => FND_API.G_FALSE
893: ,p_commit => FND_API.G_FALSE
894: ,p_loan_id => l_approval_action_rec.loan_id
895: ,p_budgetary_control_mode => 'R'
896: ,x_budgetary_status_code => l_budgetary_status

Line 893: ,p_commit => FND_API.G_FALSE

889:
890: begin
891: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'calling lns_distributions_pub.budgetary_control');
892: lns_distributions_pub.budgetary_control(p_init_msg_list => FND_API.G_FALSE
893: ,p_commit => FND_API.G_FALSE
894: ,p_loan_id => l_approval_action_rec.loan_id
895: ,p_budgetary_control_mode => 'R'
896: ,x_budgetary_status_code => l_budgetary_status
897: ,x_return_status => x_return_status

Line 903: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

899: ,x_msg_data => x_msg_data);
900: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to Lns_distributions_pub.budgetary_control return status ' || x_return_status);
901: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'l_budgetary_status' || l_budgetary_status);
902: --FND_MSG_PUB.initialize;
903: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
904:
905: RAISE FND_API.G_EXC_ERROR;
906:
907: else -- BC Call Returned 'S'

Line 905: RAISE FND_API.G_EXC_ERROR;

901: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'l_budgetary_status' || l_budgetary_status);
902: --FND_MSG_PUB.initialize;
903: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
904:
905: RAISE FND_API.G_EXC_ERROR;
906:
907: else -- BC Call Returned 'S'
908: if l_budgetary_status = 'ADVISORY' or l_budgetary_status = 'SUCCESS' then
909: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'budget reserved');

Line 916: RAISE FND_API.G_EXC_ERROR;

912: elsif l_budgetary_status = 'FAIL' or l_budgetary_status = 'PARTIAL' or l_budgetary_status = 'XLA_ERROR' then
913: if l_budget_req_approval = 'Y' then
914: -- continue as if nothing happen
915: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'budget required: NO BUDGET');
916: RAISE FND_API.G_EXC_ERROR;
917: else
918: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'NO BUDGET');
919: FND_MSG_PUB.initialize;
920: l_loan_header_rec.secondary_status := 'NO_BUDGET';

Line 948: l_term_rec.ORIG_PAY_CALC_METHOD := FND_API.G_MISS_CHAR;

944: END IF;
945:
946: l_term_rec.TERM_ID := l_term_id;
947: l_term_rec.LOAN_ID := l_loan_header_rec.loan_id;
948: l_term_rec.ORIG_PAY_CALC_METHOD := FND_API.G_MISS_CHAR;
949:
950: LNS_TERMS_PUB.update_term(P_OBJECT_VERSION_NUMBER => l_object_version_number,
951: p_init_msg_list => FND_API.G_FALSE,
952: p_loan_term_rec => l_term_rec,

Line 951: p_init_msg_list => FND_API.G_FALSE,

947: l_term_rec.LOAN_ID := l_loan_header_rec.loan_id;
948: l_term_rec.ORIG_PAY_CALC_METHOD := FND_API.G_MISS_CHAR;
949:
950: LNS_TERMS_PUB.update_term(P_OBJECT_VERSION_NUMBER => l_object_version_number,
951: p_init_msg_list => FND_API.G_FALSE,
952: p_loan_term_rec => l_term_rec,
953: X_RETURN_STATUS => x_return_status,
954: X_MSG_COUNT => x_msg_count,
955: X_MSG_DATA => x_msg_data);

Line 959: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

955: X_MSG_DATA => x_msg_data);
956:
957:
958: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_return_status: ' || x_return_status);
959: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
960: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
961: ELSE
962: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Successfully update LNS_TERMS');
963: END IF;

Line 960: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

956:
957:
958: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_return_status: ' || x_return_status);
959: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
960: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
961: ELSE
962: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Successfully update LNS_TERMS');
963: END IF;
964:

Line 968: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then

964:
965: end if;
966:
967: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to submit adjustment request');
968: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
969:
970: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
971: ,P_INIT_MSG_LIST => FND_API.G_TRUE
972: ,P_COMMIT => FND_API.G_FALSE

Line 971: ,P_INIT_MSG_LIST => FND_API.G_TRUE

967: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to submit adjustment request');
968: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
969:
970: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
971: ,P_INIT_MSG_LIST => FND_API.G_TRUE
972: ,P_COMMIT => FND_API.G_FALSE
973: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
974: ,P_LOAN_ID => l_loan_header_rec.loan_id
975: ,X_RETURN_STATUS => x_return_status

Line 972: ,P_COMMIT => FND_API.G_FALSE

968: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
969:
970: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
971: ,P_INIT_MSG_LIST => FND_API.G_TRUE
972: ,P_COMMIT => FND_API.G_FALSE
973: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
974: ,P_LOAN_ID => l_loan_header_rec.loan_id
975: ,X_RETURN_STATUS => x_return_status
976: ,X_MSG_COUNT => x_msg_count

Line 973: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

969:
970: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
971: ,P_INIT_MSG_LIST => FND_API.G_TRUE
972: ,P_COMMIT => FND_API.G_FALSE
973: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
974: ,P_LOAN_ID => l_loan_header_rec.loan_id
975: ,X_RETURN_STATUS => x_return_status
976: ,X_MSG_COUNT => x_msg_count
977: ,X_MSG_DATA => x_msg_data);

Line 979: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

975: ,X_RETURN_STATUS => x_return_status
976: ,X_MSG_COUNT => x_msg_count
977: ,X_MSG_DATA => x_msg_data);
978:
979: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
980: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE failed with status ' || x_return_status);
981: l_last_api_called := 'LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE';
982: RAISE FND_API.G_EXC_ERROR;
983: END IF;

Line 982: RAISE FND_API.G_EXC_ERROR;

978:
979: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
980: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE failed with status ' || x_return_status);
981: l_last_api_called := 'LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE';
982: RAISE FND_API.G_EXC_ERROR;
983: END IF;
984:
985: end if;
986:

Line 987: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then

983: END IF;
984:
985: end if;
986:
987: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
988:
989: -- moved the defaultDistributions call to Concurrent Process
990: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to submit gen distributions request');
991: l_notify := FND_REQUEST.ADD_NOTIFICATION(FND_GLOBAL.USER_NAME);

Line 1000: end if; --END if (x_return_status = FND_API.G_RET_STS_SUCCESS) then

996: ,'', '', FALSE
997: ,l_loan_header_rec.loan_id);
998: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - after call to submit gen distributions request ' || l_request_id);
999:
1000: end if; --END if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
1001:
1002: END IF; -- END IF (l_approval_action_rec.action_type = 'APPROVE' and l_loan_header_rec.loan_status = 'ACTIVE' and l_loan_class_code = 'ERS') THEN
1003:
1004: IF (l_loan_header_rec.loan_status <> 'CANCELLED') then

Line 1011: LNS_LOAN_HEADER_PUB.update_loan(p_init_msg_list => FND_API.G_FALSE

1007: fetch loan_version_cur into l_object_version_number;
1008: close loan_version_cur;
1009:
1010: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Before call to LNS_LOAN_HEADER_PUB.update_loan');
1011: LNS_LOAN_HEADER_PUB.update_loan(p_init_msg_list => FND_API.G_FALSE
1012: ,p_loan_header_rec => l_loan_header_rec
1013: ,p_object_version_number => l_object_version_number
1014: ,x_return_status => x_return_status
1015: ,x_msg_count => x_msg_count

Line 1019: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1015: ,x_msg_count => x_msg_count
1016: ,x_msg_data => x_msg_data);
1017: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'After call to LNS_LOAN_HEADER_PUB.update_loan');
1018:
1019: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1020: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - LNS_LOAN_HEADER_PUB.update_loan failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
1021: l_last_api_called := 'LNS_LOAN_HEADER_PUB.update_loan';
1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1023: END IF;

Line 1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1018:
1019: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1020: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - LNS_LOAN_HEADER_PUB.update_loan failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
1021: l_last_api_called := 'LNS_LOAN_HEADER_PUB.update_loan';
1022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1023: END IF;
1024: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - After call to LNS_LOAN_HEADER_PUB.update_loan proc');
1025:
1026: END IF;

Line 1028: if (x_return_status = FND_API.G_RET_STS_SUCCESS AND l_approval_action_rec.action_type = 'APPROVE' and (l_loan_header_rec.loan_status = 'ACTIVE' or l_loan_header_rec.loan_status = 'APPROVED')) then

1024: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - After call to LNS_LOAN_HEADER_PUB.update_loan proc');
1025:
1026: END IF;
1027:
1028: if (x_return_status = FND_API.G_RET_STS_SUCCESS AND l_approval_action_rec.action_type = 'APPROVE' and (l_loan_header_rec.loan_status = 'ACTIVE' or l_loan_header_rec.loan_status = 'APPROVED')) then
1029:
1030: /* begin submit request to generate Loan Agreement Report */
1031: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' Before calling FND_REQUEST.SUBMIT_REQUEST for LNS_AGREEMENT (Loan Agreement Report) for loan_id: ' || l_loan_header_rec.loan_id);
1032: l_notify := FND_REQUEST.ADD_NOTIFICATION(FND_GLOBAL.USER_NAME);

Line 1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1059: ,'', '', FALSE
1060: ,l_loan_header_rec.loan_id);
1061:
1062: if l_request_id = 0 then
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1064: FND_MESSAGE.SET_NAME('LNS', 'LNS_AGREEMENT_REQUEST_FAILED');
1065: FND_MSG_PUB.Add;
1066: l_last_api_called := 'FND_REQUEST.SUBMIT_REQUEST for Loan Agreement Report Generation';
1067: RAISE FND_API.G_EXC_ERROR;

Line 1067: RAISE FND_API.G_EXC_ERROR;

1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1064: FND_MESSAGE.SET_NAME('LNS', 'LNS_AGREEMENT_REQUEST_FAILED');
1065: FND_MSG_PUB.Add;
1066: l_last_api_called := 'FND_REQUEST.SUBMIT_REQUEST for Loan Agreement Report Generation';
1067: RAISE FND_API.G_EXC_ERROR;
1068: else
1069: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Successfully submited Loan Agreement Report Generation Concurrent Program. Request id: ' || l_request_id);
1070: end if;
1071:

Line 1080: WHEN FND_API.G_EXC_ERROR THEN

1076:
1077: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - End ');
1078:
1079: EXCEPTION
1080: WHEN FND_API.G_EXC_ERROR THEN
1081: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'before rollback');
1082: ROLLBACK TO create_approval_action;
1083: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'after rollback');
1084: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1084: x_return_status := FND_API.G_RET_STS_ERROR;

1080: WHEN FND_API.G_EXC_ERROR THEN
1081: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'before rollback');
1082: ROLLBACK TO create_approval_action;
1083: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'after rollback');
1084: x_return_status := FND_API.G_RET_STS_ERROR;
1085: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1086: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1087: FND_MSG_PUB.ADD;
1088: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

Line 1088: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1084: x_return_status := FND_API.G_RET_STS_ERROR;
1085: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1086: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1087: FND_MSG_PUB.ADD;
1088: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1089: p_count => x_msg_count,
1090: p_data => x_msg_data);
1091:
1092: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1092: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1088: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1089: p_count => x_msg_count,
1090: p_data => x_msg_data);
1091:
1092: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1093: ROLLBACK TO create_approval_action;
1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1095: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1096: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);

Line 1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1090: p_data => x_msg_data);
1091:
1092: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1093: ROLLBACK TO create_approval_action;
1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1095: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1096: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1097: FND_MSG_PUB.ADD;
1098: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

Line 1098: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1095: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1096: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1097: FND_MSG_PUB.ADD;
1098: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1099: p_count => x_msg_count,
1100: p_data => x_msg_data);
1101:
1102: WHEN OTHERS THEN

Line 1104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1100: p_data => x_msg_data);
1101:
1102: WHEN OTHERS THEN
1103: ROLLBACK TO create_approval_action;
1104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1105: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1106: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1107: FND_MSG_PUB.ADD;
1108: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

Line 1108: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1105: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1106: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1107: FND_MSG_PUB.ADD;
1108: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1109: p_count => x_msg_count,
1110: p_data => x_msg_data);
1111:
1112: END create_approval_action;

Line 1163: IF FND_API.to_Boolean(p_init_msg_list) THEN

1159: -- standard start of API savepoint
1160: SAVEPOINT update_approval_action;
1161:
1162: -- initialize message list if p_init_msg_list is set to TRUE.
1163: IF FND_API.to_Boolean(p_init_msg_list) THEN
1164: FND_MSG_PUB.initialize;
1165: END IF;
1166:
1167: -- initialize API return status to success.

Line 1168: x_return_status := FND_API.G_RET_STS_SUCCESS;

1164: FND_MSG_PUB.initialize;
1165: END IF;
1166:
1167: -- initialize API return status to success.
1168: x_return_status := FND_API.G_RET_STS_SUCCESS;
1169: /*
1170: -- Get old record. Will be used by history package.
1171: get_approval_action_rec (
1172: p_action_id => l_approval_action_rec.action_id,

Line 1178: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1174: x_return_status => x_return_status,
1175: x_msg_count => x_msg_count,
1176: x_msg_data => x_msg_data );
1177: */
1178: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1179: RAISE FND_API.G_EXC_ERROR;
1180: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1182: END IF;

Line 1179: RAISE FND_API.G_EXC_ERROR;

1175: x_msg_count => x_msg_count,
1176: x_msg_data => x_msg_data );
1177: */
1178: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1179: RAISE FND_API.G_EXC_ERROR;
1180: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1182: END IF;
1183:

Line 1180: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1176: x_msg_data => x_msg_data );
1177: */
1178: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1179: RAISE FND_API.G_EXC_ERROR;
1180: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1182: END IF;
1183:
1184: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_approval_action procedure: Before call to do_update_approval_action proc');

Line 1181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1177: */
1178: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1179: RAISE FND_API.G_EXC_ERROR;
1180: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1182: END IF;
1183:
1184: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_approval_action procedure: Before call to do_update_approval_action proc');
1185:

Line 1195: WHEN FND_API.G_EXC_ERROR THEN

1191:
1192: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_approval_action procedure: After call to do_update_approval_action proc');
1193:
1194: EXCEPTION
1195: WHEN FND_API.G_EXC_ERROR THEN
1196: ROLLBACK TO update_approval_action;
1197: x_return_status := FND_API.G_RET_STS_ERROR;
1198: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1199: p_count => x_msg_count,

Line 1197: x_return_status := FND_API.G_RET_STS_ERROR;

1193:
1194: EXCEPTION
1195: WHEN FND_API.G_EXC_ERROR THEN
1196: ROLLBACK TO update_approval_action;
1197: x_return_status := FND_API.G_RET_STS_ERROR;
1198: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1199: p_count => x_msg_count,
1200: p_data => x_msg_data);
1201:

Line 1198: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1194: EXCEPTION
1195: WHEN FND_API.G_EXC_ERROR THEN
1196: ROLLBACK TO update_approval_action;
1197: x_return_status := FND_API.G_RET_STS_ERROR;
1198: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1199: p_count => x_msg_count,
1200: p_data => x_msg_data);
1201:
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1198: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1199: p_count => x_msg_count,
1200: p_data => x_msg_data);
1201:
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: ROLLBACK TO update_approval_action;
1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1205: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1206: p_count => x_msg_count,

Line 1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1200: p_data => x_msg_data);
1201:
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: ROLLBACK TO update_approval_action;
1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1205: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1206: p_count => x_msg_count,
1207: p_data => x_msg_data);
1208:

Line 1205: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1201:
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: ROLLBACK TO update_approval_action;
1204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1205: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1206: p_count => x_msg_count,
1207: p_data => x_msg_data);
1208:
1209: WHEN OTHERS THEN

Line 1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1207: p_data => x_msg_data);
1208:
1209: WHEN OTHERS THEN
1210: ROLLBACK TO update_approval_action;
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1213: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1214: FND_MSG_PUB.ADD;
1215: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

Line 1215: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1213: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1214: FND_MSG_PUB.ADD;
1215: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1216: p_count => x_msg_count,
1217: p_data => x_msg_data);
1218:
1219: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'End Update_approval_action procedure');

Line 1270: IF FND_API.to_Boolean(p_init_msg_list) THEN

1266: -- standard start of API savepoint
1267: SAVEPOINT delete_approval_action;
1268:
1269: -- initialize message list if p_init_msg_list is set to TRUE.
1270: IF FND_API.to_Boolean(p_init_msg_list) THEN
1271: FND_MSG_PUB.initialize;
1272: END IF;
1273:
1274: -- initialize API return status to success.

Line 1275: x_return_status := FND_API.G_RET_STS_SUCCESS;

1271: FND_MSG_PUB.initialize;
1272: END IF;
1273:
1274: -- initialize API return status to success.
1275: x_return_status := FND_API.G_RET_STS_SUCCESS;
1276:
1277: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_approval_action procedure: Before call to do_delete_approval_action proc');
1278:
1279: -- call to business logic.

Line 1287: WHEN FND_API.G_EXC_ERROR THEN

1283:
1284: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_approval_action procedure: After call to do_delete_approval_action proc');
1285:
1286: EXCEPTION
1287: WHEN FND_API.G_EXC_ERROR THEN
1288: ROLLBACK TO delete_approval_action;
1289: x_return_status := FND_API.G_RET_STS_ERROR;
1290: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1291: p_count => x_msg_count,

Line 1289: x_return_status := FND_API.G_RET_STS_ERROR;

1285:
1286: EXCEPTION
1287: WHEN FND_API.G_EXC_ERROR THEN
1288: ROLLBACK TO delete_approval_action;
1289: x_return_status := FND_API.G_RET_STS_ERROR;
1290: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1291: p_count => x_msg_count,
1292: p_data => x_msg_data);
1293:

Line 1290: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1286: EXCEPTION
1287: WHEN FND_API.G_EXC_ERROR THEN
1288: ROLLBACK TO delete_approval_action;
1289: x_return_status := FND_API.G_RET_STS_ERROR;
1290: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1291: p_count => x_msg_count,
1292: p_data => x_msg_data);
1293:
1294: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1294: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1290: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1291: p_count => x_msg_count,
1292: p_data => x_msg_data);
1293:
1294: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1295: ROLLBACK TO delete_approval_action;
1296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1297: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1298: p_count => x_msg_count,

Line 1296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1292: p_data => x_msg_data);
1293:
1294: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1295: ROLLBACK TO delete_approval_action;
1296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1297: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1298: p_count => x_msg_count,
1299: p_data => x_msg_data);
1300:

Line 1297: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1293:
1294: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1295: ROLLBACK TO delete_approval_action;
1296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1297: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1298: p_count => x_msg_count,
1299: p_data => x_msg_data);
1300:
1301: WHEN OTHERS THEN

Line 1303: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1299: p_data => x_msg_data);
1300:
1301: WHEN OTHERS THEN
1302: ROLLBACK TO delete_approval_action;
1303: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1304: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1305: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1306: FND_MSG_PUB.ADD;
1307: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

Line 1307: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

1303: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1304: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1305: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1306: FND_MSG_PUB.ADD;
1307: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1308: p_count => x_msg_count,
1309: p_data => x_msg_data);
1310:
1311: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'End Delete_approval_action procedure');