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 587: P_INIT_MSG_LIST => FND_API.G_TRUE,

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

Line 588: P_COMMIT => FND_API.G_FALSE,

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

Line 589: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,

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

Line 596: RAISE FND_API.G_EXC_ERROR;

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

Line 739: if P_COMMIT = FND_API.G_TRUE then

735: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Done');
736:
737: -- END OF BODY OF API
738:
739: if P_COMMIT = FND_API.G_TRUE then
740: COMMIT WORK;
741: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
742: end if;
743:

Line 744: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 748: p_encoded => FND_API.G_FALSE,

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

Line 755: WHEN FND_API.G_EXC_ERROR THEN

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

Line 757: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 760: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

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

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

Line 921: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

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

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

Line 930: l_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 989: P_INIT_MSG_LIST => FND_API.G_FALSE,

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

Line 1157: if P_COMMIT = FND_API.G_TRUE then

1153: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Success. Request id: ' || l_request_id);
1154: end if;
1155: */
1156:
1157: if P_COMMIT = FND_API.G_TRUE then
1158: COMMIT WORK;
1159: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1160: end if;
1161:

Line 1162: x_return_status := FND_API.G_RET_STS_SUCCESS;

1158: COMMIT WORK;
1159: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1160: end if;
1161:
1162: x_return_status := FND_API.G_RET_STS_SUCCESS;
1163:
1164: -- Standard call to get message count and if count is 1, get message info
1165: FND_MSG_PUB.Count_And_Get(
1166: p_encoded => FND_API.G_FALSE,

Line 1166: p_encoded => FND_API.G_FALSE,

1162: x_return_status := FND_API.G_RET_STS_SUCCESS;
1163:
1164: -- Standard call to get message count and if count is 1, get message info
1165: FND_MSG_PUB.Count_And_Get(
1166: p_encoded => FND_API.G_FALSE,
1167: p_count => x_msg_count,
1168: p_data => x_msg_data);
1169:
1170: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

Line 1173: WHEN FND_API.G_EXC_ERROR THEN

1169:
1170: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1171:
1172: EXCEPTION
1173: WHEN FND_API.G_EXC_ERROR THEN
1174: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1175: x_return_status := FND_API.G_RET_STS_ERROR;
1176: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1177: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1175: x_return_status := FND_API.G_RET_STS_ERROR;

1171:
1172: EXCEPTION
1173: WHEN FND_API.G_EXC_ERROR THEN
1174: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1175: x_return_status := FND_API.G_RET_STS_ERROR;
1176: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1177: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1179: ROLLBACK TO APPROVE_LOAN_EXTENSION;

Line 1178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1174: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1175: x_return_status := FND_API.G_RET_STS_ERROR;
1176: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1177: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1179: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1182: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1176: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1177: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1179: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1182: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1183: WHEN OTHERS THEN
1184: ROLLBACK TO APPROVE_LOAN_EXTENSION;

Line 1185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1181: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1182: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1183: WHEN OTHERS THEN
1184: ROLLBACK TO APPROVE_LOAN_EXTENSION;
1185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1186: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1187: FND_MSG_PUB.Add_Exc_Msg(l_api_name);
1188: END IF;
1189: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

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

1258: SAVEPOINT REJECT_LOAN_EXTENSION;
1259: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1260:
1261: -- Standard call to check for call compatibility
1262: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1264: END IF;
1265:
1266: -- Initialize message list if p_init_msg_list is set to TRUE

Line 1263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1259: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1260:
1261: -- Standard call to check for call compatibility
1262: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1264: END IF;
1265:
1266: -- Initialize message list if p_init_msg_list is set to TRUE
1267: --IF FND_API.To_Boolean(p_init_msg_list) THEN

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

1263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1264: END IF;
1265:
1266: -- Initialize message list if p_init_msg_list is set to TRUE
1267: --IF FND_API.To_Boolean(p_init_msg_list) THEN
1268: -- FND_MSG_PUB.initialize;
1269: --END IF;
1270:
1271: -- Initialize API return status to success

Line 1272: l_return_status := FND_API.G_RET_STS_SUCCESS;

1268: -- FND_MSG_PUB.initialize;
1269: --END IF;
1270:
1271: -- Initialize API return status to success
1272: l_return_status := FND_API.G_RET_STS_SUCCESS;
1273:
1274: -- START OF BODY OF API
1275:
1276: VALIDATE_EXTN(P_LOAN_EXT_ID, 'REJECT');

Line 1293: if P_COMMIT = FND_API.G_TRUE then

1289: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Done');
1290:
1291: -- END OF BODY OF API
1292:
1293: if P_COMMIT = FND_API.G_TRUE then
1294: COMMIT WORK;
1295: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1296: end if;
1297:

Line 1298: x_return_status := FND_API.G_RET_STS_SUCCESS;

1294: COMMIT WORK;
1295: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1296: end if;
1297:
1298: x_return_status := FND_API.G_RET_STS_SUCCESS;
1299:
1300: -- Standard call to get message count and if count is 1, get message info
1301: FND_MSG_PUB.Count_And_Get(
1302: p_encoded => FND_API.G_FALSE,

Line 1302: p_encoded => FND_API.G_FALSE,

1298: x_return_status := FND_API.G_RET_STS_SUCCESS;
1299:
1300: -- Standard call to get message count and if count is 1, get message info
1301: FND_MSG_PUB.Count_And_Get(
1302: p_encoded => FND_API.G_FALSE,
1303: p_count => x_msg_count,
1304: p_data => x_msg_data);
1305:
1306: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

Line 1309: WHEN FND_API.G_EXC_ERROR THEN

1305:
1306: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1307:
1308: EXCEPTION
1309: WHEN FND_API.G_EXC_ERROR THEN
1310: ROLLBACK TO REJECT_LOAN_EXTENSION;
1311: x_return_status := FND_API.G_RET_STS_ERROR;
1312: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1313: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1311: x_return_status := FND_API.G_RET_STS_ERROR;

1307:
1308: EXCEPTION
1309: WHEN FND_API.G_EXC_ERROR THEN
1310: ROLLBACK TO REJECT_LOAN_EXTENSION;
1311: x_return_status := FND_API.G_RET_STS_ERROR;
1312: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1313: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1315: ROLLBACK TO REJECT_LOAN_EXTENSION;

Line 1314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1310: ROLLBACK TO REJECT_LOAN_EXTENSION;
1311: x_return_status := FND_API.G_RET_STS_ERROR;
1312: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1313: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1315: ROLLBACK TO REJECT_LOAN_EXTENSION;
1316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1317: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1318: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');

Line 1316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1312: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1313: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1315: ROLLBACK TO REJECT_LOAN_EXTENSION;
1316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1317: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1318: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1319: WHEN OTHERS THEN
1320: ROLLBACK TO REJECT_LOAN_EXTENSION;

Line 1321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1317: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1318: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1319: WHEN OTHERS THEN
1320: ROLLBACK TO REJECT_LOAN_EXTENSION;
1321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1322: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1323: FND_MSG_PUB.Add_Exc_Msg(l_api_name);
1324: END IF;
1325: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

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

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

Line 1462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

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

1462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1463: END IF;
1464:
1465: -- Initialize message list if p_init_msg_list is set to TRUE
1466: --IF FND_API.To_Boolean(p_init_msg_list) THEN
1467: -- FND_MSG_PUB.initialize;
1468: --END IF;
1469:
1470: -- Initialize API return status to success

Line 1471: l_return_status := FND_API.G_RET_STS_SUCCESS;

1467: -- FND_MSG_PUB.initialize;
1468: --END IF;
1469:
1470: -- Initialize API return status to success
1471: l_return_status := FND_API.G_RET_STS_SUCCESS;
1472:
1473: -- START OF BODY OF API
1474:
1475: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input:');

Line 1686: RAISE FND_API.G_EXC_ERROR;

1682: -- LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: Loan amortized term cannot be less than loan term.');
1683: FND_MESSAGE.SET_NAME('LNS', 'LNS_LOAN_TERM_INVALID');
1684: FND_MSG_PUB.Add;
1685: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1686: RAISE FND_API.G_EXC_ERROR;
1687:
1688: end if;
1689:
1690: -- END OF BODY OF API

Line 1692: if P_COMMIT = FND_API.G_TRUE then

1688: end if;
1689:
1690: -- END OF BODY OF API
1691: /*
1692: if P_COMMIT = FND_API.G_TRUE then
1693: COMMIT WORK;
1694: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1695: end if;
1696: */

Line 1697: x_return_status := FND_API.G_RET_STS_SUCCESS;

1693: COMMIT WORK;
1694: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1695: end if;
1696: */
1697: x_return_status := FND_API.G_RET_STS_SUCCESS;
1698:
1699: -- Standard call to get message count and if count is 1, get message info
1700: FND_MSG_PUB.Count_And_Get(
1701: p_encoded => FND_API.G_FALSE,

Line 1701: p_encoded => FND_API.G_FALSE,

1697: x_return_status := FND_API.G_RET_STS_SUCCESS;
1698:
1699: -- Standard call to get message count and if count is 1, get message info
1700: FND_MSG_PUB.Count_And_Get(
1701: p_encoded => FND_API.G_FALSE,
1702: p_count => x_msg_count,
1703: p_data => x_msg_data);
1704:
1705: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

Line 1708: WHEN FND_API.G_EXC_ERROR THEN

1704:
1705: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1706:
1707: EXCEPTION
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: --ROLLBACK TO CALC_NEW_TERMS;
1710: x_return_status := FND_API.G_RET_STS_ERROR;
1711: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1712: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');

Line 1710: x_return_status := FND_API.G_RET_STS_ERROR;

1706:
1707: EXCEPTION
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: --ROLLBACK TO CALC_NEW_TERMS;
1710: x_return_status := FND_API.G_RET_STS_ERROR;
1711: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1712: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1714: --ROLLBACK TO CALC_NEW_TERMS;

Line 1713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1709: --ROLLBACK TO CALC_NEW_TERMS;
1710: x_return_status := FND_API.G_RET_STS_ERROR;
1711: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1712: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1714: --ROLLBACK TO CALC_NEW_TERMS;
1715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1716: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1717: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');

Line 1715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1711: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1712: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1714: --ROLLBACK TO CALC_NEW_TERMS;
1715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1716: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1717: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1718: WHEN OTHERS THEN
1719: --ROLLBACK TO CALC_NEW_TERMS;

Line 1720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1716: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1717: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'In exception');
1718: WHEN OTHERS THEN
1719: --ROLLBACK TO CALC_NEW_TERMS;
1720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1721: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1722: FND_MSG_PUB.Add_Exc_Msg(l_api_name);
1723: END IF;
1724: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);