446: END IF;
447:
448: -- Initialize message list if requested
449: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
450: FND_MSG_PUB.initialize;
451: END IF;
452:
453: -- Initialize API status to success
454: x_return_status := OKL_API.G_RET_STS_SUCCESS;
506:
507: /*** End API body ******************************************************/
508:
509: -- Get message count and if count is 1, get message info
510: FND_MSG_PUB.Count_And_Get
511: (p_count => x_msg_count,
512: p_data => x_msg_data);
513:
514: EXCEPTION
514: EXCEPTION
515: WHEN OKL_API.G_EXCEPTION_ERROR THEN
516: ROLLBACK TO copy_rulv_rec;
517: x_return_status := OKL_API.G_RET_STS_ERROR;
518: FND_MSG_PUB.Count_And_Get
519: (p_count => x_msg_count,
520: p_data => x_msg_data);
521:
522: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
521:
522: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
523: ROLLBACK TO copy_rulv_rec;
524: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
525: FND_MSG_PUB.Count_And_Get
526: (p_count => x_msg_count,
527: p_data => x_msg_data);
528:
529: WHEN OTHERS THEN
534: p_token1 => G_SQLCODE_TOKEN,
535: p_token1_value => SQLCODE,
536: p_token2 => G_SQLERRM_TOKEN,
537: p_token2_value => SQLERRM);
538: FND_MSG_PUB.Count_And_Get
539: (p_count => x_msg_count,
540: p_data => x_msg_data);
541: end;
542: ----------------------------------------------------------------------------------
578: END IF;
579:
580: -- Initialize message list if requested
581: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
582: FND_MSG_PUB.initialize;
583: END IF;
584:
585: -- Initialize API status to success
586: x_return_status := OKL_API.G_RET_STS_SUCCESS;
615:
616: /*** End API body ******************************************************/
617:
618: -- Get message count and if count is 1, get message info
619: FND_MSG_PUB.Count_And_Get
620: (p_count => x_msg_count,
621: p_data => x_msg_data);
622:
623: EXCEPTION
623: EXCEPTION
624: WHEN OKL_API.G_EXCEPTION_ERROR THEN
625: ROLLBACK TO copy_rulv_tbl;
626: x_return_status := OKL_API.G_RET_STS_ERROR;
627: FND_MSG_PUB.Count_And_Get
628: (p_count => x_msg_count,
629: p_data => x_msg_data);
630:
631: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
630:
631: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
632: ROLLBACK TO copy_rulv_tbl;
633: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
634: FND_MSG_PUB.Count_And_Get
635: (p_count => x_msg_count,
636: p_data => x_msg_data);
637:
638: WHEN OTHERS THEN
643: p_token1 => G_SQLCODE_TOKEN,
644: p_token1_value => SQLCODE,
645: p_token2 => G_SQLERRM_TOKEN,
646: p_token2_value => SQLERRM);
647: FND_MSG_PUB.Count_And_Get
648: (p_count => x_msg_count,
649: p_data => x_msg_data);
650: end;
651:
794: END IF;
795:
796: -- Initialize message list if requested
797: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
798: FND_MSG_PUB.initialize;
799: END IF;
800:
801: -- Initialize API status to success
802: x_return_status := OKL_API.G_RET_STS_SUCCESS;
919:
920: /*** End API body ******************************************************/
921:
922: -- Get message count and if count is 1, get message info
923: FND_MSG_PUB.Count_And_Get
924: (p_count => x_msg_count,
925: p_data => x_msg_data);
926:
927: EXCEPTION
927: EXCEPTION
928: WHEN OKL_API.G_EXCEPTION_ERROR THEN
929: ROLLBACK TO create_funding_chklst;
930: x_return_status := OKL_API.G_RET_STS_ERROR;
931: FND_MSG_PUB.Count_And_Get
932: (p_count => x_msg_count,
933: p_data => x_msg_data);
934:
935: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
934:
935: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
936: ROLLBACK TO create_funding_chklst;
937: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
938: FND_MSG_PUB.Count_And_Get
939: (p_count => x_msg_count,
940: p_data => x_msg_data);
941:
942: WHEN OTHERS THEN
947: p_token1 => G_SQLCODE_TOKEN,
948: p_token1_value => SQLCODE,
949: p_token2 => G_SQLERRM_TOKEN,
950: p_token2_value => SQLERRM);
951: FND_MSG_PUB.Count_And_Get
952: (p_count => x_msg_count,
953: p_data => x_msg_data);
954:
955: end create_funding_chklst;
998: END IF;
999:
1000: -- Initialize message list if requested
1001: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
1002: FND_MSG_PUB.initialize;
1003: END IF;
1004:
1005: -- Initialize API status to success
1006: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1055:
1056: /*** End API body ******************************************************/
1057:
1058: -- Get message count and if count is 1, get message info
1059: FND_MSG_PUB.Count_And_Get
1060: (p_count => x_msg_count,
1061: p_data => x_msg_data);
1062:
1063: EXCEPTION
1063: EXCEPTION
1064: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1065: ROLLBACK TO update_funding_chklst;
1066: x_return_status := OKL_API.G_RET_STS_ERROR;
1067: FND_MSG_PUB.Count_And_Get
1068: (p_count => x_msg_count,
1069: p_data => x_msg_data);
1070:
1071: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1070:
1071: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1072: ROLLBACK TO update_funding_chklst;
1073: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1074: FND_MSG_PUB.Count_And_Get
1075: (p_count => x_msg_count,
1076: p_data => x_msg_data);
1077:
1078: WHEN OTHERS THEN
1083: p_token1 => G_SQLCODE_TOKEN,
1084: p_token1_value => SQLCODE,
1085: p_token2 => G_SQLERRM_TOKEN,
1086: p_token2_value => SQLERRM);
1087: FND_MSG_PUB.Count_And_Get
1088: (p_count => x_msg_count,
1089: p_data => x_msg_data);
1090:
1091: end update_funding_chklst;
1133: END IF;
1134:
1135: -- Initialize message list if requested
1136: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
1137: FND_MSG_PUB.initialize;
1138: END IF;
1139:
1140: -- Initialize API status to success
1141: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1179:
1180: /*** End API body ******************************************************/
1181:
1182: -- Get message count and if count is 1, get message info
1183: FND_MSG_PUB.Count_And_Get
1184: (p_count => x_msg_count,
1185: p_data => x_msg_data);
1186:
1187: EXCEPTION
1187: EXCEPTION
1188: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1189: ROLLBACK TO delete_funding_chklst;
1190: x_return_status := OKL_API.G_RET_STS_ERROR;
1191: FND_MSG_PUB.Count_And_Get
1192: (p_count => x_msg_count,
1193: p_data => x_msg_data);
1194:
1195: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1194:
1195: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1196: ROLLBACK TO delete_funding_chklst;
1197: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1198: FND_MSG_PUB.Count_And_Get
1199: (p_count => x_msg_count,
1200: p_data => x_msg_data);
1201:
1202: WHEN OTHERS THEN
1207: p_token1 => G_SQLCODE_TOKEN,
1208: p_token1_value => SQLCODE,
1209: p_token2 => G_SQLERRM_TOKEN,
1210: p_token2_value => SQLERRM);
1211: FND_MSG_PUB.Count_And_Get
1212: (p_count => x_msg_count,
1213: p_data => x_msg_data);
1214:
1215: end delete_funding_chklst;
1254: END IF;
1255:
1256: -- Initialize message list if requested
1257: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
1258: FND_MSG_PUB.initialize;
1259: END IF;
1260:
1261: -- Initialize API status to success
1262: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1286:
1287: /*** End API body ******************************************************/
1288:
1289: -- Get message count and if count is 1, get message info
1290: FND_MSG_PUB.Count_And_Get
1291: (p_count => x_msg_count,
1292: p_data => x_msg_data);
1293:
1294: EXCEPTION
1294: EXCEPTION
1295: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1296: ROLLBACK TO approve_funding_request;
1297: x_return_status := OKL_API.G_RET_STS_ERROR;
1298: FND_MSG_PUB.Count_And_Get
1299: (p_count => x_msg_count,
1300: p_data => x_msg_data);
1301:
1302: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1301:
1302: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1303: ROLLBACK TO approve_funding_request;
1304: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1305: FND_MSG_PUB.Count_And_Get
1306: (p_count => x_msg_count,
1307: p_data => x_msg_data);
1308:
1309: WHEN OTHERS THEN
1314: p_token1 => G_SQLCODE_TOKEN,
1315: p_token1_value => SQLCODE,
1316: p_token2 => G_SQLERRM_TOKEN,
1317: p_token2_value => SQLERRM);
1318: FND_MSG_PUB.Count_And_Get
1319: (p_count => x_msg_count,
1320: p_data => x_msg_data);
1321:
1322: end;
1376: END IF;
1377:
1378: -- Initialize message list if requested
1379: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
1380: FND_MSG_PUB.initialize;
1381: END IF;
1382:
1383: -- Initialize API status to success
1384: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1418:
1419: /*** End API body ******************************************************/
1420:
1421: -- Get message count and if count is 1, get message info
1422: FND_MSG_PUB.Count_And_Get
1423: (p_count => x_msg_count,
1424: p_data => x_msg_data);
1425:
1426: EXCEPTION
1426: EXCEPTION
1427: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1428: ROLLBACK TO approve_funding_chklst;
1429: x_return_status := OKL_API.G_RET_STS_ERROR;
1430: FND_MSG_PUB.Count_And_Get
1431: (p_count => x_msg_count,
1432: p_data => x_msg_data);
1433:
1434: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1433:
1434: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1435: ROLLBACK TO approve_funding_chklst;
1436: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1437: FND_MSG_PUB.Count_And_Get
1438: (p_count => x_msg_count,
1439: p_data => x_msg_data);
1440:
1441: WHEN OTHERS THEN
1446: p_token1 => G_SQLCODE_TOKEN,
1447: p_token1_value => SQLCODE,
1448: p_token2 => G_SQLERRM_TOKEN,
1449: p_token2_value => SQLERRM);
1450: FND_MSG_PUB.Count_And_Get
1451: (p_count => x_msg_count,
1452: p_data => x_msg_data);
1453:
1454: end approve_funding_chklst;