202: WHEN OTHERS THEN
203: ROLLBACK TO create_credit_ratings_pub;
204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
205:
206: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
207: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
208: FND_MSG_PUB.ADD;
209:
210: FND_MSG_PUB.Count_And_Get(
203: ROLLBACK TO create_credit_ratings_pub;
204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
205:
206: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
207: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
208: FND_MSG_PUB.ADD;
209:
210: FND_MSG_PUB.Count_And_Get(
211: p_encoded => FND_API.G_FALSE,
386: WHEN OTHERS THEN
387: ROLLBACK TO update_credit_ratings_pub;
388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
389:
390: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
391: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
392: FND_MSG_PUB.ADD;
393:
394: FND_MSG_PUB.Count_And_Get(
387: ROLLBACK TO update_credit_ratings_pub;
388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
389:
390: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
391: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
392: FND_MSG_PUB.ADD;
393:
394: FND_MSG_PUB.Count_And_Get(
395: p_encoded => FND_API.G_FALSE,
480:
481: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
482: RAISE FND_API.G_EXC_ERROR;
483: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
484: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
485: FND_MESSAGE.SET_TOKEN('PROCEDURE',
486: 'HZ_PARTY_INFO_CRMHK.CREATE_FINANCIAL_PROFILE_PRE');
487: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
488: FND_MSG_PUB.ADD;
481: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
482: RAISE FND_API.G_EXC_ERROR;
483: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
484: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
485: FND_MESSAGE.SET_TOKEN('PROCEDURE',
486: 'HZ_PARTY_INFO_CRMHK.CREATE_FINANCIAL_PROFILE_PRE');
487: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
488: FND_MSG_PUB.ADD;
489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
483: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
484: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
485: FND_MESSAGE.SET_TOKEN('PROCEDURE',
486: 'HZ_PARTY_INFO_CRMHK.CREATE_FINANCIAL_PROFILE_PRE');
487: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
488: FND_MSG_PUB.ADD;
489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
490: END IF;
491:
508:
509: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
510: RAISE FND_API.G_EXC_ERROR;
511: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
512: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
513: FND_MESSAGE.SET_TOKEN('PROCEDURE',
514: 'HZ_PARTY_INFO_CRMHK.CREATE_FINANCIAL_PROFILE_POST');
515: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
516: FND_MSG_PUB.ADD;
509: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
510: RAISE FND_API.G_EXC_ERROR;
511: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
512: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
513: FND_MESSAGE.SET_TOKEN('PROCEDURE',
514: 'HZ_PARTY_INFO_CRMHK.CREATE_FINANCIAL_PROFILE_POST');
515: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
516: FND_MSG_PUB.ADD;
517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
511: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
512: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
513: FND_MESSAGE.SET_TOKEN('PROCEDURE',
514: 'HZ_PARTY_INFO_CRMHK.CREATE_FINANCIAL_PROFILE_POST');
515: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
516: FND_MSG_PUB.ADD;
517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
518: END IF;
519:
562: WHEN OTHERS THEN
563: ROLLBACK TO create_financial_profile_pub;
564: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
565:
566: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
567: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
568: FND_MSG_PUB.ADD;
569:
570: FND_MSG_PUB.Count_And_Get(
563: ROLLBACK TO create_financial_profile_pub;
564: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
565:
566: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
567: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
568: FND_MSG_PUB.ADD;
569:
570: FND_MSG_PUB.Count_And_Get(
571: p_encoded => FND_API.G_FALSE,
653:
654: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
655: RAISE FND_API.G_EXC_ERROR;
656: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
657: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
658: FND_MESSAGE.SET_TOKEN('PROCEDURE',
659: 'HZ_PARTY_INFO_CRMHK.UPDATE_FINANCIAL_PROFILE_PRE');
660: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
661: FND_MSG_PUB.ADD;
654: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
655: RAISE FND_API.G_EXC_ERROR;
656: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
657: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
658: FND_MESSAGE.SET_TOKEN('PROCEDURE',
659: 'HZ_PARTY_INFO_CRMHK.UPDATE_FINANCIAL_PROFILE_PRE');
660: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
661: FND_MSG_PUB.ADD;
662: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
656: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
657: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
658: FND_MESSAGE.SET_TOKEN('PROCEDURE',
659: 'HZ_PARTY_INFO_CRMHK.UPDATE_FINANCIAL_PROFILE_PRE');
660: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
661: FND_MSG_PUB.ADD;
662: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
663: END IF;
664:
682:
683: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
684: RAISE FND_API.G_EXC_ERROR;
685: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
686: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
687: FND_MESSAGE.SET_TOKEN('PROCEDURE',
688: 'HZ_PARTY_INFO_CRMHK.UPDATE_FINANCIAL_PROFILE_POST');
689: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
690: FND_MSG_PUB.ADD;
683: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
684: RAISE FND_API.G_EXC_ERROR;
685: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
686: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
687: FND_MESSAGE.SET_TOKEN('PROCEDURE',
688: 'HZ_PARTY_INFO_CRMHK.UPDATE_FINANCIAL_PROFILE_POST');
689: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
690: FND_MSG_PUB.ADD;
691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
685: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
686: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
687: FND_MESSAGE.SET_TOKEN('PROCEDURE',
688: 'HZ_PARTY_INFO_CRMHK.UPDATE_FINANCIAL_PROFILE_POST');
689: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
690: FND_MSG_PUB.ADD;
691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
692: END IF;
693:
736: WHEN OTHERS THEN
737: ROLLBACK TO update_financial_profile_pub;
738: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
739:
740: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
741: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
742: FND_MSG_PUB.ADD;
743:
744: FND_MSG_PUB.Count_And_Get(
737: ROLLBACK TO update_financial_profile_pub;
738: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
739:
740: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
741: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
742: FND_MSG_PUB.ADD;
743:
744: FND_MSG_PUB.Count_And_Get(
745: p_encoded => FND_API.G_FALSE,
806:
807: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
808: RAISE FND_API.G_EXC_ERROR;
809: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
810: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
811: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.CREATE_CREDIT_RATINGS_PRE');
812: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
813: FND_MSG_PUB.ADD;
814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
807: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
808: RAISE FND_API.G_EXC_ERROR;
809: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
810: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
811: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.CREATE_CREDIT_RATINGS_PRE');
812: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
813: FND_MSG_PUB.ADD;
814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
815: END IF;
808: RAISE FND_API.G_EXC_ERROR;
809: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
810: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
811: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.CREATE_CREDIT_RATINGS_PRE');
812: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
813: FND_MSG_PUB.ADD;
814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
815: END IF;
816: END IF;
839: FROM hz_credit_ratings
840: WHERE credit_rating_id = l_credit_rating_id;
841:
842: IF l_count > 0 THEN
843: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
844: FND_MESSAGE.SET_TOKEN('COLUMN', 'credit_rating_id');
845: FND_MSG_PUB.ADD;
846: RAISE FND_API.G_EXC_ERROR;
847: END IF;
840: WHERE credit_rating_id = l_credit_rating_id;
841:
842: IF l_count > 0 THEN
843: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
844: FND_MESSAGE.SET_TOKEN('COLUMN', 'credit_rating_id');
845: FND_MSG_PUB.ADD;
846: RAISE FND_API.G_EXC_ERROR;
847: END IF;
848: END IF;
1003:
1004: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1005: RAISE FND_API.G_EXC_ERROR;
1006: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1007: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1008: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.CREATE_CREDIT_RATINGS_POST');
1009: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1010: FND_MSG_PUB.ADD;
1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1004: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1005: RAISE FND_API.G_EXC_ERROR;
1006: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1007: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1008: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.CREATE_CREDIT_RATINGS_POST');
1009: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1010: FND_MSG_PUB.ADD;
1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1012: END IF;
1005: RAISE FND_API.G_EXC_ERROR;
1006: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1007: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1008: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.CREATE_CREDIT_RATINGS_POST');
1009: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1010: FND_MSG_PUB.ADD;
1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1012: END IF;
1013: END IF;
1060: -- check required fields:
1061: IF p_credit_ratings_rec.credit_rating_id is NULL OR
1062: p_credit_ratings_rec.credit_rating_id = FND_API.G_MISS_NUM
1063: THEN
1064: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1065: FND_MESSAGE.SET_TOKEN('COLUMN', 'credit_rating_id');
1066: FND_MSG_PUB.ADD;
1067: RAISE FND_API.G_EXC_ERROR;
1068: END IF;
1061: IF p_credit_ratings_rec.credit_rating_id is NULL OR
1062: p_credit_ratings_rec.credit_rating_id = FND_API.G_MISS_NUM
1063: THEN
1064: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1065: FND_MESSAGE.SET_TOKEN('COLUMN', 'credit_rating_id');
1066: FND_MSG_PUB.ADD;
1067: RAISE FND_API.G_EXC_ERROR;
1068: END IF;
1069:
1069:
1070: IF p_last_update_date IS NULL OR
1071: p_last_update_date = FND_API.G_MISS_DATE
1072: THEN
1073: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1074: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1075: FND_MSG_PUB.ADD;
1076: RAISE FND_API.G_EXC_ERROR;
1077: END IF;
1070: IF p_last_update_date IS NULL OR
1071: p_last_update_date = FND_API.G_MISS_DATE
1072: THEN
1073: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1074: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1075: FND_MSG_PUB.ADD;
1076: RAISE FND_API.G_EXC_ERROR;
1077: END IF;
1078:
1089: FOR UPDATE NOWAIT;
1090:
1091: EXCEPTION
1092: WHEN NO_DATA_FOUND THEN
1093: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1094: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_CREDIT_RATINGS');
1095: FND_MSG_PUB.ADD;
1096: RAISE FND_API.G_EXC_ERROR;
1097: END;
1090:
1091: EXCEPTION
1092: WHEN NO_DATA_FOUND THEN
1093: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1094: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_CREDIT_RATINGS');
1095: FND_MSG_PUB.ADD;
1096: RAISE FND_API.G_EXC_ERROR;
1097: END;
1098:
1111:
1112: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1113: RAISE FND_API.G_EXC_ERROR;
1114: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1115: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1116: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.UPDATE_CREDIT_RATINGS_PRE');
1117: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1118: FND_MSG_PUB.ADD;
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1112: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1113: RAISE FND_API.G_EXC_ERROR;
1114: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1115: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1116: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.UPDATE_CREDIT_RATINGS_PRE');
1117: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1118: FND_MSG_PUB.ADD;
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1120: END IF;
1113: RAISE FND_API.G_EXC_ERROR;
1114: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1115: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1116: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.UPDATE_CREDIT_RATINGS_PRE');
1117: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1118: FND_MSG_PUB.ADD;
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1120: END IF;
1121: END IF;
1283:
1284: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1285: RAISE FND_API.G_EXC_ERROR;
1286: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1287: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1288: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.UPDATE_CREDIT_RATINGS_POST');
1289: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1290: FND_MSG_PUB.ADD;
1291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1284: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1285: RAISE FND_API.G_EXC_ERROR;
1286: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1287: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1288: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.UPDATE_CREDIT_RATINGS_POST');
1289: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1290: FND_MSG_PUB.ADD;
1291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1292: END IF;
1285: RAISE FND_API.G_EXC_ERROR;
1286: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1287: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1288: FND_MESSAGE.SET_TOKEN('PROCEDURE','HZ_PARTY_INFO_CRMHK.UPDATE_CREDIT_RATINGS_POST');
1289: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1290: FND_MSG_PUB.ADD;
1291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1292: END IF;
1293: END IF;
1355: FROM hz_financial_profile
1356: WHERE financial_profile_id = l_financial_profile_id;
1357:
1358: if l_count > 0 then
1359: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
1360: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_profile_id');
1361: FND_MSG_PUB.ADD;
1362: RAISE FND_API.G_EXC_ERROR;
1363: end if;
1356: WHERE financial_profile_id = l_financial_profile_id;
1357:
1358: if l_count > 0 then
1359: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
1360: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_profile_id');
1361: FND_MSG_PUB.ADD;
1362: RAISE FND_API.G_EXC_ERROR;
1363: end if;
1364:
1447: -- check required fields:
1448: IF p_financial_profile_rec.financial_profile_id is NULL OR
1449: p_financial_profile_rec.financial_profile_id = FND_API.G_MISS_NUM THEN
1450:
1451: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1452: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_profile_id');
1453: FND_MSG_PUB.ADD;
1454: RAISE FND_API.G_EXC_ERROR;
1455:
1448: IF p_financial_profile_rec.financial_profile_id is NULL OR
1449: p_financial_profile_rec.financial_profile_id = FND_API.G_MISS_NUM THEN
1450:
1451: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1452: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_profile_id');
1453: FND_MSG_PUB.ADD;
1454: RAISE FND_API.G_EXC_ERROR;
1455:
1456: END IF;
1457:
1458: IF p_last_update_date IS NULL OR
1459: p_last_update_date = FND_API.G_MISS_DATE
1460: THEN
1461: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1462: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1463: FND_MSG_PUB.ADD;
1464: RAISE FND_API.G_EXC_ERROR;
1465: END IF;
1458: IF p_last_update_date IS NULL OR
1459: p_last_update_date = FND_API.G_MISS_DATE
1460: THEN
1461: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1462: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1463: FND_MSG_PUB.ADD;
1464: RAISE FND_API.G_EXC_ERROR;
1465: END IF;
1466:
1474: to_char(p_last_update_date, 'DD-MON-YYYY HH:MI:SS')
1475: FOR UPDATE NOWAIT;
1476:
1477: EXCEPTION WHEN NO_DATA_FOUND THEN
1478: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1479: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_FINANCIAL_PROFILE');
1480: FND_MSG_PUB.ADD;
1481: RAISE FND_API.G_EXC_ERROR;
1482: end;
1475: FOR UPDATE NOWAIT;
1476:
1477: EXCEPTION WHEN NO_DATA_FOUND THEN
1478: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1479: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_FINANCIAL_PROFILE');
1480: FND_MSG_PUB.ADD;
1481: RAISE FND_API.G_EXC_ERROR;
1482: end;
1483: -- validate credit rating record
1559: --Check whether primary key has been passed in.
1560: IF p_credit_rating_id IS NULL OR
1561: p_credit_rating_id = FND_API.G_MISS_NUM THEN
1562:
1563: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1564: FND_MESSAGE.SET_TOKEN('COLUMN', 'credit_rating_id');
1565: FND_MSG_PUB.ADD;
1566: RAISE FND_API.G_EXC_ERROR;
1567: END IF;
1560: IF p_credit_rating_id IS NULL OR
1561: p_credit_rating_id = FND_API.G_MISS_NUM THEN
1562:
1563: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1564: FND_MESSAGE.SET_TOKEN('COLUMN', 'credit_rating_id');
1565: FND_MSG_PUB.ADD;
1566: RAISE FND_API.G_EXC_ERROR;
1567: END IF;
1568:
1771: WHERE credit_rating_id = p_credit_rating_id;
1772:
1773: EXCEPTION
1774: WHEN NO_DATA_FOUND THEN
1775: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
1776: FND_MESSAGE.SET_TOKEN('RECORD', 'credit rating');
1777: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_credit_rating_id));
1778: FND_MSG_PUB.ADD;
1779: RAISE FND_API.G_EXC_ERROR;
1772:
1773: EXCEPTION
1774: WHEN NO_DATA_FOUND THEN
1775: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
1776: FND_MESSAGE.SET_TOKEN('RECORD', 'credit rating');
1777: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_credit_rating_id));
1778: FND_MSG_PUB.ADD;
1779: RAISE FND_API.G_EXC_ERROR;
1780: END;
1773: EXCEPTION
1774: WHEN NO_DATA_FOUND THEN
1775: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
1776: FND_MESSAGE.SET_TOKEN('RECORD', 'credit rating');
1777: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_credit_rating_id));
1778: FND_MSG_PUB.ADD;
1779: RAISE FND_API.G_EXC_ERROR;
1780: END;
1781: --Standard call to get message count and if count is 1, get message info.
1800: p_data => x_msg_data);
1801: WHEN OTHERS THEN
1802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1803:
1804: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1805: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1806: FND_MSG_PUB.ADD;
1807:
1808: FND_MSG_PUB.Count_And_Get(
1801: WHEN OTHERS THEN
1802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1803:
1804: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1805: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1806: FND_MSG_PUB.ADD;
1807:
1808: FND_MSG_PUB.Count_And_Get(
1809: p_encoded => FND_API.G_FALSE,