140: END IF;
141:
142: -- if primary key value is passed, check for uniqueness.
143: IF l_COND_ASSIGNMENT_id IS NOT NULL AND
144: l_COND_ASSIGNMENT_id <> FND_API.G_MISS_NUM
145: THEN
146: BEGIN
147: SELECT 'Y'
148: INTO l_dummy
151:
152: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_DUPLICATE_COLUMN');
153: FND_MESSAGE.SET_TOKEN('COLUMN', 'cond_assignment_id');
154: FND_MSG_PUB.ADD;
155: RAISE FND_API.G_EXC_ERROR;
156:
157: EXCEPTION
158: WHEN NO_DATA_FOUND THEN
159: NULL;
264: THEN
265: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_RECORD_CHANGED');
266: FND_MESSAGE.SET_TOKEN('TABLE', 'lns_COND_ASSIGNMENTs');
267: FND_MSG_PUB.ADD;
268: RAISE FND_API.G_EXC_ERROR;
269: END IF;
270:
271: p_object_version_number := nvl(l_object_version_number, 1) + 1;
272:
274: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_NO_RECORD');
275: FND_MESSAGE.SET_TOKEN('RECORD', 'cond_assignment_rec');
276: FND_MESSAGE.SET_TOKEN('VALUE', NVL(TO_CHAR(p_COND_ASSIGNMENT_rec.cond_assignment_id), 'null'));
277: FND_MSG_PUB.ADD;
278: RAISE FND_API.G_EXC_ERROR;
279: END;
280:
281: Set_Defaults(p_COND_ASSIGNMENT_rec);
282:
365: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin do_delete_COND_ASSIGNMENT procedure');
366: END IF;
367:
368: IF p_COND_ASSIGNMENT_id IS NOT NULL AND
369: p_COND_ASSIGNMENT_id <> FND_API.G_MISS_NUM
370: THEN
371: -- check whether record has been deleted by another user. If not, lock it.
372: BEGIN
373: SELECT loan_id, object_version_number
381: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_NO_RECORD');
382: FND_MESSAGE.SET_TOKEN('RECORD', 'cond_assignment_rec');
383: FND_MESSAGE.SET_TOKEN('VALUE', NVL(TO_CHAR(p_COND_ASSIGNMENT_id), 'null'));
384: FND_MSG_PUB.ADD;
385: RAISE FND_API.G_EXC_ERROR;
386: END;
387: END IF;
388:
389:
404: WHERE COND_ASSIGNMENT_ID = p_cond_assignment_id;
405:
406: EXCEPTION
407: WHEN OTHERS THEN
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
409: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
410: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
411: FND_MSG_PUB.ADD;
412: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
409: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
410: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
411: FND_MSG_PUB.ADD;
412: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
413: END;
414:
415: /*
416: --Call to table-handler
498: -- standard start of API savepoint
499: SAVEPOINT create_COND_ASSIGNMENT;
500:
501: -- initialize message list if p_init_msg_list is set to TRUE.
502: IF FND_API.to_Boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
503: FND_MSG_PUB.initialize;
504: END IF;
505:
506: -- initialize API return status to success.
503: FND_MSG_PUB.initialize;
504: END IF;
505:
506: -- initialize API return status to success.
507: x_return_status := FND_API.G_RET_STS_SUCCESS;
508:
509: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
510: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Create_COND_ASSIGNMENT procedure: Before call to do_create_COND_ASSIGNMENT proc');
511: END IF;
521: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Create_COND_ASSIGNMENT procedure: After call to do_create_COND_ASSIGNMENT proc');
522: END IF;
523:
524: EXCEPTION
525: WHEN FND_API.G_EXC_ERROR THEN
526: ROLLBACK TO create_COND_ASSIGNMENT;
527: x_return_status := FND_API.G_RET_STS_ERROR;
528: FND_MSG_PUB.Count_And_Get(
529: p_encoded => FND_API.G_FALSE,
523:
524: EXCEPTION
525: WHEN FND_API.G_EXC_ERROR THEN
526: ROLLBACK TO create_COND_ASSIGNMENT;
527: x_return_status := FND_API.G_RET_STS_ERROR;
528: FND_MSG_PUB.Count_And_Get(
529: p_encoded => FND_API.G_FALSE,
530: p_count => x_msg_count,
531: p_data => x_msg_data);
525: WHEN FND_API.G_EXC_ERROR THEN
526: ROLLBACK TO create_COND_ASSIGNMENT;
527: x_return_status := FND_API.G_RET_STS_ERROR;
528: FND_MSG_PUB.Count_And_Get(
529: p_encoded => FND_API.G_FALSE,
530: p_count => x_msg_count,
531: p_data => x_msg_data);
532:
533: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
529: p_encoded => FND_API.G_FALSE,
530: p_count => x_msg_count,
531: p_data => x_msg_data);
532:
533: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
534: ROLLBACK TO create_COND_ASSIGNMENT;
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: FND_MSG_PUB.Count_And_Get(
537: p_encoded => FND_API.G_FALSE,
531: p_data => x_msg_data);
532:
533: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
534: ROLLBACK TO create_COND_ASSIGNMENT;
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: FND_MSG_PUB.Count_And_Get(
537: p_encoded => FND_API.G_FALSE,
538: p_count => x_msg_count,
539: p_data => x_msg_data);
533: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
534: ROLLBACK TO create_COND_ASSIGNMENT;
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: FND_MSG_PUB.Count_And_Get(
537: p_encoded => FND_API.G_FALSE,
538: p_count => x_msg_count,
539: p_data => x_msg_data);
540:
541: WHEN OTHERS THEN
539: p_data => x_msg_data);
540:
541: WHEN OTHERS THEN
542: ROLLBACK TO create_COND_ASSIGNMENT;
543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
544: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
545: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
546: FND_MSG_PUB.ADD;
547: FND_MSG_PUB.Count_And_Get(
544: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
545: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
546: FND_MSG_PUB.ADD;
547: FND_MSG_PUB.Count_And_Get(
548: p_encoded => FND_API.G_FALSE,
549: p_count => x_msg_count,
550: p_data => x_msg_data);
551:
552: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
607: -- standard start of API savepoint
608: SAVEPOINT update_COND_ASSIGNMENT;
609:
610: -- initialize message list if p_init_msg_list is set to TRUE.
611: IF FND_API.to_Boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
612: FND_MSG_PUB.initialize;
613: END IF;
614:
615: -- initialize API return status to success.
612: FND_MSG_PUB.initialize;
613: END IF;
614:
615: -- initialize API return status to success.
616: x_return_status := FND_API.G_RET_STS_SUCCESS;
617: /*
618: -- Get old record. Will be used by history package.
619: get_COND_ASSIGNMENT_rec (
620: p_COND_ASSIGNMENT_id => l_COND_ASSIGNMENT_rec.assignment_id,
622: x_return_status => x_return_status,
623: x_msg_count => x_msg_count,
624: x_msg_data => x_msg_data );
625: */
626: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
627: RAISE FND_API.G_EXC_ERROR;
628: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
629: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: END IF;
623: x_msg_count => x_msg_count,
624: x_msg_data => x_msg_data );
625: */
626: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
627: RAISE FND_API.G_EXC_ERROR;
628: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
629: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: END IF;
631:
624: x_msg_data => x_msg_data );
625: */
626: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
627: RAISE FND_API.G_EXC_ERROR;
628: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
629: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: END IF;
631:
632: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
625: */
626: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
627: RAISE FND_API.G_EXC_ERROR;
628: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
629: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: END IF;
631:
632: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
633: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_COND_ASSIGNMENT procedure: Before call to do_update_COND_ASSIGNMENT proc');
644: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Update_COND_ASSIGNMENT procedure: After call to do_update_COND_ASSIGNMENT proc');
645: END IF;
646:
647: EXCEPTION
648: WHEN FND_API.G_EXC_ERROR THEN
649: ROLLBACK TO update_COND_ASSIGNMENT;
650: x_return_status := FND_API.G_RET_STS_ERROR;
651: FND_MSG_PUB.Count_And_Get(
652: p_encoded => FND_API.G_FALSE,
646:
647: EXCEPTION
648: WHEN FND_API.G_EXC_ERROR THEN
649: ROLLBACK TO update_COND_ASSIGNMENT;
650: x_return_status := FND_API.G_RET_STS_ERROR;
651: FND_MSG_PUB.Count_And_Get(
652: p_encoded => FND_API.G_FALSE,
653: p_count => x_msg_count,
654: p_data => x_msg_data);
648: WHEN FND_API.G_EXC_ERROR THEN
649: ROLLBACK TO update_COND_ASSIGNMENT;
650: x_return_status := FND_API.G_RET_STS_ERROR;
651: FND_MSG_PUB.Count_And_Get(
652: p_encoded => FND_API.G_FALSE,
653: p_count => x_msg_count,
654: p_data => x_msg_data);
655:
656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
652: p_encoded => FND_API.G_FALSE,
653: p_count => x_msg_count,
654: p_data => x_msg_data);
655:
656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
657: ROLLBACK TO update_COND_ASSIGNMENT;
658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
659: FND_MSG_PUB.Count_And_Get(
660: p_encoded => FND_API.G_FALSE,
654: p_data => x_msg_data);
655:
656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
657: ROLLBACK TO update_COND_ASSIGNMENT;
658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
659: FND_MSG_PUB.Count_And_Get(
660: p_encoded => FND_API.G_FALSE,
661: p_count => x_msg_count,
662: p_data => x_msg_data);
656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
657: ROLLBACK TO update_COND_ASSIGNMENT;
658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
659: FND_MSG_PUB.Count_And_Get(
660: p_encoded => FND_API.G_FALSE,
661: p_count => x_msg_count,
662: p_data => x_msg_data);
663:
664: WHEN OTHERS THEN
662: p_data => x_msg_data);
663:
664: WHEN OTHERS THEN
665: ROLLBACK TO update_COND_ASSIGNMENT;
666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
667: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
668: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
669: FND_MSG_PUB.ADD;
670: FND_MSG_PUB.Count_And_Get(
667: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
668: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
669: FND_MSG_PUB.ADD;
670: FND_MSG_PUB.Count_And_Get(
671: p_encoded => FND_API.G_FALSE,
672: p_count => x_msg_count,
673: p_data => x_msg_data);
674:
675: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
727: -- standard start of API savepoint
728: SAVEPOINT delete_COND_ASSIGNMENT;
729:
730: -- initialize message list if p_init_msg_list is set to TRUE.
731: IF FND_API.to_Boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
732: FND_MSG_PUB.initialize;
733: END IF;
734:
735: -- initialize API return status to success.
732: FND_MSG_PUB.initialize;
733: END IF;
734:
735: -- initialize API return status to success.
736: x_return_status := FND_API.G_RET_STS_SUCCESS;
737:
738: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
739: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_COND_ASSIGNMENT procedure: Before call to do_delete_COND_ASSIGNMENT proc');
740: END IF;
749: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In Delete_COND_ASSIGNMENT procedure: After call to do_delete_COND_ASSIGNMENT proc');
750: END IF;
751:
752: EXCEPTION
753: WHEN FND_API.G_EXC_ERROR THEN
754: ROLLBACK TO delete_COND_ASSIGNMENT;
755: x_return_status := FND_API.G_RET_STS_ERROR;
756: FND_MSG_PUB.Count_And_Get(
757: p_encoded => FND_API.G_FALSE,
751:
752: EXCEPTION
753: WHEN FND_API.G_EXC_ERROR THEN
754: ROLLBACK TO delete_COND_ASSIGNMENT;
755: x_return_status := FND_API.G_RET_STS_ERROR;
756: FND_MSG_PUB.Count_And_Get(
757: p_encoded => FND_API.G_FALSE,
758: p_count => x_msg_count,
759: p_data => x_msg_data);
753: WHEN FND_API.G_EXC_ERROR THEN
754: ROLLBACK TO delete_COND_ASSIGNMENT;
755: x_return_status := FND_API.G_RET_STS_ERROR;
756: FND_MSG_PUB.Count_And_Get(
757: p_encoded => FND_API.G_FALSE,
758: p_count => x_msg_count,
759: p_data => x_msg_data);
760:
761: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
757: p_encoded => FND_API.G_FALSE,
758: p_count => x_msg_count,
759: p_data => x_msg_data);
760:
761: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
762: ROLLBACK TO delete_COND_ASSIGNMENT;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: FND_MSG_PUB.Count_And_Get(
765: p_encoded => FND_API.G_FALSE,
759: p_data => x_msg_data);
760:
761: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
762: ROLLBACK TO delete_COND_ASSIGNMENT;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: FND_MSG_PUB.Count_And_Get(
765: p_encoded => FND_API.G_FALSE,
766: p_count => x_msg_count,
767: p_data => x_msg_data);
761: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
762: ROLLBACK TO delete_COND_ASSIGNMENT;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: FND_MSG_PUB.Count_And_Get(
765: p_encoded => FND_API.G_FALSE,
766: p_count => x_msg_count,
767: p_data => x_msg_data);
768:
769: WHEN OTHERS THEN
767: p_data => x_msg_data);
768:
769: WHEN OTHERS THEN
770: ROLLBACK TO delete_COND_ASSIGNMENT;
771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
772: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
773: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
774: FND_MSG_PUB.ADD;
775: FND_MSG_PUB.Count_And_Get(
772: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_OTHERS_EXCEP');
773: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
774: FND_MSG_PUB.ADD;
775: FND_MSG_PUB.Count_And_Get(
776: p_encoded => FND_API.G_FALSE,
777: p_count => x_msg_count,
778: p_data => x_msg_data);
779:
780: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1216: SAVEPOINT VALIDATE_CUSTOM_CONDITIONS;
1217: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1218:
1219: -- Standard call to check for call compatibility
1220: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1222: END IF;
1223:
1224: -- Initialize message list if p_init_msg_list is set to TRUE
1217: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1218:
1219: -- Standard call to check for call compatibility
1220: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1222: END IF;
1223:
1224: -- Initialize message list if p_init_msg_list is set to TRUE
1225: IF FND_API.To_Boolean(p_init_msg_list) THEN
1221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1222: END IF;
1223:
1224: -- Initialize message list if p_init_msg_list is set to TRUE
1225: IF FND_API.To_Boolean(p_init_msg_list) THEN
1226: FND_MSG_PUB.initialize;
1227: END IF;
1228:
1229: -- Initialize API return status to success
1226: FND_MSG_PUB.initialize;
1227: END IF;
1228:
1229: -- Initialize API return status to success
1230: l_return_status := FND_API.G_RET_STS_SUCCESS;
1231:
1232: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input:');
1233: LogMessage(FND_LOG.LEVEL_STATEMENT, 'P_OWNER_OBJECT_ID = ' || P_OWNER_OBJECT_ID);
1234: LogMessage(FND_LOG.LEVEL_STATEMENT, 'P_CONDITION_TYPE = ' || P_CONDITION_TYPE);
1263:
1264: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Validating custom condition ' || l_CONDITION_NAME || '...');
1265: VALIDATE_CUSTOM_CONDITION(
1266: P_API_VERSION => 1.0,
1267: P_INIT_MSG_LIST => FND_API.G_FALSE,
1268: P_COMMIT => FND_API.G_FALSE,
1269: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,
1270: P_COND_ASSIGNMENT_ID => l_COND_ASSIGNMENT_ID,
1271: X_RETURN_STATUS => l_return_status,
1264: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Validating custom condition ' || l_CONDITION_NAME || '...');
1265: VALIDATE_CUSTOM_CONDITION(
1266: P_API_VERSION => 1.0,
1267: P_INIT_MSG_LIST => FND_API.G_FALSE,
1268: P_COMMIT => FND_API.G_FALSE,
1269: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,
1270: P_COND_ASSIGNMENT_ID => l_COND_ASSIGNMENT_ID,
1271: X_RETURN_STATUS => l_return_status,
1272: X_MSG_COUNT => l_msg_count,
1265: VALIDATE_CUSTOM_CONDITION(
1266: P_API_VERSION => 1.0,
1267: P_INIT_MSG_LIST => FND_API.G_FALSE,
1268: P_COMMIT => FND_API.G_FALSE,
1269: P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL,
1270: P_COND_ASSIGNMENT_ID => l_COND_ASSIGNMENT_ID,
1271: X_RETURN_STATUS => l_return_status,
1272: X_MSG_COUNT => l_msg_count,
1273: X_MSG_DATA => l_msg_data);
1290:
1291: LogMessage(FND_LOG.LEVEL_STATEMENT, '-------------');
1292: if i = 0 then
1293: LogMessage(FND_LOG.LEVEL_STATEMENT, 'No custom conditions found. Exiting.');
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;
1295: return;
1296: end if;
1297:
1298: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Successfully validated custom conditions: ' || l_success_count);
1299: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Failed custom conditions: ' || l_failed_count);
1300: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Total validated custom conditions: ' || i);
1301:
1302: if l_failed_count > 0 then
1303: RAISE FND_API.G_EXC_ERROR;
1304: end if;
1305:
1306: -- completing all custom conditions if P_COMPLETE_FLAG = 'Y'
1307: if P_COMPLETE_FLAG = 'Y' then
1311: from LNS_COND_ASSIGNMENTS
1312: where COND_ASSIGNMENT_ID = l_cond_assignment_tbl(j).COND_ASSIGNMENT_ID;
1313:
1314: update_COND_ASSIGNMENT (
1315: p_init_msg_list => FND_API.G_FALSE,
1316: p_COND_ASSIGNMENT_rec => l_cond_assignment_tbl(j),
1317: p_object_version_number => l_version_number,
1318: X_RETURN_STATUS => l_return_status,
1319: X_MSG_COUNT => l_msg_count,
1319: X_MSG_COUNT => l_msg_count,
1320: X_MSG_DATA => l_msg_data);
1321:
1322: if l_return_status <> 'S' then
1323: RAISE FND_API.G_EXC_ERROR;
1324: end if;
1325:
1326: END LOOP;
1327: end if;
1325:
1326: END LOOP;
1327: end if;
1328:
1329: if P_COMMIT = FND_API.G_TRUE then
1330: COMMIT WORK;
1331: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1332: end if;
1333:
1333:
1334: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Successfully validated all custom conditions for object ' || P_OWNER_OBJECT_ID || '; type ' || P_CONDITION_TYPE);
1335:
1336: -- END OF BODY OF API
1337: x_return_status := FND_API.G_RET_STS_SUCCESS;
1338:
1339: -- Standard call to get message count and if count is 1, get message info
1340: FND_MSG_PUB.Count_And_Get(
1341: p_encoded => FND_API.G_FALSE,
1337: x_return_status := FND_API.G_RET_STS_SUCCESS;
1338:
1339: -- Standard call to get message count and if count is 1, get message info
1340: FND_MSG_PUB.Count_And_Get(
1341: p_encoded => FND_API.G_FALSE,
1342: p_count => x_msg_count,
1343: p_data => x_msg_data);
1344:
1345: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1344:
1345: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1346:
1347: EXCEPTION
1348: WHEN FND_API.G_EXC_ERROR THEN
1349: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1350: x_return_status := FND_API.G_RET_STS_ERROR;
1351: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1352: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1346:
1347: EXCEPTION
1348: WHEN FND_API.G_EXC_ERROR THEN
1349: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1350: x_return_status := FND_API.G_RET_STS_ERROR;
1351: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1352: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1354: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1349: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1350: x_return_status := FND_API.G_RET_STS_ERROR;
1351: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1352: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1354: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1356: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1357: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1351: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1352: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1354: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1356: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1357: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1358: WHEN OTHERS THEN
1359: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1356: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1357: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked');
1358: WHEN OTHERS THEN
1359: ROLLBACK TO VALIDATE_CUSTOM_CONDITIONS;
1360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1361: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1362: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1363: END IF;
1364: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1421:
1422: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1423:
1424: -- Standard call to check for call compatibility
1425: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428:
1429: -- Initialize message list if p_init_msg_list is set to TRUE
1422: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1423:
1424: -- Standard call to check for call compatibility
1425: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428:
1429: -- Initialize message list if p_init_msg_list is set to TRUE
1430: IF FND_API.To_Boolean(p_init_msg_list) THEN
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427: END IF;
1428:
1429: -- Initialize message list if p_init_msg_list is set to TRUE
1430: IF FND_API.To_Boolean(p_init_msg_list) THEN
1431: FND_MSG_PUB.initialize;
1432: END IF;
1433:
1434: -- Initialize API return status to success
1431: FND_MSG_PUB.initialize;
1432: END IF;
1433:
1434: -- Initialize API return status to success
1435: l_return_status := FND_API.G_RET_STS_SUCCESS;
1436:
1437: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input:');
1438: LogMessage(FND_LOG.LEVEL_STATEMENT, 'P_COND_ASSIGNMENT_ID = ' || P_COND_ASSIGNMENT_ID);
1439:
1482: FND_MESSAGE.SET_TOKEN('COND_NAME' ,l_CONDITION_NAME);
1483: FND_MESSAGE.SET_TOKEN('ERROR_MESG' ,SQLERRM);
1484: FND_MSG_PUB.ADD;
1485: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1486: RAISE FND_API.G_EXC_ERROR;
1487: END;
1488:
1489: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_result = ' || l_result);
1490: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_error = ' || l_error);
1494: FND_MESSAGE.SET_TOKEN('COND_NAME' ,l_CONDITION_NAME);
1495: FND_MESSAGE.SET_TOKEN('ERROR_MESG' ,l_error);
1496: FND_MSG_PUB.ADD;
1497: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1498: RAISE FND_API.G_EXC_ERROR;
1499: end if;
1500:
1501: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Successfully validated custom condition ' || l_CONDITION_NAME);
1502:
1500:
1501: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Successfully validated custom condition ' || l_CONDITION_NAME);
1502:
1503: -- END OF BODY OF API
1504: x_return_status := FND_API.G_RET_STS_SUCCESS;
1505:
1506: -- Standard call to get message count and if count is 1, get message info
1507: FND_MSG_PUB.Count_And_Get(
1508: p_encoded => FND_API.G_FALSE,
1504: x_return_status := FND_API.G_RET_STS_SUCCESS;
1505:
1506: -- Standard call to get message count and if count is 1, get message info
1507: FND_MSG_PUB.Count_And_Get(
1508: p_encoded => FND_API.G_FALSE,
1509: p_count => x_msg_count,
1510: p_data => x_msg_data);
1511:
1512: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1511:
1512: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1513:
1514: EXCEPTION
1515: WHEN FND_API.G_EXC_ERROR THEN
1516: x_return_status := FND_API.G_RET_STS_ERROR;
1517: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1512: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1513:
1514: EXCEPTION
1515: WHEN FND_API.G_EXC_ERROR THEN
1516: x_return_status := FND_API.G_RET_STS_ERROR;
1517: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1520: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1514: EXCEPTION
1515: WHEN FND_API.G_EXC_ERROR THEN
1516: x_return_status := FND_API.G_RET_STS_ERROR;
1517: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1520: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1521: WHEN OTHERS THEN
1522: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1515: WHEN FND_API.G_EXC_ERROR THEN
1516: x_return_status := FND_API.G_RET_STS_ERROR;
1517: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1520: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1521: WHEN OTHERS THEN
1522: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1523: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1518: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1520: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1521: WHEN OTHERS THEN
1522: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1523: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1524: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1525: END IF;
1526: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1583: SAVEPOINT DEFAULT_COND_ASSIGNMENTS;
1584: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1585:
1586: -- Standard call to check for call compatibility
1587: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1589: END IF;
1590:
1591: -- Initialize message list if p_init_msg_list is set to TRUE
1584: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Savepoint is established');
1585:
1586: -- Standard call to check for call compatibility
1587: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1589: END IF;
1590:
1591: -- Initialize message list if p_init_msg_list is set to TRUE
1592: IF FND_API.To_Boolean(p_init_msg_list) THEN
1588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1589: END IF;
1590:
1591: -- Initialize message list if p_init_msg_list is set to TRUE
1592: IF FND_API.To_Boolean(p_init_msg_list) THEN
1593: FND_MSG_PUB.initialize;
1594: END IF;
1595:
1596: -- Initialize API return status to success
1593: FND_MSG_PUB.initialize;
1594: END IF;
1595:
1596: -- Initialize API return status to success
1597: l_return_status := FND_API.G_RET_STS_SUCCESS;
1598:
1599: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input:');
1600: LogMessage(FND_LOG.LEVEL_STATEMENT, 'P_LOAN_ID = ' || P_LOAN_ID);
1601: LogMessage(FND_LOG.LEVEL_STATEMENT, 'P_OWNER_OBJECT_ID = ' || P_OWNER_OBJECT_ID);
1605: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
1606: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_LOAN_ID' );
1607: FND_MSG_PUB.ADD;
1608: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1609: RAISE FND_API.G_EXC_ERROR;
1610: end if;
1611:
1612: if P_OWNER_OBJECT_ID is null then
1613: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
1613: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
1614: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_OWNER_OBJECT_ID' );
1615: FND_MSG_PUB.ADD;
1616: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1617: RAISE FND_API.G_EXC_ERROR;
1618: end if;
1619:
1620: if P_CONDITION_TYPE is null then
1621: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
1621: FND_MESSAGE.SET_NAME( 'LNS', 'LNS_API_MISSING_COLUMN' );
1622: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'P_CONDITION_TYPE' );
1623: FND_MSG_PUB.ADD;
1624: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1625: RAISE FND_API.G_EXC_ERROR;
1626: end if;
1627:
1628: if P_CONDITION_TYPE <> 'LOAN_AMOUNT_ADJUSTMENT' and
1629: P_CONDITION_TYPE <> 'ADDITIONAL_RECEIVABLE' and
1633: FND_MESSAGE.SET_TOKEN( 'PARAMETER', 'P_CONDITION_TYPE' );
1634: FND_MESSAGE.SET_TOKEN( 'VALUE', P_CONDITION_TYPE );
1635: FND_MSG_PUB.ADD;
1636: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1637: RAISE FND_API.G_EXC_ERROR;
1638: end if;
1639:
1640: i := 0;
1641: open cond_info_cur(P_LOAN_ID, P_CONDITION_TYPE);
1694:
1695: END LOOP;
1696: close cond_info_cur;
1697:
1698: if P_COMMIT = FND_API.G_TRUE then
1699: COMMIT WORK;
1700: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Commited');
1701: end if;
1702:
1702:
1703: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Successfully created ' || i || ' condition assignments');
1704:
1705: -- END OF BODY OF API
1706: x_return_status := FND_API.G_RET_STS_SUCCESS;
1707:
1708: -- Standard call to get message count and if count is 1, get message info
1709: FND_MSG_PUB.Count_And_Get(
1710: p_encoded => FND_API.G_FALSE,
1706: x_return_status := FND_API.G_RET_STS_SUCCESS;
1707:
1708: -- Standard call to get message count and if count is 1, get message info
1709: FND_MSG_PUB.Count_And_Get(
1710: p_encoded => FND_API.G_FALSE,
1711: p_count => x_msg_count,
1712: p_data => x_msg_data);
1713:
1714: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1713:
1714: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1715:
1716: EXCEPTION
1717: WHEN FND_API.G_EXC_ERROR THEN
1718: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1719: x_return_status := FND_API.G_RET_STS_ERROR;
1720: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1721: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1715:
1716: EXCEPTION
1717: WHEN FND_API.G_EXC_ERROR THEN
1718: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1719: x_return_status := FND_API.G_RET_STS_ERROR;
1720: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1721: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1722: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1717: WHEN FND_API.G_EXC_ERROR THEN
1718: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1719: x_return_status := FND_API.G_RET_STS_ERROR;
1720: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1721: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1722: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1724: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1725: WHEN OTHERS THEN
1719: x_return_status := FND_API.G_RET_STS_ERROR;
1720: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1721: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1722: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1724: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1725: WHEN OTHERS THEN
1726: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1727: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1724: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1725: WHEN OTHERS THEN
1726: ROLLBACK TO DEFAULT_COND_ASSIGNMENTS;
1727: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1728: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1729: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1730: END IF;
1731: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1781:
1782: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1783:
1784: -- Standard call to check for call compatibility
1785: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;
1788:
1789: -- Initialize message list if p_init_msg_list is set to TRUE
1782: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1783:
1784: -- Standard call to check for call compatibility
1785: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;
1788:
1789: -- Initialize message list if p_init_msg_list is set to TRUE
1790: IF FND_API.To_Boolean(p_init_msg_list) THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;
1788:
1789: -- Initialize message list if p_init_msg_list is set to TRUE
1790: IF FND_API.To_Boolean(p_init_msg_list) THEN
1791: FND_MSG_PUB.initialize;
1792: END IF;
1793:
1794: -- Initialize API return status to success
1791: FND_MSG_PUB.initialize;
1792: END IF;
1793:
1794: -- Initialize API return status to success
1795: l_return_status := FND_API.G_RET_STS_SUCCESS;
1796:
1797: LogMessage(FND_LOG.LEVEL_STATEMENT, 'Input:');
1798: LogMessage(FND_LOG.LEVEL_STATEMENT, 'P_OWNER_OBJECT_ID = ' || P_OWNER_OBJECT_ID);
1799: LogMessage(FND_LOG.LEVEL_STATEMENT, 'P_CONDITION_TYPE = ' || P_CONDITION_TYPE);
1806:
1807: if l_cond_count > 0 then
1808: FND_MESSAGE.SET_NAME('LNS', 'LNS_NOT_ALL_COND_MET');
1809: FND_MSG_PUB.Add;
1810: RAISE FND_API.G_EXC_ERROR;
1811: end if;
1812:
1813: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Successfully validated all non-custom conditions for object ' || P_OWNER_OBJECT_ID || '; type ' || P_CONDITION_TYPE);
1814:
1812:
1813: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Successfully validated all non-custom conditions for object ' || P_OWNER_OBJECT_ID || '; type ' || P_CONDITION_TYPE);
1814:
1815: -- END OF BODY OF API
1816: x_return_status := FND_API.G_RET_STS_SUCCESS;
1817:
1818: -- Standard call to get message count and if count is 1, get message info
1819: FND_MSG_PUB.Count_And_Get(
1820: p_encoded => FND_API.G_FALSE,
1816: x_return_status := FND_API.G_RET_STS_SUCCESS;
1817:
1818: -- Standard call to get message count and if count is 1, get message info
1819: FND_MSG_PUB.Count_And_Get(
1820: p_encoded => FND_API.G_FALSE,
1821: p_count => x_msg_count,
1822: p_data => x_msg_data);
1823:
1824: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1823:
1824: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1825:
1826: EXCEPTION
1827: WHEN FND_API.G_EXC_ERROR THEN
1828: x_return_status := FND_API.G_RET_STS_ERROR;
1829: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1824: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1825:
1826: EXCEPTION
1827: WHEN FND_API.G_EXC_ERROR THEN
1828: x_return_status := FND_API.G_RET_STS_ERROR;
1829: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1832: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1826: EXCEPTION
1827: WHEN FND_API.G_EXC_ERROR THEN
1828: x_return_status := FND_API.G_RET_STS_ERROR;
1829: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1832: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1833: WHEN OTHERS THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1827: WHEN FND_API.G_EXC_ERROR THEN
1828: x_return_status := FND_API.G_RET_STS_ERROR;
1829: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1832: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1833: WHEN OTHERS THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1832: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1833: WHEN OTHERS THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
1836: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1837: END IF;
1838: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);