DBA Data[Home] [Help]

APPS.LNS_APPROVAL_ACTION_PUB dependencies on FND_API

Line 93: l_action_id <> FND_API.G_MISS_NUM

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

Line 104: RAISE FND_API.G_EXC_ERROR;

100:
101: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_DUPLICATE_COLUMN');
102: FND_MESSAGE.SET_TOKEN('COLUMN', 'action_id');
103: FND_MSG_PUB.ADD;
104: RAISE FND_API.G_EXC_ERROR;
105:
106: EXCEPTION
107: WHEN NO_DATA_FOUND THEN
108: 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 576: IF FND_API.to_Boolean(p_init_msg_list) THEN

572: -- standard start of API savepoint
573: SAVEPOINT create_approval_action;
574:
575: -- initialize message list if p_init_msg_list is set to TRUE.
576: IF FND_API.to_Boolean(p_init_msg_list) THEN
577: FND_MSG_PUB.initialize;
578: END IF;
579:
580: -- initialize API return status to success.

Line 581: x_return_status := FND_API.G_RET_STS_SUCCESS;

577: FND_MSG_PUB.initialize;
578: END IF;
579:
580: -- initialize API return status to success.
581: x_return_status := FND_API.G_RET_STS_SUCCESS;
582:
583:
584: -- START OF BODY OF API
585: /* init all_statements clob */

Line 627: RAISE FND_API.G_EXC_ERROR;

623: FND_MESSAGE.SET_TOKEN('VALUE', NVL(TO_CHAR(l_loan_header_rec.loan_id), 'null'));
624: FND_MSG_PUB.ADD;
625: CLOSE C_Get_Loan_Info;
626: l_last_api_called := 'C_Get_Loan_Info';
627: RAISE FND_API.G_EXC_ERROR;
628: END IF;
629: CLOSE C_Get_Loan_Info;
630: l_prev_loan_status := l_status;
631:

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

637: l_loan_header_rec.loan_id := l_approval_action_rec.loan_id;
638: IF (l_approval_action_rec.action_type = 'SUBMIT_FOR_APPR') THEN
639: IF l_status = 'INCOMPLETE' THEN
640: l_loan_header_rec.loan_status := 'PENDING';
641: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;
642:
643: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to generate bill for SubmtForApproval Fee');
644:
645: LNS_BILLING_BATCH_PUB.BILL_SING_LOAN_SUBMIT_APPR_FEE(P_API_VERSION => 1.0

Line 646: ,P_INIT_MSG_LIST => FND_API.G_TRUE

642:
643: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to generate bill for SubmtForApproval Fee');
644:
645: LNS_BILLING_BATCH_PUB.BILL_SING_LOAN_SUBMIT_APPR_FEE(P_API_VERSION => 1.0
646: ,P_INIT_MSG_LIST => FND_API.G_TRUE
647: ,P_COMMIT => FND_API.G_FALSE
648: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
649: ,P_LOAN_ID => l_approval_action_rec.loan_id
650: ,X_BILLED_YN => x_billed_yn

Line 647: ,P_COMMIT => FND_API.G_FALSE

643: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to generate bill for SubmtForApproval Fee');
644:
645: LNS_BILLING_BATCH_PUB.BILL_SING_LOAN_SUBMIT_APPR_FEE(P_API_VERSION => 1.0
646: ,P_INIT_MSG_LIST => FND_API.G_TRUE
647: ,P_COMMIT => FND_API.G_FALSE
648: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
649: ,P_LOAN_ID => l_approval_action_rec.loan_id
650: ,X_BILLED_YN => x_billed_yn
651: ,X_RETURN_STATUS => x_return_status

Line 648: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

644:
645: LNS_BILLING_BATCH_PUB.BILL_SING_LOAN_SUBMIT_APPR_FEE(P_API_VERSION => 1.0
646: ,P_INIT_MSG_LIST => FND_API.G_TRUE
647: ,P_COMMIT => FND_API.G_FALSE
648: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
649: ,P_LOAN_ID => l_approval_action_rec.loan_id
650: ,X_BILLED_YN => x_billed_yn
651: ,X_RETURN_STATUS => x_return_status
652: ,X_MSG_COUNT => x_msg_count

Line 655: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

651: ,X_RETURN_STATUS => x_return_status
652: ,X_MSG_COUNT => x_msg_count
653: ,X_MSG_DATA => x_msg_data);
654:
655: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
656: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_BILLING_BATCH_PUB.BILL_SUBMIT_APPROVAL_FEE failed with status ' || x_return_status);
657:
658: l_last_api_called := 'LNS_BILLING_BATCH_PUB.BILL_SUBMIT_APPROVAL_FEE';
659: RAISE FND_API.G_EXC_ERROR;

Line 659: RAISE FND_API.G_EXC_ERROR;

655: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
656: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_BILLING_BATCH_PUB.BILL_SUBMIT_APPROVAL_FEE failed with status ' || x_return_status);
657:
658: l_last_api_called := 'LNS_BILLING_BATCH_PUB.BILL_SUBMIT_APPROVAL_FEE';
659: RAISE FND_API.G_EXC_ERROR;
660:
661: ELSE
662: /* get statement after its billed */
663: open get_statement_cur(l_approval_action_rec.loan_id);

Line 685: RAISE FND_API.G_EXC_ERROR;

681: ELSE
682: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
683: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
684: FND_MSG_PUB.ADD;
685: RAISE FND_API.G_EXC_ERROR;
686: END IF;
687:
688: ELSIF (l_approval_action_rec.action_type = 'SUBMIT_FOR_CONV') THEN
689: IF (l_status = 'ACTIVE' AND l_current_phase = 'OPEN' AND l_multiple_funding_flag = 'Y' AND l_open_to_term_flag = 'Y') THEN

Line 695: RAISE FND_API.G_EXC_ERROR;

691: ELSE
692: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
693: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
694: FND_MSG_PUB.ADD;
695: RAISE FND_API.G_EXC_ERROR;
696: END IF;
697:
698: ELSIF (l_approval_action_rec.action_type = 'SUBMIT_FOR_CNCL') THEN
699: IF (l_loan_class_code = 'DIRECT') THEN

Line 703: ,P_INIT_MSG_LIST => FND_API.G_TRUE

699: IF (l_loan_class_code = 'DIRECT') THEN
700: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE');
701:
702: LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE(P_API_VERSION => 1.0
703: ,P_INIT_MSG_LIST => FND_API.G_TRUE
704: ,P_COMMIT => FND_API.G_FALSE
705: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
706: ,P_LOAN_ID => l_loan_header_rec.loan_id
707: ,X_RETURN_STATUS => x_return_status

Line 704: ,P_COMMIT => FND_API.G_FALSE

700: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE');
701:
702: LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE(P_API_VERSION => 1.0
703: ,P_INIT_MSG_LIST => FND_API.G_TRUE
704: ,P_COMMIT => FND_API.G_FALSE
705: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
706: ,P_LOAN_ID => l_loan_header_rec.loan_id
707: ,X_RETURN_STATUS => x_return_status
708: ,X_MSG_COUNT => x_msg_count

Line 705: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

701:
702: LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE(P_API_VERSION => 1.0
703: ,P_INIT_MSG_LIST => FND_API.G_TRUE
704: ,P_COMMIT => FND_API.G_FALSE
705: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
706: ,P_LOAN_ID => l_loan_header_rec.loan_id
707: ,X_RETURN_STATUS => x_return_status
708: ,X_MSG_COUNT => x_msg_count
709: ,X_MSG_DATA => x_msg_data);

Line 713: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

709: ,X_MSG_DATA => x_msg_data);
710:
711: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE');
712:
713: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
714: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE failed with status ' || x_return_status);
715: l_last_api_called := 'LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE';
716: RAISE FND_API.G_EXC_ERROR;
717: END IF;

Line 716: RAISE FND_API.G_EXC_ERROR;

712:
713: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
714: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE failed with status ' || x_return_status);
715: l_last_api_called := 'LNS_FUNDING_PUB.CANCEL_DISB_SCHEDULE';
716: RAISE FND_API.G_EXC_ERROR;
717: END IF;
718: ELSE
719: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
720: FND_MESSAGE.SET_TOKEN('VALUE', l_status);

Line 722: RAISE FND_API.G_EXC_ERROR;

718: ELSE
719: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
720: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
721: FND_MSG_PUB.ADD;
722: RAISE FND_API.G_EXC_ERROR;
723: END IF;
724:
725: ELSIF (l_approval_action_rec.action_type = 'APPROVE') THEN
726:

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

743:
744: elsif l_loan_class_code = 'DIRECT' then
745:
746: l_loan_header_rec.loan_status := 'APPROVED';
747: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;
748: -- use resource ID
749: l_loan_header_rec.loan_approved_by := l_resource_id;
750: l_loan_header_rec.loan_approval_date := sysdate;
751: --if (l_gl_date is null) then

Line 764: ,P_INIT_MSG_LIST => FND_API.G_TRUE

760:
761: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB');
762:
763: LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB(P_API_VERSION => 1.0
764: ,P_INIT_MSG_LIST => FND_API.G_TRUE
765: ,P_COMMIT => FND_API.G_FALSE
766: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
767: ,P_LOAN_ID => l_loan_header_rec.loan_id
768: ,X_RETURN_STATUS => x_return_status

Line 765: ,P_COMMIT => FND_API.G_FALSE

761: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB');
762:
763: LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB(P_API_VERSION => 1.0
764: ,P_INIT_MSG_LIST => FND_API.G_TRUE
765: ,P_COMMIT => FND_API.G_FALSE
766: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
767: ,P_LOAN_ID => l_loan_header_rec.loan_id
768: ,X_RETURN_STATUS => x_return_status
769: ,X_MSG_COUNT => x_msg_count

Line 766: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

762:
763: LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB(P_API_VERSION => 1.0
764: ,P_INIT_MSG_LIST => FND_API.G_TRUE
765: ,P_COMMIT => FND_API.G_FALSE
766: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
767: ,P_LOAN_ID => l_loan_header_rec.loan_id
768: ,X_RETURN_STATUS => x_return_status
769: ,X_MSG_COUNT => x_msg_count
770: ,X_MSG_DATA => x_msg_data);

Line 774: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

770: ,X_MSG_DATA => x_msg_data);
771:
772: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB');
773:
774: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
775: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB failed with status ' || x_return_status);
776: l_last_api_called := 'LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB';
777: RAISE FND_API.G_EXC_ERROR;
778: END IF;

Line 777: RAISE FND_API.G_EXC_ERROR;

773:
774: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
775: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB failed with status ' || x_return_status);
776: l_last_api_called := 'LNS_FUNDING_PUB.APPROVE_CANCEL_REM_DISB';
777: RAISE FND_API.G_EXC_ERROR;
778: END IF;
779:
780: -- approval action type = 'APPROVE'
781: ELSIF (l_status = 'ACTIVE' AND l_current_phase = 'OPEN' AND l_multiple_funding_flag = 'Y' AND l_open_to_term_flag = 'Y') THEN

Line 797: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

793: ,x_return_status => x_return_status
794: ,x_msg_count => x_msg_count
795: ,x_msg_data => x_msg_data);
796:
797: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
798: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, l_api_name || ' - LNS_FINANCIALS.shiftLoanDates failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
799: l_last_api_called := 'LNS_FINANCIALS.shiftLoanDates';
800: RAISE FND_API.G_EXC_ERROR;
801: END IF;

Line 800: RAISE FND_API.G_EXC_ERROR;

796:
797: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
798: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, l_api_name || ' - LNS_FINANCIALS.shiftLoanDates failed with message: ' ||FND_MSG_PUB.Get(p_encoded => 'F'));
799: l_last_api_called := 'LNS_FINANCIALS.shiftLoanDates';
800: RAISE FND_API.G_EXC_ERROR;
801: END IF;
802:
803: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'New loan start date: ' || l_loan_details.loan_start_date);
804: logMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'New first payment date: ' || l_loan_details.first_payment_Date);

Line 825: ,p_init_msg_list => FND_API.G_FALSE

821: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'FIRST_PAYMENT_DATE: ' || l_term_rec.FIRST_PAYMENT_DATE);
822: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'NEXT_PAYMENT_DUE_DATE: ' || l_term_rec.NEXT_PAYMENT_DUE_DATE);
823:
824: LNS_TERMS_PUB.update_term(P_OBJECT_VERSION_NUMBER => l_TERM_VERSION_NUMBER
825: ,p_init_msg_list => FND_API.G_FALSE
826: ,p_loan_term_rec => l_term_rec
827: ,X_RETURN_STATUS => x_return_status
828: ,X_MSG_COUNT => x_msg_count
829: ,X_MSG_DATA => x_msg_data);

Line 833: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

829: ,X_MSG_DATA => x_msg_data);
830:
831: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'x_return_status: ' || x_return_status);
832:
833: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
834: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Successfully update LNS_TERMS');
835: ELSE
836: FND_MESSAGE.SET_NAME('LNS', 'LNS_UPD_TERM_FAIL');
837: FND_MSG_PUB.Add;

Line 840: RAISE FND_API.G_EXC_ERROR;

836: FND_MESSAGE.SET_NAME('LNS', 'LNS_UPD_TERM_FAIL');
837: FND_MSG_PUB.Add;
838: 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'));
839: l_last_api_called := 'LNS_TERMS_PUB.update_term';
840: RAISE FND_API.G_EXC_ERROR;
841: END IF;
842:
843: /* setting data for future loan update */
844: l_loan_header_rec.LOAN_START_DATE := l_loan_details.loan_start_date;

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

844: l_loan_header_rec.LOAN_START_DATE := l_loan_details.loan_start_date;
845: l_loan_header_rec.LOAN_MATURITY_DATE := l_loan_details.maturity_date;
846: l_loan_header_rec.current_phase := 'TERM';
847: l_loan_header_rec.secondary_status := 'CONVERTED_TO_TERM_PHASE';
848: l_loan_header_rec.LAST_PAYMENT_NUMBER := FND_API.G_MISS_NUM;
849: l_loan_header_rec.LAST_AMORTIZATION_ID := FND_API.G_MISS_NUM;
850:
851: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Data to Update loan header with during conversion...');
852: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'loan_id: ' || l_loan_header_rec.loan_id);

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

845: l_loan_header_rec.LOAN_MATURITY_DATE := l_loan_details.maturity_date;
846: l_loan_header_rec.current_phase := 'TERM';
847: l_loan_header_rec.secondary_status := 'CONVERTED_TO_TERM_PHASE';
848: l_loan_header_rec.LAST_PAYMENT_NUMBER := FND_API.G_MISS_NUM;
849: l_loan_header_rec.LAST_AMORTIZATION_ID := FND_API.G_MISS_NUM;
850:
851: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Data to Update loan header with during conversion...');
852: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'loan_id: ' || l_loan_header_rec.loan_id);
853: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'LOAN_START_DATE: ' || l_loan_header_rec.LOAN_START_DATE);

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

861: However, now the conversionFees insert into feeScheds when this fee is assigned to the loan
862:
863: --Process Conversion Fees
864: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Before calling lns_fee_engine.processDisbursementFees to process Conversion fees for permanent conversion to TERM phase');
865: lns_fee_engine.processDisbursementFees(p_init_msg_list => FND_API.G_TRUE
866: ,p_commit => FND_API.G_FALSE
867: ,p_phase => 'TERM'
868: ,p_loan_id => l_loan_header_rec.loan_id
869: ,p_disb_head_id => NULL

Line 866: ,p_commit => FND_API.G_FALSE

862:
863: --Process Conversion Fees
864: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Before calling lns_fee_engine.processDisbursementFees to process Conversion fees for permanent conversion to TERM phase');
865: lns_fee_engine.processDisbursementFees(p_init_msg_list => FND_API.G_TRUE
866: ,p_commit => FND_API.G_FALSE
867: ,p_phase => 'TERM'
868: ,p_loan_id => l_loan_header_rec.loan_id
869: ,p_disb_head_id => NULL
870: ,x_return_status => x_return_status

Line 876: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

872: ,x_msg_data => x_msg_data);
873:
874: 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');
875:
876: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
877: 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'));
878: l_last_api_called := 'lns_fee_engine.processDisbursementFees';
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;

Line 879: RAISE FND_API.G_EXC_ERROR;

875:
876: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
877: 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'));
878: l_last_api_called := 'lns_fee_engine.processDisbursementFees';
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
881: */
882: /**********************End Permanent Conversion to Term Phase*************/
883:

Line 888: RAISE FND_API.G_EXC_ERROR;

884: ELSE
885: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
886: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
887: FND_MSG_PUB.ADD;
888: RAISE FND_API.G_EXC_ERROR;
889: END IF;
890:
891: ELSIF (l_approval_action_rec.action_type = 'REJECT') THEN
892: IF ( l_status = 'PENDING' OR (l_status = 'INCOMPLETE' AND l_loan_needs_approval = 'N') ) THEN

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

890:
891: ELSIF (l_approval_action_rec.action_type = 'REJECT') THEN
892: IF ( l_status = 'PENDING' OR (l_status = 'INCOMPLETE' AND l_loan_needs_approval = 'N') ) THEN
893: l_loan_header_rec.loan_status := 'REJECTED';
894: l_loan_header_rec.secondary_status := FND_API.G_MISS_CHAR;
895: ELSIF (l_status = 'PENDING_CANCELLATION') THEN
896: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
897:
898: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0

Line 899: ,P_INIT_MSG_LIST => FND_API.G_TRUE

895: ELSIF (l_status = 'PENDING_CANCELLATION') THEN
896: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
897:
898: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
899: ,P_INIT_MSG_LIST => FND_API.G_TRUE
900: ,P_COMMIT => FND_API.G_FALSE
901: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
902: ,P_LOAN_ID => l_loan_header_rec.loan_id
903: ,X_RETURN_STATUS => x_return_status

Line 900: ,P_COMMIT => FND_API.G_FALSE

896: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
897:
898: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
899: ,P_INIT_MSG_LIST => FND_API.G_TRUE
900: ,P_COMMIT => FND_API.G_FALSE
901: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
902: ,P_LOAN_ID => l_loan_header_rec.loan_id
903: ,X_RETURN_STATUS => x_return_status
904: ,X_MSG_COUNT => x_msg_count

Line 901: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

897:
898: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
899: ,P_INIT_MSG_LIST => FND_API.G_TRUE
900: ,P_COMMIT => FND_API.G_FALSE
901: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
902: ,P_LOAN_ID => l_loan_header_rec.loan_id
903: ,X_RETURN_STATUS => x_return_status
904: ,X_MSG_COUNT => x_msg_count
905: ,X_MSG_DATA => x_msg_data);

Line 909: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

905: ,X_MSG_DATA => x_msg_data);
906:
907: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
908:
909: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
910: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
911: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
912: RAISE FND_API.G_EXC_ERROR;
913: END IF;

Line 912: RAISE FND_API.G_EXC_ERROR;

908:
909: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
910: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
911: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
912: RAISE FND_API.G_EXC_ERROR;
913: END IF;
914: ELSIF (l_status = 'ACTIVE' and l_secondary_status = 'PENDING_CONVERSION') THEN
915: -- getting loan previous status
916: open prev_sec_status_cur(l_loan_header_rec.loan_id);

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

915: -- getting loan previous status
916: open prev_sec_status_cur(l_loan_header_rec.loan_id);
917: fetch prev_sec_status_cur into l_prev_sec_status;
918: close prev_sec_status_cur;
919: l_loan_header_rec.secondary_status := nvl(l_prev_sec_status,FND_API.G_MISS_CHAR);
920: ELSE
921: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
922: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
923: FND_MSG_PUB.ADD;

Line 924: RAISE FND_API.G_EXC_ERROR;

920: ELSE
921: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
922: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
923: FND_MSG_PUB.ADD;
924: RAISE FND_API.G_EXC_ERROR;
925: END IF;
926:
927: ELSIF (l_approval_action_rec.action_type = 'REQUEST_FOR_INFO') THEN
928:

Line 938: LNS_FEE_ENGINE.getSubmitForApprFeeSchedule(p_init_msg_list => FND_API.G_TRUE,

934:
935: /* Bug#8937530get Billed and Reversed 'Submit For Approval' Fees using getSubmitForApprFeeSchedule*/
936: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Calling Billed LNS_FEES_ENGINE.getSubmitForApprFeeSchedule...');
937:
938: LNS_FEE_ENGINE.getSubmitForApprFeeSchedule(p_init_msg_list => FND_API.G_TRUE,
939: p_loan_Id => l_approval_action_rec.loan_id,
940: p_billed_flag => 'Y',
941: x_fees_tbl => l_fee_tbl,
942: X_RETURN_STATUS => l_return_status,

Line 951: RAISE FND_API.G_EXC_ERROR;

947: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_msg_data: ' || substr(l_msg_data,1,225));
948:
949: if l_return_status <> 'S' then
950: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Failed in API LNS_FEES_ENGINE.getSubmitForApprFeeSchedule');
951: RAISE FND_API.G_EXC_ERROR;
952: end if;
953:
954: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Toal No. of Eligible Billed and Reversed SubmitApproval Fees are: ' || l_fee_tbl.count);
955:

Line 999: ,P_INIT_MSG_LIST => FND_API.G_TRUE

995: ELSIF (l_status = 'PENDING_CANCELLATION') THEN
996: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
997:
998: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
999: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1000: ,P_COMMIT => FND_API.G_FALSE
1001: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1002: ,P_LOAN_ID => l_loan_header_rec.loan_id
1003: ,X_RETURN_STATUS => x_return_status

Line 1000: ,P_COMMIT => FND_API.G_FALSE

996: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
997:
998: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
999: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1000: ,P_COMMIT => FND_API.G_FALSE
1001: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1002: ,P_LOAN_ID => l_loan_header_rec.loan_id
1003: ,X_RETURN_STATUS => x_return_status
1004: ,X_MSG_COUNT => x_msg_count

Line 1001: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

997:
998: LNS_FUNDING_PUB.REJECT_CANCEL_DISB(P_API_VERSION => 1.0
999: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1000: ,P_COMMIT => FND_API.G_FALSE
1001: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1002: ,P_LOAN_ID => l_loan_header_rec.loan_id
1003: ,X_RETURN_STATUS => x_return_status
1004: ,X_MSG_COUNT => x_msg_count
1005: ,X_MSG_DATA => x_msg_data);

Line 1009: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1005: ,X_MSG_DATA => x_msg_data);
1006:
1007: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - AFTER call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB');
1008:
1009: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1010: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
1011: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
1012: RAISE FND_API.G_EXC_ERROR;
1013: END IF;

Line 1012: RAISE FND_API.G_EXC_ERROR;

1008:
1009: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1010: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_FUNDING_PUB.REJECT_CANCEL_DISB failed with status ' || x_return_status);
1011: l_last_api_called := 'LNS_FUNDING_PUB.REJECT_CANCEL_DISB';
1012: RAISE FND_API.G_EXC_ERROR;
1013: END IF;
1014:
1015: --Loan Status change is already handled in the above procedure call. no need to update loan header again
1016: ELSIF l_status = 'ACTIVE' then

Line 1024: RAISE FND_API.G_EXC_ERROR;

1020: ELSE
1021: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_INVALID_STATUS');
1022: FND_MESSAGE.SET_TOKEN('VALUE', l_status);
1023: FND_MSG_PUB.ADD;
1024: RAISE FND_API.G_EXC_ERROR;
1025: END IF;
1026: --This code is passed from workflow AME Approval process for just creating Loan Approval Action
1027: --for the current approver.
1028: ELSIF (l_approval_action_rec.action_type = 'APPROVE_SINGLE') THEN

Line 1063: ,p_init_msg_list => FND_API.G_TRUE

1059: IF (l_appr_dist_cnt < 2) THEN
1060:
1061: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - before default distributions');
1062: Lns_distributions_pub.defaultDistributions(p_api_version => 1.0
1063: ,p_init_msg_list => FND_API.G_TRUE
1064: ,p_commit => FND_API.G_FALSE
1065: ,p_loan_id => l_loan_header_rec.loan_id
1066: ,p_loan_class_code => l_loan_class_code
1067: ,x_return_status => x_return_status

Line 1064: ,p_commit => FND_API.G_FALSE

1060:
1061: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - before default distributions');
1062: Lns_distributions_pub.defaultDistributions(p_api_version => 1.0
1063: ,p_init_msg_list => FND_API.G_TRUE
1064: ,p_commit => FND_API.G_FALSE
1065: ,p_loan_id => l_loan_header_rec.loan_id
1066: ,p_loan_class_code => l_loan_class_code
1067: ,x_return_status => x_return_status
1068: ,x_msg_count => x_msg_count

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

1075: IF (lns_utility_pub.IS_FED_FIN_ENABLED = 'Y' OR lns_utility_pub.IS_ENCUM_FIN_ENABLED = 'Y') THEN
1076: begin
1077: l_last_api_called := null;
1078: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'calling lns_distributions_pub.budgetary_control');
1079: lns_distributions_pub.budgetary_control(p_init_msg_list => FND_API.G_FALSE
1080: ,p_commit => FND_API.G_FALSE
1081: ,p_loan_id => l_approval_action_rec.loan_id
1082: ,p_budgetary_control_mode => 'R'
1083: ,x_budgetary_status_code => l_budgetary_status

Line 1080: ,p_commit => FND_API.G_FALSE

1076: begin
1077: l_last_api_called := null;
1078: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'calling lns_distributions_pub.budgetary_control');
1079: lns_distributions_pub.budgetary_control(p_init_msg_list => FND_API.G_FALSE
1080: ,p_commit => FND_API.G_FALSE
1081: ,p_loan_id => l_approval_action_rec.loan_id
1082: ,p_budgetary_control_mode => 'R'
1083: ,x_budgetary_status_code => l_budgetary_status
1084: ,x_return_status => x_return_status

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

1086: ,x_msg_data => x_msg_data);
1087: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to Lns_distributions_pub.budgetary_control return status ' || x_return_status);
1088: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'l_budgetary_status' || l_budgetary_status);
1089: --FND_MSG_PUB.initialize;
1090: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1091: RAISE FND_API.G_EXC_ERROR;
1092:
1093: else -- BC Call Returned 'S'
1094: if l_budgetary_status = 'ADVISORY' or l_budgetary_status = 'SUCCESS' then

Line 1091: RAISE FND_API.G_EXC_ERROR;

1087: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to Lns_distributions_pub.budgetary_control return status ' || x_return_status);
1088: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'l_budgetary_status' || l_budgetary_status);
1089: --FND_MSG_PUB.initialize;
1090: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1091: RAISE FND_API.G_EXC_ERROR;
1092:
1093: else -- BC Call Returned 'S'
1094: if l_budgetary_status = 'ADVISORY' or l_budgetary_status = 'SUCCESS' then
1095: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'budget reserved');

Line 1101: RAISE FND_API.G_EXC_ERROR;

1097:
1098: elsif l_budgetary_status = 'FAIL' or l_budgetary_status = 'PARTIAL' or l_budgetary_status = 'XLA_ERROR' then
1099: if l_budget_req_approval = 'Y' then
1100: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'budget required: NO BUDGET');
1101: RAISE FND_API.G_EXC_ERROR;
1102: else
1103: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'NO BUDGET');
1104: FND_MSG_PUB.initialize;
1105: l_loan_header_rec.secondary_status := 'NO_BUDGET';

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

1131: END IF;
1132:
1133: l_term_rec.TERM_ID := l_term_id;
1134: l_term_rec.LOAN_ID := l_loan_header_rec.loan_id;
1135: l_term_rec.ORIG_PAY_CALC_METHOD := FND_API.G_MISS_CHAR;
1136:
1137: LNS_TERMS_PUB.update_term(P_OBJECT_VERSION_NUMBER => l_object_version_number,
1138: p_init_msg_list => FND_API.G_FALSE,
1139: p_loan_term_rec => l_term_rec,

Line 1138: p_init_msg_list => FND_API.G_FALSE,

1134: l_term_rec.LOAN_ID := l_loan_header_rec.loan_id;
1135: l_term_rec.ORIG_PAY_CALC_METHOD := FND_API.G_MISS_CHAR;
1136:
1137: LNS_TERMS_PUB.update_term(P_OBJECT_VERSION_NUMBER => l_object_version_number,
1138: p_init_msg_list => FND_API.G_FALSE,
1139: p_loan_term_rec => l_term_rec,
1140: X_RETURN_STATUS => x_return_status,
1141: X_MSG_COUNT => x_msg_count,
1142: X_MSG_DATA => x_msg_data);

Line 1146: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1142: X_MSG_DATA => x_msg_data);
1143:
1144:
1145: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_return_status: ' || x_return_status);
1146: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1148:
1149: ELSE
1150: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Successfully update LNS_TERMS');

Line 1147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1143:
1144:
1145: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_return_status: ' || x_return_status);
1146: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1147: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1148:
1149: ELSE
1150: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Successfully update LNS_TERMS');
1151: END IF;

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

1152:
1153: end if;
1154:
1155: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to submit adjustment request');
1156: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
1157:
1158: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
1159: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1160: ,P_COMMIT => FND_API.G_FALSE

Line 1159: ,P_INIT_MSG_LIST => FND_API.G_TRUE

1155: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to submit adjustment request');
1156: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
1157:
1158: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
1159: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1160: ,P_COMMIT => FND_API.G_FALSE
1161: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1162: ,P_LOAN_ID => l_loan_header_rec.loan_id
1163: ,X_RETURN_STATUS => x_return_status

Line 1160: ,P_COMMIT => FND_API.G_FALSE

1156: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
1157:
1158: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
1159: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1160: ,P_COMMIT => FND_API.G_FALSE
1161: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1162: ,P_LOAN_ID => l_loan_header_rec.loan_id
1163: ,X_RETURN_STATUS => x_return_status
1164: ,X_MSG_COUNT => x_msg_count

Line 1161: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

1157:
1158: LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE(P_API_VERSION => 1.0
1159: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1160: ,P_COMMIT => FND_API.G_FALSE
1161: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1162: ,P_LOAN_ID => l_loan_header_rec.loan_id
1163: ,X_RETURN_STATUS => x_return_status
1164: ,X_MSG_COUNT => x_msg_count
1165: ,X_MSG_DATA => x_msg_data);

Line 1167: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1163: ,X_RETURN_STATUS => x_return_status
1164: ,X_MSG_COUNT => x_msg_count
1165: ,X_MSG_DATA => x_msg_data);
1166:
1167: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1168: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE failed with status ' || x_return_status);
1169: l_last_api_called := 'LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE';
1170: RAISE FND_API.G_EXC_ERROR;
1171:

Line 1170: RAISE FND_API.G_EXC_ERROR;

1166:
1167: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1168: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Call to LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE failed with status ' || x_return_status);
1169: l_last_api_called := 'LNS_BILLING_BATCH_PUB.ADJUST_ORIGINAL_RECEIVABLE';
1170: RAISE FND_API.G_EXC_ERROR;
1171:
1172: END IF;
1173:
1174: -- fix for bug 16278332: set new loan gl_date

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

1178: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'new l_gl_date = ' || l_loan_header_rec.gl_date);
1179:
1180: end if;
1181:
1182: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
1183:
1184: -- moved the defaultDistributions call to Concurrent Process
1185: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before call to submit gen distributions request');
1186: l_notify := FND_REQUEST.ADD_NOTIFICATION(FND_GLOBAL.USER_NAME);

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

1191: ,'', '', FALSE
1192: ,l_loan_header_rec.loan_id);
1193: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - after call to submit gen distributions request ' || l_request_id);
1194:
1195: end if; --END if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
1196:
1197: 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
1198:
1199: if (x_return_status = FND_API.G_RET_STS_SUCCESS AND

Line 1199: if (x_return_status = FND_API.G_RET_STS_SUCCESS AND

1195: end if; --END if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
1196:
1197: 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
1198:
1199: if (x_return_status = FND_API.G_RET_STS_SUCCESS AND
1200: l_approval_action_rec.action_type = 'APPROVE' and
1201: (l_loan_header_rec.loan_status = 'ACTIVE' or l_loan_header_rec.loan_status = 'APPROVED')) then
1202:
1203: -- generate Loan Agreement Report

Line 1242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1238: ,'', '', FALSE
1239: ,l_loan_header_rec.loan_id);
1240:
1241: if l_request_id = 0 then
1242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1243: FND_MESSAGE.SET_NAME('LNS', 'LNS_AGREEMENT_REQUEST_FAILED');
1244: FND_MSG_PUB.Add;
1245: l_last_api_called := 'FND_REQUEST.SUBMIT_REQUEST for Loan Agreement Report Generation';
1246: RAISE FND_API.G_EXC_ERROR;

Line 1246: RAISE FND_API.G_EXC_ERROR;

1242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1243: FND_MESSAGE.SET_NAME('LNS', 'LNS_AGREEMENT_REQUEST_FAILED');
1244: FND_MSG_PUB.Add;
1245: l_last_api_called := 'FND_REQUEST.SUBMIT_REQUEST for Loan Agreement Report Generation';
1246: RAISE FND_API.G_EXC_ERROR;
1247: else
1248: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Successfully submited Loan Agreement Report Generation Concurrent Program. Request id: ' || l_request_id);
1249: end if;
1250:

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

1259: fetch loan_version_cur into l_object_version_number;
1260: close loan_version_cur;
1261:
1262: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Before call to LNS_LOAN_HEADER_PUB.update_loan');
1263: LNS_LOAN_HEADER_PUB.update_loan(p_init_msg_list => FND_API.G_FALSE
1264: ,p_loan_header_rec => l_loan_header_rec
1265: ,p_object_version_number => l_object_version_number
1266: ,x_return_status => x_return_status
1267: ,x_msg_count => x_msg_count

Line 1271: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1267: ,x_msg_count => x_msg_count
1268: ,x_msg_data => x_msg_data);
1269: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - After call to LNS_LOAN_HEADER_PUB.update_loan proc');
1270: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, l_api_name || ' - x_return_status = ' || x_return_status);
1271: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1272: 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'));
1273: l_last_api_called := 'LNS_LOAN_HEADER_PUB.update_loan';
1274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1275: END IF;

Line 1274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1270: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, l_api_name || ' - x_return_status = ' || x_return_status);
1271: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1272: 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'));
1273: l_last_api_called := 'LNS_LOAN_HEADER_PUB.update_loan';
1274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1275: END IF;
1276:
1277: -- activate loan if BILL_ON_APPR_AMOUNT_FLAG = 'Y'
1278: open c_get_bill_opt(l_loan_header_rec.loan_id);

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

1294: l_loan_header_rec.loan_id := l_approval_action_rec.loan_id;
1295: l_loan_header_rec.loan_status := 'ACTIVE';
1296:
1297: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Before call to LNS_LOAN_HEADER_PUB.update_loan 2');
1298: LNS_LOAN_HEADER_PUB.update_loan(p_init_msg_list => FND_API.G_FALSE
1299: ,p_loan_header_rec => l_loan_header_rec
1300: ,p_object_version_number => l_object_version_number
1301: ,x_return_status => x_return_status
1302: ,x_msg_count => x_msg_count

Line 1306: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1302: ,x_msg_count => x_msg_count
1303: ,x_msg_data => x_msg_data);
1304: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - After call to LNS_LOAN_HEADER_PUB.update_loan 2 proc');
1305: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, l_api_name || ' - x_return_status = ' || x_return_status);
1306: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1307: 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'));
1308: l_last_api_called := 'LNS_LOAN_HEADER_PUB.update_loan';
1309: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1310: END IF;

Line 1309: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1305: logMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, l_api_name || ' - x_return_status = ' || x_return_status);
1306: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1307: 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'));
1308: l_last_api_called := 'LNS_LOAN_HEADER_PUB.update_loan';
1309: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1310: END IF;
1311:
1312: END IF;
1313:

Line 1319: WHEN FND_API.G_EXC_ERROR THEN

1315:
1316: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - End ');
1317:
1318: EXCEPTION
1319: WHEN FND_API.G_EXC_ERROR THEN
1320: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'before rollback');
1321: ROLLBACK TO create_approval_action;
1322: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'after rollback');
1323: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1323: x_return_status := FND_API.G_RET_STS_ERROR;

1319: WHEN FND_API.G_EXC_ERROR THEN
1320: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'before rollback');
1321: ROLLBACK TO create_approval_action;
1322: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'after rollback');
1323: x_return_status := FND_API.G_RET_STS_ERROR;
1324: if l_last_api_called is not null then
1325: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1326: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1327: FND_MSG_PUB.ADD;

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

1325: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1326: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1327: FND_MSG_PUB.ADD;
1328: end if;
1329: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1330: p_count => x_msg_count,
1331: p_data => x_msg_data);
1332:
1333: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1333: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1329: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1330: p_count => x_msg_count,
1331: p_data => x_msg_data);
1332:
1333: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1334: ROLLBACK TO create_approval_action;
1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1336: if l_last_api_called is not null then
1337: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');

Line 1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1331: p_data => x_msg_data);
1332:
1333: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1334: ROLLBACK TO create_approval_action;
1335: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1336: if l_last_api_called is not null then
1337: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1338: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1339: FND_MSG_PUB.ADD;

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

1337: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1338: FND_MESSAGE.SET_TOKEN('ERROR' ,'Failed API call: ' || l_last_api_called || ' SQLERRM: ' || SQLERRM);
1339: FND_MSG_PUB.ADD;
1340: end if;
1341: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1342: p_count => x_msg_count,
1343: p_data => x_msg_data);
1344:
1345: WHEN OTHERS THEN

Line 1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1343: p_data => x_msg_data);
1344:
1345: WHEN OTHERS THEN
1346: ROLLBACK TO create_approval_action;
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: if l_last_api_called is not null then
1349: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1350: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1351: FND_MSG_PUB.ADD;

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

1349: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1350: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1351: FND_MSG_PUB.ADD;
1352: end if;
1353: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1354: p_count => x_msg_count,
1355: p_data => x_msg_data);
1356:
1357: END create_approval_action;

Line 1408: IF FND_API.to_Boolean(p_init_msg_list) THEN

1404: -- standard start of API savepoint
1405: SAVEPOINT update_approval_action;
1406:
1407: -- initialize message list if p_init_msg_list is set to TRUE.
1408: IF FND_API.to_Boolean(p_init_msg_list) THEN
1409: FND_MSG_PUB.initialize;
1410: END IF;
1411:
1412: -- initialize API return status to success.

Line 1413: x_return_status := FND_API.G_RET_STS_SUCCESS;

1409: FND_MSG_PUB.initialize;
1410: END IF;
1411:
1412: -- initialize API return status to success.
1413: x_return_status := FND_API.G_RET_STS_SUCCESS;
1414: /*
1415: -- Get old record. Will be used by history package.
1416: get_approval_action_rec (
1417: p_action_id => l_approval_action_rec.action_id,

Line 1423: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1419: x_return_status => x_return_status,
1420: x_msg_count => x_msg_count,
1421: x_msg_data => x_msg_data );
1422: */
1423: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1424: RAISE FND_API.G_EXC_ERROR;
1425: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;

Line 1424: RAISE FND_API.G_EXC_ERROR;

1420: x_msg_count => x_msg_count,
1421: x_msg_data => x_msg_data );
1422: */
1423: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1424: RAISE FND_API.G_EXC_ERROR;
1425: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428:

Line 1425: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1421: x_msg_data => x_msg_data );
1422: */
1423: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1424: RAISE FND_API.G_EXC_ERROR;
1425: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428:
1429: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_approval_action procedure: Before call to do_update_approval_action proc');

Line 1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1422: */
1423: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1424: RAISE FND_API.G_EXC_ERROR;
1425: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428:
1429: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_approval_action procedure: Before call to do_update_approval_action proc');
1430:

Line 1440: WHEN FND_API.G_EXC_ERROR THEN

1436:
1437: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_approval_action procedure: After call to do_update_approval_action proc');
1438:
1439: EXCEPTION
1440: WHEN FND_API.G_EXC_ERROR THEN
1441: ROLLBACK TO update_approval_action;
1442: x_return_status := FND_API.G_RET_STS_ERROR;
1443: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,

Line 1442: x_return_status := FND_API.G_RET_STS_ERROR;

1438:
1439: EXCEPTION
1440: WHEN FND_API.G_EXC_ERROR THEN
1441: ROLLBACK TO update_approval_action;
1442: x_return_status := FND_API.G_RET_STS_ERROR;
1443: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,
1445: p_data => x_msg_data);
1446:

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

1439: EXCEPTION
1440: WHEN FND_API.G_EXC_ERROR THEN
1441: ROLLBACK TO update_approval_action;
1442: x_return_status := FND_API.G_RET_STS_ERROR;
1443: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,
1445: p_data => x_msg_data);
1446:
1447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1443: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1444: p_count => x_msg_count,
1445: p_data => x_msg_data);
1446:
1447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1448: ROLLBACK TO update_approval_action;
1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1450: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,

Line 1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1445: p_data => x_msg_data);
1446:
1447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1448: ROLLBACK TO update_approval_action;
1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1450: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,
1452: p_data => x_msg_data);
1453:

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

1446:
1447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1448: ROLLBACK TO update_approval_action;
1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1450: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,
1452: p_data => x_msg_data);
1453:
1454: WHEN OTHERS THEN

Line 1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1452: p_data => x_msg_data);
1453:
1454: WHEN OTHERS THEN
1455: ROLLBACK TO update_approval_action;
1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1457: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1458: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1459: FND_MSG_PUB.ADD;
1460: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

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

1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1457: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1458: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1459: FND_MSG_PUB.ADD;
1460: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1461: p_count => x_msg_count,
1462: p_data => x_msg_data);
1463:
1464: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'End Update_approval_action procedure');

Line 1515: IF FND_API.to_Boolean(p_init_msg_list) THEN

1511: -- standard start of API savepoint
1512: SAVEPOINT delete_approval_action;
1513:
1514: -- initialize message list if p_init_msg_list is set to TRUE.
1515: IF FND_API.to_Boolean(p_init_msg_list) THEN
1516: FND_MSG_PUB.initialize;
1517: END IF;
1518:
1519: -- initialize API return status to success.

Line 1520: x_return_status := FND_API.G_RET_STS_SUCCESS;

1516: FND_MSG_PUB.initialize;
1517: END IF;
1518:
1519: -- initialize API return status to success.
1520: x_return_status := FND_API.G_RET_STS_SUCCESS;
1521:
1522: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_approval_action procedure: Before call to do_delete_approval_action proc');
1523:
1524: -- call to business logic.

Line 1532: WHEN FND_API.G_EXC_ERROR THEN

1528:
1529: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_approval_action procedure: After call to do_delete_approval_action proc');
1530:
1531: EXCEPTION
1532: WHEN FND_API.G_EXC_ERROR THEN
1533: ROLLBACK TO delete_approval_action;
1534: x_return_status := FND_API.G_RET_STS_ERROR;
1535: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1536: p_count => x_msg_count,

Line 1534: x_return_status := FND_API.G_RET_STS_ERROR;

1530:
1531: EXCEPTION
1532: WHEN FND_API.G_EXC_ERROR THEN
1533: ROLLBACK TO delete_approval_action;
1534: x_return_status := FND_API.G_RET_STS_ERROR;
1535: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1536: p_count => x_msg_count,
1537: p_data => x_msg_data);
1538:

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

1531: EXCEPTION
1532: WHEN FND_API.G_EXC_ERROR THEN
1533: ROLLBACK TO delete_approval_action;
1534: x_return_status := FND_API.G_RET_STS_ERROR;
1535: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1536: p_count => x_msg_count,
1537: p_data => x_msg_data);
1538:
1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1535: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1536: p_count => x_msg_count,
1537: p_data => x_msg_data);
1538:
1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1540: ROLLBACK TO delete_approval_action;
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1542: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1543: p_count => x_msg_count,

Line 1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1537: p_data => x_msg_data);
1538:
1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1540: ROLLBACK TO delete_approval_action;
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1542: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1543: p_count => x_msg_count,
1544: p_data => x_msg_data);
1545:

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

1538:
1539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1540: ROLLBACK TO delete_approval_action;
1541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1542: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1543: p_count => x_msg_count,
1544: p_data => x_msg_data);
1545:
1546: WHEN OTHERS THEN

Line 1548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1544: p_data => x_msg_data);
1545:
1546: WHEN OTHERS THEN
1547: ROLLBACK TO delete_approval_action;
1548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1549: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1550: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1551: FND_MSG_PUB.ADD;
1552: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

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

1548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1549: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
1550: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1551: FND_MSG_PUB.ADD;
1552: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1553: p_count => x_msg_count,
1554: p_data => x_msg_data);
1555:
1556: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'End Delete_approval_action procedure');

Line 1675: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1671: SAVEPOINT APPROVE_ADD_RECEIVABLE;
1672: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Savepoint is established');
1673:
1674: -- Standard call to check for call compatibility
1675: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1676: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1677: END IF;
1678:
1679: -- Initialize message list if p_init_msg_list is set to TRUE

Line 1676: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1672: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Savepoint is established');
1673:
1674: -- Standard call to check for call compatibility
1675: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1676: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1677: END IF;
1678:
1679: -- Initialize message list if p_init_msg_list is set to TRUE
1680: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 1680: IF FND_API.To_Boolean(p_init_msg_list) THEN

1676: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1677: END IF;
1678:
1679: -- Initialize message list if p_init_msg_list is set to TRUE
1680: IF FND_API.To_Boolean(p_init_msg_list) THEN
1681: FND_MSG_PUB.initialize;
1682: END IF;
1683:
1684: -- Initialize API return status to success

Line 1685: l_return_status := FND_API.G_RET_STS_SUCCESS;

1681: FND_MSG_PUB.initialize;
1682: END IF;
1683:
1684: -- Initialize API return status to success
1685: l_return_status := FND_API.G_RET_STS_SUCCESS;
1686:
1687: -- START OF BODY OF API
1688:
1689: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Input P_LOAN_LINE_ID = ' || P_LOAN_LINE_ID);

Line 1698: RAISE FND_API.G_EXC_ERROR;

1694: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
1695: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_LOAN_LINE_ID' );
1696: FND_MSG_PUB.Add;
1697: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, FND_MSG_PUB.Get(p_encoded => 'F'));
1698: RAISE FND_API.G_EXC_ERROR;
1699:
1700: end if;
1701:
1702: -- checking for conditions

Line 1710: RAISE FND_API.G_EXC_ERROR;

1706:
1707: if l_cond_count > 0 then
1708: FND_MESSAGE.SET_NAME('LNS', 'LNS_NOT_ALL_COND_MET');
1709: FND_MSG_PUB.Add;
1710: RAISE FND_API.G_EXC_ERROR;
1711: end if;
1712:
1713: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Calling LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE...');
1714: LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE(P_API_VERSION => 1.0

Line 1715: ,P_INIT_MSG_LIST => FND_API.G_TRUE

1711: end if;
1712:
1713: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Calling LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE...');
1714: LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE(P_API_VERSION => 1.0
1715: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1716: ,P_COMMIT => FND_API.G_FALSE
1717: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1718: ,P_LOAN_LINE_ID => P_LOAN_LINE_ID
1719: ,X_RETURN_STATUS => l_return_status

Line 1716: ,P_COMMIT => FND_API.G_FALSE

1712:
1713: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Calling LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE...');
1714: LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE(P_API_VERSION => 1.0
1715: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1716: ,P_COMMIT => FND_API.G_FALSE
1717: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1718: ,P_LOAN_LINE_ID => P_LOAN_LINE_ID
1719: ,X_RETURN_STATUS => l_return_status
1720: ,X_MSG_COUNT => l_msg_count

Line 1717: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

1713: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Calling LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE...');
1714: LNS_BILLING_BATCH_PUB.ADJUST_ADD_RECEIVABLE(P_API_VERSION => 1.0
1715: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1716: ,P_COMMIT => FND_API.G_FALSE
1717: ,P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
1718: ,P_LOAN_LINE_ID => P_LOAN_LINE_ID
1719: ,X_RETURN_STATUS => l_return_status
1720: ,X_MSG_COUNT => l_msg_count
1721: ,X_MSG_DATA => l_msg_data);

Line 1725: RAISE FND_API.G_EXC_ERROR;

1721: ,X_MSG_DATA => l_msg_data);
1722:
1723: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_return_status = ' || l_return_status);
1724: IF l_return_status <> 'S' THEN
1725: RAISE FND_API.G_EXC_ERROR;
1726: END IF;
1727:
1728: open loan_info_cur(P_LOAN_LINE_ID);
1729: fetch loan_info_cur into l_loan_id,

Line 1742: ,P_INIT_MSG_LIST => FND_API.G_TRUE

1738: close loan_info_cur;
1739:
1740: -- create distributions for new approved additional receivable?
1741: LNS_DISTRIBUTIONS_PUB.createDistrForAddRec(P_API_VERSION => 1.0
1742: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1743: ,P_COMMIT => FND_API.G_FALSE
1744: ,P_LOAN_ID => l_loan_id
1745: ,P_LOAN_LINE_ID => P_LOAN_LINE_ID
1746: ,X_RETURN_STATUS => l_return_status

Line 1743: ,P_COMMIT => FND_API.G_FALSE

1739:
1740: -- create distributions for new approved additional receivable?
1741: LNS_DISTRIBUTIONS_PUB.createDistrForAddRec(P_API_VERSION => 1.0
1742: ,P_INIT_MSG_LIST => FND_API.G_TRUE
1743: ,P_COMMIT => FND_API.G_FALSE
1744: ,P_LOAN_ID => l_loan_id
1745: ,P_LOAN_LINE_ID => P_LOAN_LINE_ID
1746: ,X_RETURN_STATUS => l_return_status
1747: ,X_MSG_COUNT => l_msg_count

Line 1753: RAISE FND_API.G_EXC_ERROR;

1749: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_return_status = ' || l_return_status);
1750: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_msg_count = ' || l_msg_count);
1751: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'l_msg_data = ' || l_msg_data);
1752: IF l_return_status <> 'S' THEN
1753: RAISE FND_API.G_EXC_ERROR;
1754: END IF;
1755:
1756: /* updating loan header table */
1757: l_loan_header_rec.loan_id := l_loan_id;

Line 1775: P_INIT_MSG_LIST => FND_API.G_FALSE,

1771: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'ADD_REQUESTED_AMOUNT: ' || l_loan_header_rec.ADD_REQUESTED_AMOUNT);
1772:
1773: LNS_LOAN_HEADER_PUB.UPDATE_LOAN(P_OBJECT_VERSION_NUMBER => l_version_number,
1774: P_LOAN_HEADER_REC => l_loan_header_rec,
1775: P_INIT_MSG_LIST => FND_API.G_FALSE,
1776: X_RETURN_STATUS => l_return_status,
1777: X_MSG_COUNT => l_msg_count,
1778: X_MSG_DATA => l_msg_data);
1779:

Line 1786: RAISE FND_API.G_EXC_ERROR;

1782: IF l_return_status <> 'S' THEN
1783: FND_MESSAGE.SET_NAME('LNS', 'LNS_UPD_LOAN_FAIL');
1784: FND_MSG_PUB.Add;
1785: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, FND_MSG_PUB.Get(p_encoded => 'F'));
1786: RAISE FND_API.G_EXC_ERROR;
1787: END IF;
1788:
1789: FND_MESSAGE.SET_NAME('LNS', 'LNS_ADD_REC_AGR_REASON');
1790: FND_MESSAGE.SET_TOKEN('REC', l_trx_number);

Line 1800: if P_COMMIT = FND_API.G_TRUE then

1796: FND_MSG_PUB.DELETE_MSG(FND_MSG_PUB.COUNT_MSG);
1797:
1798: LNS_REP_UTILS.STORE_LOAN_AGREEMENT_CP(l_loan_id, l_agreement_reason);
1799:
1800: if P_COMMIT = FND_API.G_TRUE then
1801: COMMIT WORK;
1802: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Commited');
1803: end if;
1804:

Line 1806: x_return_status := FND_API.G_RET_STS_SUCCESS;

1802: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Commited');
1803: end if;
1804:
1805: -- END OF BODY OF API
1806: x_return_status := FND_API.G_RET_STS_SUCCESS;
1807:
1808: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Successfully approved additional receivable ' || l_trx_number);
1809:
1810: -- Standard call to get message count and if count is 1, get message info

Line 1812: p_encoded => FND_API.G_FALSE,

1808: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Successfully approved additional receivable ' || l_trx_number);
1809:
1810: -- Standard call to get message count and if count is 1, get message info
1811: FND_MSG_PUB.Count_And_Get(
1812: p_encoded => FND_API.G_FALSE,
1813: p_count => x_msg_count,
1814: p_data => x_msg_data);
1815:
1816: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, G_PKG_NAME || '.' || l_api_name || ' -');

Line 1819: WHEN FND_API.G_EXC_ERROR THEN

1815:
1816: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, G_PKG_NAME || '.' || l_api_name || ' -');
1817:
1818: EXCEPTION
1819: WHEN FND_API.G_EXC_ERROR THEN
1820: ROLLBACK TO APPROVE_ADD_RECEIVABLE;
1821: x_return_status := FND_API.G_RET_STS_ERROR;
1822: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1823: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');

Line 1821: x_return_status := FND_API.G_RET_STS_ERROR;

1817:
1818: EXCEPTION
1819: WHEN FND_API.G_EXC_ERROR THEN
1820: ROLLBACK TO APPROVE_ADD_RECEIVABLE;
1821: x_return_status := FND_API.G_RET_STS_ERROR;
1822: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1823: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: ROLLBACK TO APPROVE_ADD_RECEIVABLE;

Line 1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1820: ROLLBACK TO APPROVE_ADD_RECEIVABLE;
1821: x_return_status := FND_API.G_RET_STS_ERROR;
1822: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1823: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: ROLLBACK TO APPROVE_ADD_RECEIVABLE;
1826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1827: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1828: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');

Line 1826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1822: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1823: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: ROLLBACK TO APPROVE_ADD_RECEIVABLE;
1826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1827: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1828: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
1829: WHEN OTHERS THEN
1830: ROLLBACK TO APPROVE_ADD_RECEIVABLE;

Line 1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1827: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1828: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
1829: WHEN OTHERS THEN
1830: ROLLBACK TO APPROVE_ADD_RECEIVABLE;
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1832: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1833: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1834: END IF;
1835: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

Line 1946: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1942: SAVEPOINT APPROVE_LOAN_AM_ADJ;
1943: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Savepoint is established');
1944:
1945: -- Standard call to check for call compatibility
1946: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1947: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1948: END IF;
1949:
1950: -- Initialize message list if p_init_msg_list is set to TRUE

Line 1947: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1943: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Savepoint is established');
1944:
1945: -- Standard call to check for call compatibility
1946: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1947: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1948: END IF;
1949:
1950: -- Initialize message list if p_init_msg_list is set to TRUE
1951: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 1951: IF FND_API.To_Boolean(p_init_msg_list) THEN

1947: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1948: END IF;
1949:
1950: -- Initialize message list if p_init_msg_list is set to TRUE
1951: IF FND_API.To_Boolean(p_init_msg_list) THEN
1952: FND_MSG_PUB.initialize;
1953: END IF;
1954:
1955: -- Initialize API return status to success

Line 1956: l_return_status := FND_API.G_RET_STS_SUCCESS;

1952: FND_MSG_PUB.initialize;
1953: END IF;
1954:
1955: -- Initialize API return status to success
1956: l_return_status := FND_API.G_RET_STS_SUCCESS;
1957:
1958: -- START OF BODY OF API
1959:
1960: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Input P_LOAN_AMOUNT_ADJ_ID = ' || P_LOAN_AMOUNT_ADJ_ID);

Line 1969: RAISE FND_API.G_EXC_ERROR;

1965: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
1966: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_LOAN_AMOUNT_ADJ_ID' );
1967: FND_MSG_PUB.Add;
1968: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, FND_MSG_PUB.Get(p_encoded => 'F'));
1969: RAISE FND_API.G_EXC_ERROR;
1970:
1971: end if;
1972:
1973: -- checking for conditions

Line 1981: RAISE FND_API.G_EXC_ERROR;

1977:
1978: if l_cond_count > 0 then
1979: FND_MESSAGE.SET_NAME('LNS', 'LNS_NOT_ALL_COND_MET');
1980: FND_MSG_PUB.Add;
1981: RAISE FND_API.G_EXC_ERROR;
1982: end if;
1983:
1984: open loan_am_adj_cur(P_LOAN_AMOUNT_ADJ_ID);
1985: fetch loan_am_adj_cur into l_loan_id,

Line 2003: if P_COMMIT = FND_API.G_TRUE then

1999: FND_MSG_PUB.DELETE_MSG(FND_MSG_PUB.COUNT_MSG);
2000:
2001: LNS_REP_UTILS.STORE_LOAN_AGREEMENT_CP(l_loan_id, l_agreement_reason);
2002:
2003: if P_COMMIT = FND_API.G_TRUE then
2004: COMMIT WORK;
2005: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Commited');
2006: end if;
2007:

Line 2009: x_return_status := FND_API.G_RET_STS_SUCCESS;

2005: LogMessage(FND_LOG.LEVEL_STATEMENT, G_PKG_NAME, 'Commited');
2006: end if;
2007:
2008: -- END OF BODY OF API
2009: x_return_status := FND_API.G_RET_STS_SUCCESS;
2010:
2011: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Successfully loan amount adjustment ' || l_DESCRIPTION);
2012:
2013: -- Standard call to get message count and if count is 1, get message info

Line 2015: p_encoded => FND_API.G_FALSE,

2011: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Successfully loan amount adjustment ' || l_DESCRIPTION);
2012:
2013: -- Standard call to get message count and if count is 1, get message info
2014: FND_MSG_PUB.Count_And_Get(
2015: p_encoded => FND_API.G_FALSE,
2016: p_count => x_msg_count,
2017: p_data => x_msg_data);
2018:
2019: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, G_PKG_NAME || '.' || l_api_name || ' -');

Line 2022: WHEN FND_API.G_EXC_ERROR THEN

2018:
2019: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, G_PKG_NAME || '.' || l_api_name || ' -');
2020:
2021: EXCEPTION
2022: WHEN FND_API.G_EXC_ERROR THEN
2023: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2024: x_return_status := FND_API.G_RET_STS_ERROR;
2025: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2026: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');

Line 2024: x_return_status := FND_API.G_RET_STS_ERROR;

2020:
2021: EXCEPTION
2022: WHEN FND_API.G_EXC_ERROR THEN
2023: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2024: x_return_status := FND_API.G_RET_STS_ERROR;
2025: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2026: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
2027: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2028: ROLLBACK TO APPROVE_LOAN_AM_ADJ;

Line 2027: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2023: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2024: x_return_status := FND_API.G_RET_STS_ERROR;
2025: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2026: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
2027: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2028: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2030: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2031: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');

Line 2029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2025: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2026: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
2027: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2028: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2030: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2031: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
2032: WHEN OTHERS THEN
2033: ROLLBACK TO APPROVE_LOAN_AM_ADJ;

Line 2034: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2030: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2031: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'Rollbacked');
2032: WHEN OTHERS THEN
2033: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2034: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2035: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
2036: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2037: END IF;
2038: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

Line 2242: RAISE FND_API.G_EXC_ERROR;

2238: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
2239: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_LOAN_NUMBER' );
2240: FND_MSG_PUB.Add;
2241: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, FND_MSG_PUB.Get(p_encoded => 'F'));
2242: RAISE FND_API.G_EXC_ERROR;
2243:
2244: end if;
2245:
2246: if P_ACTION_TYPE is null then

Line 2252: RAISE FND_API.G_EXC_ERROR;

2248: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
2249: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_ACTION_TYPE' );
2250: FND_MSG_PUB.Add;
2251: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, FND_MSG_PUB.Get(p_encoded => 'F'));
2252: RAISE FND_API.G_EXC_ERROR;
2253:
2254: end if;
2255:
2256: if P_CURRENT_APPROVER is null then

Line 2262: RAISE FND_API.G_EXC_ERROR;

2258: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
2259: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_CURRENT_APPROVER' );
2260: FND_MSG_PUB.Add;
2261: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, FND_MSG_PUB.Get(p_encoded => 'F'));
2262: RAISE FND_API.G_EXC_ERROR;
2263:
2264: end if;
2265:
2266: --Main Logic to complete the workflow notification activity with user comments

Line 2301: WHEN FND_API.G_EXC_ERROR THEN

2297:
2298: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, G_PKG_NAME || '.' || l_api_name || ' -');
2299:
2300: EXCEPTION
2301: WHEN FND_API.G_EXC_ERROR THEN
2302: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_ERROR exception block');
2303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2304: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_UNEXPECTED_ERROR exception block');
2305: WHEN OTHERS THEN

Line 2302: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_ERROR exception block');

2298: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, G_PKG_NAME || '.' || l_api_name || ' -');
2299:
2300: EXCEPTION
2301: WHEN FND_API.G_EXC_ERROR THEN
2302: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_ERROR exception block');
2303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2304: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_UNEXPECTED_ERROR exception block');
2305: WHEN OTHERS THEN
2306: ROLLBACK TO APPROVE_LOAN_AM_ADJ;

Line 2303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2299:
2300: EXCEPTION
2301: WHEN FND_API.G_EXC_ERROR THEN
2302: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_ERROR exception block');
2303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2304: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_UNEXPECTED_ERROR exception block');
2305: WHEN OTHERS THEN
2306: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2307: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'OTHERS exception block');

Line 2304: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_UNEXPECTED_ERROR exception block');

2300: EXCEPTION
2301: WHEN FND_API.G_EXC_ERROR THEN
2302: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_ERROR exception block');
2303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2304: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'FND_API.G_EXC_UNEXPECTED_ERROR exception block');
2305: WHEN OTHERS THEN
2306: ROLLBACK TO APPROVE_LOAN_AM_ADJ;
2307: LogMessage(FND_LOG.LEVEL_UNEXPECTED, G_PKG_NAME, 'OTHERS exception block');
2308: END;