DBA Data[Home] [Help]

APPS.LNS_EXT_LOAN_PUB dependencies on FND_API

Line 143: RAISE FND_API.G_EXC_ERROR;

139: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Not all required data is set.');
140: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_NO_REQ_PAR');
141: FND_MSG_PUB.Add;
142: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
143: RAISE FND_API.G_EXC_ERROR;
144:
145: end if;
146:
147: open loan_details_cur(P_LOAN_EXT_REC.LOAN_ID);

Line 165: RAISE FND_API.G_EXC_ERROR;

161: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Not all required data is set.');
162: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_NO_REQ_PAR');
163: FND_MSG_PUB.Add;
164: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
165: RAISE FND_API.G_EXC_ERROR;
166:
167: end if;
168:
169: end if;

Line 184: RAISE FND_API.G_EXC_ERROR;

180: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Invalid loan status.');
181: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_INVAL_LN_STATUS');
182: FND_MSG_PUB.Add;
183: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
184: RAISE FND_API.G_EXC_ERROR;
185:
186: end if;
187:
188: open extn_count_cur(P_LOAN_EXT_REC.LOAN_ID);

Line 198: RAISE FND_API.G_EXC_ERROR;

194: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: A pending extension for this loan already exists.');
195: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_ALREADY_EXTN');
196: FND_MSG_PUB.Add;
197: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
198: RAISE FND_API.G_EXC_ERROR;
199:
200: end if;
201:
202: elsif (P_ACTION = 'UPDATE') then

Line 215: RAISE FND_API.G_EXC_ERROR;

211: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Invalid loan status.');
212: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_INVAL_LN_STATUS');
213: FND_MSG_PUB.Add;
214: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
215: RAISE FND_API.G_EXC_ERROR;
216:
217: end if;
218:
219: open extn_details_cur(P_LOAN_EXT_REC.LOAN_EXT_ID);

Line 229: RAISE FND_API.G_EXC_ERROR;

225: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Invalid loan extension.');
226: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_INVAL_EXTN');
227: FND_MSG_PUB.Add;
228: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
229: RAISE FND_API.G_EXC_ERROR;
230:
231: end if;
232:
233: end if;

Line 390: RAISE FND_API.G_EXC_ERROR;

386: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Not all required data is set.');
387: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_NO_REQ_PAR');
388: FND_MSG_PUB.Add;
389: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
390: RAISE FND_API.G_EXC_ERROR;
391:
392: end if;
393:
394: if l_customized = 'N' and l_NEW_INSTALLMENTS > l_OLD_INSTALLMENTS then

Line 405: RAISE FND_API.G_EXC_ERROR;

401: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Not all required data is set.');
402: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_NO_REQ_PAR');
403: FND_MSG_PUB.Add;
404: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
405: RAISE FND_API.G_EXC_ERROR;
406:
407: end if;
408:
409: end if;

Line 422: RAISE FND_API.G_EXC_ERROR;

418: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Invalid loan status.');
419: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_INVAL_LN_STATUS');
420: FND_MSG_PUB.Add;
421: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
422: RAISE FND_API.G_EXC_ERROR;
423:
424: end if;
425:
426: if (l_STATUS <> 'PENDING') then

Line 432: RAISE FND_API.G_EXC_ERROR;

428: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Invalid loan extension.');
429: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_INVAL_EXTN');
430: FND_MSG_PUB.Add;
431: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
432: RAISE FND_API.G_EXC_ERROR;
433:
434: end if;
435:
436: elsif (P_ACTION = 'REJECT') then

Line 449: RAISE FND_API.G_EXC_ERROR;

445: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Invalid loan status.');
446: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_INVAL_LN_STATUS');
447: FND_MSG_PUB.Add;
448: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
449: RAISE FND_API.G_EXC_ERROR;
450:
451: end if;
452:
453: if (l_STATUS <> 'PENDING') then

Line 459: RAISE FND_API.G_EXC_ERROR;

455: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Invalid loan extension.');
456: FND_MESSAGE.SET_NAME('LNS', 'LNS_EXTN_INVAL_EXTN');
457: FND_MSG_PUB.Add;
458: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
459: RAISE FND_API.G_EXC_ERROR;
460:
461: end if;
462:
463: end if;

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

537: SAVEPOINT SAVE_LOAN_EXTENSION;
538: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
539:
540: -- Standard call to check for call compatibility
541: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
543: END IF;
544:
545: -- Initialize message list if p_init_msg_list is set to TRUE

Line 542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

538: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
539:
540: -- Standard call to check for call compatibility
541: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
543: END IF;
544:
545: -- Initialize message list if p_init_msg_list is set to TRUE
546: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 546: IF FND_API.To_Boolean(p_init_msg_list) THEN

542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
543: END IF;
544:
545: -- Initialize message list if p_init_msg_list is set to TRUE
546: IF FND_API.To_Boolean(p_init_msg_list) THEN
547: FND_MSG_PUB.initialize;
548: END IF;
549:
550: -- Initialize API return status to success

Line 551: l_return_status := FND_API.G_RET_STS_SUCCESS;

547: FND_MSG_PUB.initialize;
548: END IF;
549:
550: -- Initialize API return status to success
551: l_return_status := FND_API.G_RET_STS_SUCCESS;
552:
553: -- START OF BODY OF API
554:
555: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input:');

Line 586: P_INIT_MSG_LIST => FND_API.G_TRUE,

582: l_NEW_TERM_REC.EXT_AMORT_TERM := P_LOAN_EXT_REC.EXT_AMORT_TERM;
583:
584: CALC_NEW_TERMS(
585: P_API_VERSION => 1.0,
586: P_INIT_MSG_LIST => FND_API.G_TRUE,
587: P_COMMIT => FND_API.G_FALSE,
588: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,
589: P_NEW_TERM_REC => l_NEW_TERM_REC,
590: X_RETURN_STATUS => l_return_status,

Line 587: P_COMMIT => FND_API.G_FALSE,

583:
584: CALC_NEW_TERMS(
585: P_API_VERSION => 1.0,
586: P_INIT_MSG_LIST => FND_API.G_TRUE,
587: P_COMMIT => FND_API.G_FALSE,
588: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,
589: P_NEW_TERM_REC => l_NEW_TERM_REC,
590: X_RETURN_STATUS => l_return_status,
591: X_MSG_COUNT => l_msg_count,

Line 588: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,

584: CALC_NEW_TERMS(
585: P_API_VERSION => 1.0,
586: P_INIT_MSG_LIST => FND_API.G_TRUE,
587: P_COMMIT => FND_API.G_FALSE,
588: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,
589: P_NEW_TERM_REC => l_NEW_TERM_REC,
590: X_RETURN_STATUS => l_return_status,
591: X_MSG_COUNT => l_msg_count,
592: X_MSG_DATA => l_msg_data);

Line 595: RAISE FND_API.G_EXC_ERROR;

591: X_MSG_COUNT => l_msg_count,
592: X_MSG_DATA => l_msg_data);
593:
594: if (l_return_status <> 'S') then
595: RAISE FND_API.G_EXC_ERROR;
596: end if;
597:
598:
599: BEGIN

Line 735: if P_COMMIT = FND_API.G_TRUE then

731: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Done');
732:
733: -- END OF BODY OF API
734:
735: if P_COMMIT = FND_API.G_TRUE then
736: COMMIT WORK;
737: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
738: end if;
739:

Line 740: x_return_status := FND_API.G_RET_STS_SUCCESS;

736: COMMIT WORK;
737: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
738: end if;
739:
740: x_return_status := FND_API.G_RET_STS_SUCCESS;
741:
742: -- Standard call to get message count and if count is 1, get message info
743: FND_MSG_PUB.Count_And_Get(
744: p_encoded => FND_API.G_FALSE,

Line 744: p_encoded => FND_API.G_FALSE,

740: x_return_status := FND_API.G_RET_STS_SUCCESS;
741:
742: -- Standard call to get message count and if count is 1, get message info
743: FND_MSG_PUB.Count_And_Get(
744: p_encoded => FND_API.G_FALSE,
745: p_count => x_msg_count,
746: p_data => x_msg_data);
747:
748: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

Line 751: WHEN FND_API.G_EXC_ERROR THEN

747:
748: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
749:
750: EXCEPTION
751: WHEN FND_API.G_EXC_ERROR THEN
752: ROLLBACK TO SAVE_LOAN_EXTENSION;
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
755: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 753: x_return_status := FND_API.G_RET_STS_ERROR;

749:
750: EXCEPTION
751: WHEN FND_API.G_EXC_ERROR THEN
752: ROLLBACK TO SAVE_LOAN_EXTENSION;
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
755: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
757: ROLLBACK TO SAVE_LOAN_EXTENSION;

Line 756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

752: ROLLBACK TO SAVE_LOAN_EXTENSION;
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
755: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
757: ROLLBACK TO SAVE_LOAN_EXTENSION;
758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
759: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
760: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

754: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
755: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
757: ROLLBACK TO SAVE_LOAN_EXTENSION;
758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
759: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
760: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
761: WHEN OTHERS THEN
762: ROLLBACK TO SAVE_LOAN_EXTENSION;

Line 763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

759: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
760: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
761: WHEN OTHERS THEN
762: ROLLBACK TO SAVE_LOAN_EXTENSION;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
765: FND_MSG_PUB.Add_Exc_Msg(l_api_name);
766: END IF;
767: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

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

915: SAVEPOINT APPROVE_LOAN_EXTENSION;
916: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
917:
918: -- Standard call to check for call compatibility
919: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922:
923: -- Initialize message list if p_init_msg_list is set to TRUE

Line 920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

916: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
917:
918: -- Standard call to check for call compatibility
919: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922:
923: -- Initialize message list if p_init_msg_list is set to TRUE
924: --IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 924: --IF FND_API.To_Boolean(p_init_msg_list) THEN

920: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
921: END IF;
922:
923: -- Initialize message list if p_init_msg_list is set to TRUE
924: --IF FND_API.To_Boolean(p_init_msg_list) THEN
925: -- FND_MSG_PUB.initialize;
926: --END IF;
927:
928: -- Initialize API return status to success

Line 929: l_return_status := FND_API.G_RET_STS_SUCCESS;

925: -- FND_MSG_PUB.initialize;
926: --END IF;
927:
928: -- Initialize API return status to success
929: l_return_status := FND_API.G_RET_STS_SUCCESS;
930:
931: -- START OF BODY OF API
932:
933: VALIDATE_EXTN(P_LOAN_EXT_ID, 'APPROVE');

Line 992: P_INIT_MSG_LIST => FND_API.G_FALSE,

988:
989: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Updating loan...');
990: LNS_LOAN_HEADER_PUB.UPDATE_LOAN(P_OBJECT_VERSION_NUMBER => l_OBJECT_VERSION_NUMBER,
991: P_LOAN_HEADER_REC => l_loan_header_rec,
992: P_INIT_MSG_LIST => FND_API.G_FALSE,
993: X_RETURN_STATUS => l_return_status,
994: X_MSG_COUNT => l_msg_count,
995: X_MSG_DATA => l_msg_data);
996: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Done');

Line 1149: if P_COMMIT = FND_API.G_TRUE then

1145: FND_MSG_PUB.DELETE_MSG(FND_MSG_PUB.COUNT_MSG);
1146:
1147: LNS_REP_UTILS.STORE_LOAN_AGREEMENT_CP(l_LOAN_ID, l_agreement_reason);
1148:
1149: if P_COMMIT = FND_API.G_TRUE then
1150: COMMIT WORK;
1151: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1152: end if;
1153:

Line 1154: x_return_status := FND_API.G_RET_STS_SUCCESS;

1150: COMMIT WORK;
1151: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1152: end if;
1153:
1154: x_return_status := FND_API.G_RET_STS_SUCCESS;
1155:
1156: -- Standard call to get message count and if count is 1, get message info
1157: FND_MSG_PUB.Count_And_Get(
1158: p_encoded => FND_API.G_FALSE,

Line 1158: p_encoded => FND_API.G_FALSE,

1154: x_return_status := FND_API.G_RET_STS_SUCCESS;
1155:
1156: -- Standard call to get message count and if count is 1, get message info
1157: FND_MSG_PUB.Count_And_Get(
1158: p_encoded => FND_API.G_FALSE,
1159: p_count => x_msg_count,
1160: p_data => x_msg_data);
1161:
1162: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

Line 1165: WHEN FND_API.G_EXC_ERROR THEN

1161:
1162: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1163:
1164: EXCEPTION
1165: WHEN FND_API.G_EXC_ERROR THEN
1166: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1167: x_return_status := FND_API.G_RET_STS_ERROR;
1168: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1169: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1167: x_return_status := FND_API.G_RET_STS_ERROR;

1163:
1164: EXCEPTION
1165: WHEN FND_API.G_EXC_ERROR THEN
1166: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1167: x_return_status := FND_API.G_RET_STS_ERROR;
1168: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1169: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1171: ROLLBACK TO APPROVE_LOAN_EXTENSION;

Line 1170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1166: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1167: x_return_status := FND_API.G_RET_STS_ERROR;
1168: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1169: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1171: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1173: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1174: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1168: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1169: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1171: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1173: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1174: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1175: WHEN OTHERS THEN
1176: ROLLBACK TO APPROVE_LOAN_EXTENSION;

Line 1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1173: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1174: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1175: WHEN OTHERS THEN
1176: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1178: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1179: FND_MSG_PUB.Add_Exc_Msg(l_api_name);
1180: END IF;
1181: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

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

1250: SAVEPOINT REJECT_LOAN_EXTENSION;
1251: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1252:
1253: -- Standard call to check for call compatibility
1254: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1256: END IF;
1257:
1258: -- Initialize message list if p_init_msg_list is set to TRUE

Line 1255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1251: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1252:
1253: -- Standard call to check for call compatibility
1254: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1256: END IF;
1257:
1258: -- Initialize message list if p_init_msg_list is set to TRUE
1259: --IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 1259: --IF FND_API.To_Boolean(p_init_msg_list) THEN

1255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1256: END IF;
1257:
1258: -- Initialize message list if p_init_msg_list is set to TRUE
1259: --IF FND_API.To_Boolean(p_init_msg_list) THEN
1260: -- FND_MSG_PUB.initialize;
1261: --END IF;
1262:
1263: -- Initialize API return status to success

Line 1264: l_return_status := FND_API.G_RET_STS_SUCCESS;

1260: -- FND_MSG_PUB.initialize;
1261: --END IF;
1262:
1263: -- Initialize API return status to success
1264: l_return_status := FND_API.G_RET_STS_SUCCESS;
1265:
1266: -- START OF BODY OF API
1267:
1268: VALIDATE_EXTN(P_LOAN_EXT_ID, 'REJECT');

Line 1285: if P_COMMIT = FND_API.G_TRUE then

1281: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Done');
1282:
1283: -- END OF BODY OF API
1284:
1285: if P_COMMIT = FND_API.G_TRUE then
1286: COMMIT WORK;
1287: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1288: end if;
1289:

Line 1290: x_return_status := FND_API.G_RET_STS_SUCCESS;

1286: COMMIT WORK;
1287: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1288: end if;
1289:
1290: x_return_status := FND_API.G_RET_STS_SUCCESS;
1291:
1292: -- Standard call to get message count and if count is 1, get message info
1293: FND_MSG_PUB.Count_And_Get(
1294: p_encoded => FND_API.G_FALSE,

Line 1294: p_encoded => FND_API.G_FALSE,

1290: x_return_status := FND_API.G_RET_STS_SUCCESS;
1291:
1292: -- Standard call to get message count and if count is 1, get message info
1293: FND_MSG_PUB.Count_And_Get(
1294: p_encoded => FND_API.G_FALSE,
1295: p_count => x_msg_count,
1296: p_data => x_msg_data);
1297:
1298: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

Line 1301: WHEN FND_API.G_EXC_ERROR THEN

1297:
1298: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1299:
1300: EXCEPTION
1301: WHEN FND_API.G_EXC_ERROR THEN
1302: ROLLBACK TO REJECT_LOAN_EXTENSION;
1303: x_return_status := FND_API.G_RET_STS_ERROR;
1304: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1305: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1303: x_return_status := FND_API.G_RET_STS_ERROR;

1299:
1300: EXCEPTION
1301: WHEN FND_API.G_EXC_ERROR THEN
1302: ROLLBACK TO REJECT_LOAN_EXTENSION;
1303: x_return_status := FND_API.G_RET_STS_ERROR;
1304: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1305: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1307: ROLLBACK TO REJECT_LOAN_EXTENSION;

Line 1306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1302: ROLLBACK TO REJECT_LOAN_EXTENSION;
1303: x_return_status := FND_API.G_RET_STS_ERROR;
1304: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1305: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1307: ROLLBACK TO REJECT_LOAN_EXTENSION;
1308: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1309: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1310: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1308: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1304: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1305: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1307: ROLLBACK TO REJECT_LOAN_EXTENSION;
1308: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1309: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1310: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1311: WHEN OTHERS THEN
1312: ROLLBACK TO REJECT_LOAN_EXTENSION;

Line 1313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1309: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1310: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1311: WHEN OTHERS THEN
1312: ROLLBACK TO REJECT_LOAN_EXTENSION;
1313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1314: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1315: FND_MSG_PUB.Add_Exc_Msg(l_api_name);
1316: END IF;
1317: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

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

1452: SAVEPOINT CALC_NEW_TERMS;
1453: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1454:
1455: -- Standard call to check for call compatibility
1456: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1457: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1458: END IF;
1459:
1460: -- Initialize message list if p_init_msg_list is set to TRUE

Line 1457: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1453: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1454:
1455: -- Standard call to check for call compatibility
1456: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1457: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1458: END IF;
1459:
1460: -- Initialize message list if p_init_msg_list is set to TRUE
1461: --IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 1461: --IF FND_API.To_Boolean(p_init_msg_list) THEN

1457: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1458: END IF;
1459:
1460: -- Initialize message list if p_init_msg_list is set to TRUE
1461: --IF FND_API.To_Boolean(p_init_msg_list) THEN
1462: -- FND_MSG_PUB.initialize;
1463: --END IF;
1464:
1465: -- Initialize API return status to success

Line 1466: l_return_status := FND_API.G_RET_STS_SUCCESS;

1462: -- FND_MSG_PUB.initialize;
1463: --END IF;
1464:
1465: -- Initialize API return status to success
1466: l_return_status := FND_API.G_RET_STS_SUCCESS;
1467:
1468: -- START OF BODY OF API
1469:
1470: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input:');

Line 1708: RAISE FND_API.G_EXC_ERROR;

1704: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Loan amortized term cannot be less than loan term.');
1705: FND_MESSAGE.SET_NAME('LNS', 'LNS_LOAN_TERM_INVALID');
1706: FND_MSG_PUB.Add;
1707: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1708: RAISE FND_API.G_EXC_ERROR;
1709:
1710: end if;
1711:
1712: -- END OF BODY OF API

Line 1714: if P_COMMIT = FND_API.G_TRUE then

1710: end if;
1711:
1712: -- END OF BODY OF API
1713: /*
1714: if P_COMMIT = FND_API.G_TRUE then
1715: COMMIT WORK;
1716: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1717: end if;
1718: */

Line 1719: x_return_status := FND_API.G_RET_STS_SUCCESS;

1715: COMMIT WORK;
1716: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1717: end if;
1718: */
1719: x_return_status := FND_API.G_RET_STS_SUCCESS;
1720:
1721: -- Standard call to get message count and if count is 1, get message info
1722: FND_MSG_PUB.Count_And_Get(
1723: p_encoded => FND_API.G_FALSE,

Line 1723: p_encoded => FND_API.G_FALSE,

1719: x_return_status := FND_API.G_RET_STS_SUCCESS;
1720:
1721: -- Standard call to get message count and if count is 1, get message info
1722: FND_MSG_PUB.Count_And_Get(
1723: p_encoded => FND_API.G_FALSE,
1724: p_count => x_msg_count,
1725: p_data => x_msg_data);
1726:
1727: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

Line 1730: WHEN FND_API.G_EXC_ERROR THEN

1726:
1727: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1728:
1729: EXCEPTION
1730: WHEN FND_API.G_EXC_ERROR THEN
1731: --ROLLBACK TO CALC_NEW_TERMS;
1732: x_return_status := FND_API.G_RET_STS_ERROR;
1733: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1734: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');

Line 1732: x_return_status := FND_API.G_RET_STS_ERROR;

1728:
1729: EXCEPTION
1730: WHEN FND_API.G_EXC_ERROR THEN
1731: --ROLLBACK TO CALC_NEW_TERMS;
1732: x_return_status := FND_API.G_RET_STS_ERROR;
1733: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1734: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1735: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1736: --ROLLBACK TO CALC_NEW_TERMS;

Line 1735: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1731: --ROLLBACK TO CALC_NEW_TERMS;
1732: x_return_status := FND_API.G_RET_STS_ERROR;
1733: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1734: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1735: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1736: --ROLLBACK TO CALC_NEW_TERMS;
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1738: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1739: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');

Line 1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1733: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1734: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1735: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1736: --ROLLBACK TO CALC_NEW_TERMS;
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1738: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1739: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1740: WHEN OTHERS THEN
1741: --ROLLBACK TO CALC_NEW_TERMS;

Line 1742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1738: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1739: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1740: WHEN OTHERS THEN
1741: --ROLLBACK TO CALC_NEW_TERMS;
1742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1743: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1744: FND_MSG_PUB.Add_Exc_Msg(l_api_name);
1745: END IF;
1746: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);