[Home] [Help]
79:
80: if l_count > 0 THEN
81: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
82: FND_MESSAGE.SET_TOKEN('COLUMN', 'stock_exchange_id');
83: FND_MSG_PUB.ADD;
84: RAISE FND_API.G_EXC_ERROR;
85: end if;
86:
87: END IF;
164: IF p_stock_markets_rec.stock_exchange_id is NULL OR
165: p_stock_markets_rec.stock_exchange_id = FND_API.G_MISS_NUM THEN
166: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
167: FND_MESSAGE.SET_TOKEN('COLUMN', 'stock_exchange_id');
168: FND_MSG_PUB.ADD;
169: RAISE FND_API.G_EXC_ERROR;
170: END IF;
171:
172: -- check last_update_date
173: IF p_last_update_date is NULL OR
174: p_last_update_date = FND_API.G_MISS_DATE THEN
175: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
176: FND_MESSAGE.SET_TOKEN('COLUMN', 'last_update_date');
177: FND_MSG_PUB.ADD;
178: RAISE FND_API.G_EXC_ERROR;
179: END IF;
180:
181: -- select rowid , last_update_date for lock a row
191:
192: EXCEPTION WHEN NO_DATA_FOUND THEN
193: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
194: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_STOCK_MARKETS');
195: FND_MSG_PUB.ADD;
196: RAISE FND_API.G_EXC_ERROR;
197: end;
198:
199: -- validate stock market record
296:
297: if l_count > 0 THEN
298: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
299: FND_MESSAGE.SET_TOKEN('COLUMN', 'security_issued_id');
300: FND_MSG_PUB.ADD;
301: RAISE FND_API.G_EXC_ERROR;
302: end if;
303:
304: END IF;
389: p_security_issued_rec.security_issued_id = FND_API.G_MISS_NUM THEN
390:
391: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
392: FND_MESSAGE.SET_TOKEN('COLUMN', 'security_issued_id');
393: FND_MSG_PUB.ADD;
394: RAISE FND_API.G_EXC_ERROR;
395:
396: END IF;
397:
399: p_last_update_date = FND_API.G_MISS_DATE
400: THEN
401: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
402: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
403: FND_MSG_PUB.ADD;
404: RAISE FND_API.G_EXC_ERROR;
405: END IF;
406: begin
407: -- check last update date.
416:
417: EXCEPTION WHEN NO_DATA_FOUND THEN
418: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
419: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_SECURITY_ISSUED');
420: FND_MSG_PUB.ADD;
421: RAISE FND_API.G_EXC_ERROR;
422: end;
423:
424: -- validate security issued record
531: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
532: FND_MESSAGE.SET_TOKEN('PROCEDURE',
533: 'HZ_ORG_INFO_CRMHK.CREATE_FINANCIAL_REPORTS_PRE');
534: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
535: FND_MSG_PUB.ADD;
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: END IF;
538: END IF;
539: */
563:
564: IF l_count > 0 THEN
565: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
566: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_report_id');
567: FND_MSG_PUB.ADD;
568: RAISE FND_API.G_EXC_ERROR;
569: END IF;
570: END IF;
571:
644: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
645: FND_MESSAGE.SET_TOKEN('PROCEDURE',
646: 'HZ_ORG_INFO_CRMHK.CREATE_FINANCIAL_REPORTS_POST');
647: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
648: FND_MSG_PUB.ADD;
649: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
650: END IF;
651: END IF;
652: */
702: p_financial_reports_rec.financial_report_id = FND_API.G_MISS_NUM
703: THEN
704: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
705: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_report_id');
706: FND_MSG_PUB.ADD;
707: RAISE FND_API.G_EXC_ERROR;
708: END IF;
709:
710: IF p_last_update_date IS NULL OR
711: p_last_update_date = FND_API.G_MISS_DATE
712: THEN
713: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
714: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
715: FND_MSG_PUB.ADD;
716: RAISE FND_API.G_EXC_ERROR;
717: END IF;
718:
719: BEGIN
729: EXCEPTION
730: WHEN NO_DATA_FOUND THEN
731: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
732: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_FINANCIAL_REPORTS');
733: FND_MSG_PUB.ADD;
734: RAISE FND_API.G_EXC_ERROR;
735: END;
736:
737: /*
754: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
755: FND_MESSAGE.SET_TOKEN('PROCEDURE',
756: 'HZ_ORG_INFO_CRMHK.UPDATE_FINANCIAL_REPORTS_PRE');
757: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
758: FND_MSG_PUB.ADD;
759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
760: END IF;
761: END IF;
762: */
836: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
837: FND_MESSAGE.SET_TOKEN('PROCEDURE',
838: 'HZ_ORG_INFO_CRMHK.UPDATE_FINANCIAL_REPORTS_POST');
839: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
840: FND_MSG_PUB.ADD;
841: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
842: END IF;
843: END IF;
844: */
917:
918: IF l_count > 0 THEN
919: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
920: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_number_id');
921: FND_MSG_PUB.ADD;
922: RAISE FND_API.G_EXC_ERROR;
923: END IF;
924: END IF;
925:
988: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
989: FND_MESSAGE.SET_TOKEN('PROCEDURE',
990: 'HZ_ORG_INFO_CRMHK.CREATE_FINANCIAL_NUMBERS_PRE');
991: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
992: FND_MSG_PUB.ADD;
993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
994: END IF;
995: END IF;
996: */
1043: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1044: FND_MESSAGE.SET_TOKEN('PROCEDURE',
1045: 'HZ_ORG_INFO_CRMHK.CREATE_FINANCIAL_NUMBERS_POST');
1046: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1047: FND_MSG_PUB.ADD;
1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1049: END IF;
1050: END IF;
1051: */
1107: p_financial_numbers_rec.financial_number_id = FND_API.G_MISS_NUM
1108: THEN
1109: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1110: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_number_id');
1111: FND_MSG_PUB.ADD;
1112: RAISE FND_API.G_EXC_ERROR;
1113: END IF;
1114:
1115: IF p_last_update_date IS NULL OR
1116: p_last_update_date = FND_API.G_MISS_DATE
1117: THEN
1118: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1119: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1120: FND_MSG_PUB.ADD;
1121: RAISE FND_API.G_EXC_ERROR;
1122: END IF;
1123:
1124: BEGIN
1134: EXCEPTION
1135: WHEN NO_DATA_FOUND THEN
1136: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1137: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_FINANCIAL_NUMBERS');
1138: FND_MSG_PUB.ADD;
1139: RAISE FND_API.G_EXC_ERROR;
1140: END;
1141:
1142: -- Bug 2197181: added for mix-n-match project. first check if user has
1189: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1190: FND_MESSAGE.SET_TOKEN('PROCEDURE',
1191: 'HZ_ORG_INFO_CRMHK.UPDATE_FINANCIAL_NUMBERS_PRE');
1192: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1193: FND_MSG_PUB.ADD;
1194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1195: END IF;
1196: END IF;
1197: */
1258: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
1259: FND_MESSAGE.SET_TOKEN('PROCEDURE',
1260: 'HZ_ORG_INFO_CRMHK.UPDATE_FINANCIAL_NUMBERS_POST');
1261: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1262: FND_MSG_PUB.ADD;
1263: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1264: END IF;
1265: END IF;
1266: */
1330:
1331: if l_count > 0 THEN
1332: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
1333: FND_MESSAGE.SET_TOKEN('COLUMN', 'certification_id');
1334: FND_MSG_PUB.ADD;
1335: RAISE FND_API.G_EXC_ERROR;
1336: end if;
1337:
1338: END IF;
1419: p_certifications_rec.certification_id = FND_API.G_MISS_NUM THEN
1420:
1421: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1422: FND_MESSAGE.SET_TOKEN('COLUMN', 'certification_id');
1423: FND_MSG_PUB.ADD;
1424: RAISE FND_API.G_EXC_ERROR;
1425:
1426: END IF;
1427:
1429: p_last_update_date = FND_API.G_MISS_DATE
1430: THEN
1431: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1432: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1433: FND_MSG_PUB.ADD;
1434: RAISE FND_API.G_EXC_ERROR;
1435: END IF;
1436: begin
1437: -- check last update date.
1446:
1447: EXCEPTION WHEN NO_DATA_FOUND THEN
1448: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1449: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_CERTIFICATIONS');
1450: FND_MSG_PUB.ADD;
1451: RAISE FND_API.G_EXC_ERROR;
1452: end;
1453:
1454: -- validate certification record
1556:
1557: if l_count > 0 THEN
1558: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
1559: FND_MESSAGE.SET_TOKEN('COLUMN', 'industry_reference_id');
1560: FND_MSG_PUB.ADD;
1561: RAISE FND_API.G_EXC_ERROR;
1562: end if;
1563:
1564: END IF;
1644: p_industrial_reference_rec.industry_reference_id = FND_API.G_MISS_NUM THEN
1645:
1646: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1647: FND_MESSAGE.SET_TOKEN('COLUMN', 'industry_reference_id');
1648: FND_MSG_PUB.ADD;
1649: RAISE FND_API.G_EXC_ERROR;
1650:
1651: END IF;
1652:
1654: p_last_update_date = FND_API.G_MISS_DATE
1655: THEN
1656: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1657: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1658: FND_MSG_PUB.ADD;
1659: RAISE FND_API.G_EXC_ERROR;
1660: END IF;
1661: begin
1662: -- check last update date.
1671:
1672: EXCEPTION WHEN NO_DATA_FOUND THEN
1673: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1674: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_INDUSTRIAL_REFERENCE');
1675: FND_MSG_PUB.ADD;
1676: RAISE FND_API.G_EXC_ERROR;
1677: end;
1678:
1679: -- validate industry reference record
1779:
1780: if l_count > 0 THEN
1781: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
1782: FND_MESSAGE.SET_TOKEN('COLUMN', 'industrial_class_id');
1783: FND_MSG_PUB.ADD;
1784: RAISE FND_API.G_EXC_ERROR;
1785: end if;
1786:
1787: END IF;
1866: p_industrial_classes_rec.industrial_class_id = FND_API.G_MISS_NUM THEN
1867:
1868: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1869: FND_MESSAGE.SET_TOKEN('COLUMN', 'industrial_class_id');
1870: FND_MSG_PUB.ADD;
1871: RAISE FND_API.G_EXC_ERROR;
1872:
1873: END IF;
1874:
1876: p_last_update_date = FND_API.G_MISS_DATE
1877: THEN
1878: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
1879: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
1880: FND_MSG_PUB.ADD;
1881: RAISE FND_API.G_EXC_ERROR;
1882: END IF;
1883: begin
1884: -- check last update date.
1893:
1894: EXCEPTION WHEN NO_DATA_FOUND THEN
1895: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1896: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_INDUSTRIAL_CLASSES');
1897: FND_MSG_PUB.ADD;
1898: RAISE FND_API.G_EXC_ERROR;
1899: end;
1900:
1901: -- validate industrial classes record
2050: IF p_industrial_class_id IS NULL OR
2051: p_industrial_class_id = FND_API.G_MISS_NUM THEN
2052: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2053: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'industrial_class_id' );
2054: FND_MSG_PUB.ADD;
2055: RAISE FND_API.G_EXC_ERROR;
2056: END IF;
2057:
2058: OPEN c1;
2061:
2062: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
2063: FND_MESSAGE.SET_TOKEN('RECORD', 'industrial_class');
2064: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_industrial_class_id));
2065: FND_MSG_PUB.ADD;
2066: RAISE FND_API.G_EXC_ERROR;
2067:
2068: ELSE
2069: x_industrial_classes_rec.industrial_class_id := lrec.industrial_class_id;
2077: EXCEPTION
2078: WHEN FND_API.G_EXC_ERROR THEN
2079: x_return_status := FND_API.G_RET_STS_ERROR;
2080:
2081: FND_MSG_PUB.Count_And_Get(
2082: p_encoded => FND_API.G_FALSE,
2083: p_count => x_msg_count,
2084: p_data => x_msg_data );
2085:
2084: p_data => x_msg_data );
2085:
2086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2087: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2088: FND_MSG_PUB.Count_And_Get(
2089: p_encoded => FND_API.G_FALSE,
2090: p_count => x_msg_count,
2091: p_data => x_msg_data);
2092:
2094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2095:
2096: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2097: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2098: FND_MSG_PUB.ADD;
2099:
2100: FND_MSG_PUB.Count_And_Get(
2101: p_encoded => FND_API.G_FALSE,
2102: p_count => x_msg_count,
2096: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2097: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2098: FND_MSG_PUB.ADD;
2099:
2100: FND_MSG_PUB.Count_And_Get(
2101: p_encoded => FND_API.G_FALSE,
2102: p_count => x_msg_count,
2103: p_data => x_msg_data );
2104: END;
2162: IF p_stock_exchange_id IS NULL OR
2163: p_stock_exchange_id = FND_API.G_MISS_NUM THEN
2164: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2165: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'stock_exchange_id' );
2166: FND_MSG_PUB.ADD;
2167: RAISE FND_API.G_EXC_ERROR;
2168: END IF;
2169:
2170: OPEN c1;
2172: IF c1%NOTFOUND THEN
2173: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
2174: FND_MESSAGE.SET_TOKEN('RECORD', 'stock_markets');
2175: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_stock_exchange_id));
2176: FND_MSG_PUB.ADD;
2177: RAISE FND_API.G_EXC_ERROR;
2178: ELSE
2179: x_stock_markets_rec.stock_exchange_id := lrec.stock_exchange_id;
2180: x_stock_markets_rec.country_of_residence := lrec.country_of_residence;
2185: CLOSE c1;
2186: EXCEPTION
2187: WHEN FND_API.G_EXC_ERROR THEN
2188: x_return_status := FND_API.G_RET_STS_ERROR;
2189: FND_MSG_PUB.Count_And_Get(
2190: p_encoded => FND_API.G_FALSE,
2191: p_count => x_msg_count,
2192: p_data => x_msg_data );
2193:
2192: p_data => x_msg_data );
2193:
2194: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2196: FND_MSG_PUB.Count_And_Get(
2197: p_encoded => FND_API.G_FALSE,
2198: p_count => x_msg_count,
2199: p_data => x_msg_data);
2200:
2201: WHEN OTHERS THEN
2202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2203: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2204: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2205: FND_MSG_PUB.ADD;
2206:
2207: FND_MSG_PUB.Count_And_Get(
2208: p_encoded => FND_API.G_FALSE,
2209: p_count => x_msg_count,
2203: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2204: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2205: FND_MSG_PUB.ADD;
2206:
2207: FND_MSG_PUB.Count_And_Get(
2208: p_encoded => FND_API.G_FALSE,
2209: p_count => x_msg_count,
2210: p_data => x_msg_data );
2211: END;
2279: IF p_security_issued_id IS NULL OR
2280: p_security_issued_id = FND_API.G_MISS_NUM THEN
2281: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2282: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'security_issued_id' );
2283: FND_MSG_PUB.ADD;
2284: RAISE FND_API.G_EXC_ERROR;
2285: END IF;
2286:
2287: OPEN c1;
2289: IF c1%NOTFOUND THEN
2290: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
2291: FND_MESSAGE.SET_TOKEN('RECORD', 'security_issued');
2292: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_security_issued_id));
2293: FND_MSG_PUB.ADD;
2294: RAISE FND_API.G_EXC_ERROR;
2295: ELSE
2296: x_security_issued_rec.security_issued_id := lrec.security_issued_id;
2297: x_security_issued_rec.estimated_total_amount := lrec.estimated_total_amount;
2310: EXCEPTION
2311: WHEN FND_API.G_EXC_ERROR THEN
2312: x_return_status := FND_API.G_RET_STS_ERROR;
2313:
2314: FND_MSG_PUB.Count_And_Get(
2315: p_encoded => FND_API.G_FALSE,
2316: p_count => x_msg_count,
2317: p_data => x_msg_data );
2318:
2317: p_data => x_msg_data );
2318:
2319: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2321: FND_MSG_PUB.Count_And_Get(
2322: p_encoded => FND_API.G_FALSE,
2323: p_count => x_msg_count,
2324: p_data => x_msg_data);
2325:
2327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2328:
2329: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2330: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2331: FND_MSG_PUB.ADD;
2332:
2333: FND_MSG_PUB.Count_And_Get(
2334: p_encoded => FND_API.G_FALSE,
2335: p_count => x_msg_count,
2329: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2330: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2331: FND_MSG_PUB.ADD;
2332:
2333: FND_MSG_PUB.Count_And_Get(
2334: p_encoded => FND_API.G_FALSE,
2335: p_count => x_msg_count,
2336: p_data => x_msg_data );
2337: END;
2402: IF p_certification_id IS NULL OR
2403: p_certification_id = FND_API.G_MISS_NUM THEN
2404: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2405: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'certification_id' );
2406: FND_MSG_PUB.ADD;
2407: RAISE FND_API.G_EXC_ERROR;
2408: END IF;
2409:
2410: OPEN c1;
2413:
2414: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
2415: FND_MESSAGE.SET_TOKEN('RECORD', 'certifications');
2416: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_certification_id));
2417: FND_MSG_PUB.ADD;
2418: RAISE FND_API.G_EXC_ERROR;
2419:
2420: ELSE
2421:
2435: EXCEPTION
2436: WHEN FND_API.G_EXC_ERROR THEN
2437: x_return_status := FND_API.G_RET_STS_ERROR;
2438:
2439: FND_MSG_PUB.Count_And_Get(
2440: p_encoded => FND_API.G_FALSE,
2441: p_count => x_msg_count,
2442: p_data => x_msg_data );
2443:
2442: p_data => x_msg_data );
2443:
2444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2446: FND_MSG_PUB.Count_And_Get(
2447: p_encoded => FND_API.G_FALSE,
2448: p_count => x_msg_count,
2449: p_data => x_msg_data);
2450:
2452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2453:
2454: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2455: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2456: FND_MSG_PUB.ADD;
2457:
2458: FND_MSG_PUB.Count_And_Get(
2459: p_encoded => FND_API.G_FALSE,
2460: p_count => x_msg_count,
2454: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2455: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2456: FND_MSG_PUB.ADD;
2457:
2458: FND_MSG_PUB.Count_And_Get(
2459: p_encoded => FND_API.G_FALSE,
2460: p_count => x_msg_count,
2461: p_data => x_msg_data );
2462: END;
2525:
2526: if l_count > 0 THEN
2527: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
2528: FND_MESSAGE.SET_TOKEN('COLUMN', 'code_applied_id');
2529: FND_MSG_PUB.ADD;
2530: RAISE FND_API.G_EXC_ERROR;
2531: end if;
2532:
2533: END IF;
2614: p_industrial_class_app_rec.code_applied_id = FND_API.G_MISS_NUM THEN
2615:
2616: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
2617: FND_MESSAGE.SET_TOKEN('COLUMN', 'code_applied_id');
2618: FND_MSG_PUB.ADD;
2619: RAISE FND_API.G_EXC_ERROR;
2620:
2621: END IF;
2622:
2624: p_last_update_date = FND_API.G_MISS_DATE
2625: THEN
2626: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
2627: FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
2628: FND_MSG_PUB.ADD;
2629: RAISE FND_API.G_EXC_ERROR;
2630: END IF;
2631: begin
2632: -- check last update date.
2641:
2642: EXCEPTION WHEN NO_DATA_FOUND THEN
2643: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
2644: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_INDUSTRIAL_CLASS_APP');
2645: FND_MSG_PUB.ADD;
2646: RAISE FND_API.G_EXC_ERROR;
2647: end;
2648:
2649: -- validate industrial class app record
2747: END IF;
2748:
2749: --Initialize message list if p_init_msg_list is set to TRUE.
2750: IF FND_API.to_Boolean(p_init_msg_list) THEN
2751: FND_MSG_PUB.initialize;
2752: END IF;
2753:
2754: --Initialize API return status to success.
2755: x_return_status := FND_API.G_RET_STS_SUCCESS;
2769: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
2770: FND_MESSAGE.SET_TOKEN('PROCEDURE',
2771: 'HZ_ORG_INFO_CRMHK.CREATE_STOCK_MARKETS_PRE');
2772: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2773: FND_MSG_PUB.ADD;
2774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2775: END IF;
2776:
2777: END IF;
2798: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
2799: FND_MESSAGE.SET_TOKEN('PROCEDURE',
2800: 'HZ_ORG_INFO_CRMHK.CREATE_STOCK_MARKETS_POST');
2801: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2802: FND_MSG_PUB.ADD;
2803: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2804: END IF;
2805:
2806: END IF;
2818: Commit;
2819: END IF;
2820:
2821: --Standard call to get message count and if count is 1, get message info.
2822: FND_MSG_PUB.Count_And_Get(
2823: p_encoded => FND_API.G_FALSE,
2824: p_count => x_msg_count,
2825: p_data => x_msg_data);
2826: EXCEPTION
2826: EXCEPTION
2827: WHEN FND_API.G_EXC_ERROR THEN
2828: ROLLBACK TO create_stock_markets_pub;
2829: x_return_status := FND_API.G_RET_STS_ERROR;
2830: FND_MSG_PUB.Count_And_Get(
2831: p_encoded => FND_API.G_FALSE,
2832: p_count => x_msg_count,
2833: p_data => x_msg_data);
2834:
2834:
2835: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2836: ROLLBACK TO create_stock_markets_pub;
2837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2838: FND_MSG_PUB.Count_And_Get(
2839: p_encoded => FND_API.G_FALSE,
2840: p_count => x_msg_count,
2841: p_data => x_msg_data);
2842:
2845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2846:
2847: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2848: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2849: FND_MSG_PUB.ADD;
2850:
2851: FND_MSG_PUB.Count_And_Get(
2852: p_encoded => FND_API.G_FALSE,
2853: p_count => x_msg_count,
2847: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2848: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2849: FND_MSG_PUB.ADD;
2850:
2851: FND_MSG_PUB.Count_And_Get(
2852: p_encoded => FND_API.G_FALSE,
2853: p_count => x_msg_count,
2854: p_data => x_msg_data);
2855:
2917: END IF;
2918:
2919: --Initialize message list if p_init_msg_list is set to TRUE.
2920: IF FND_API.to_Boolean(p_init_msg_list) THEN
2921: FND_MSG_PUB.initialize;
2922: END IF;
2923:
2924: --Initialize API return status to success.
2925: x_return_status := FND_API.G_RET_STS_SUCCESS;
2939: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
2940: FND_MESSAGE.SET_TOKEN('PROCEDURE',
2941: 'HZ_ORG_INFO_CRMHK.UPDATE_STOCK_MARKETS_PRE');
2942: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2943: FND_MSG_PUB.ADD;
2944: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2945: END IF;
2946:
2947: END IF;
2983: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
2984: FND_MESSAGE.SET_TOKEN('PROCEDURE',
2985: 'HZ_ORG_INFO_CRMHK.UPDATE_STOCK_MARKETS_POST');
2986: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2987: FND_MSG_PUB.ADD;
2988: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2989: END IF;
2990:
2991: END IF;
3003: Commit;
3004: END IF;
3005:
3006: --Standard call to get message count and if count is 1, get message info.
3007: FND_MSG_PUB.Count_And_Get(
3008: p_encoded => FND_API.G_FALSE,
3009: p_count => x_msg_count,
3010: p_data => x_msg_data);
3011: EXCEPTION
3011: EXCEPTION
3012: WHEN FND_API.G_EXC_ERROR THEN
3013: ROLLBACK TO update_stock_markets_pub;
3014: x_return_status := FND_API.G_RET_STS_ERROR;
3015: FND_MSG_PUB.Count_And_Get(
3016: p_encoded => FND_API.G_FALSE,
3017: p_count => x_msg_count,
3018: p_data => x_msg_data);
3019:
3019:
3020: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3021: ROLLBACK TO update_stock_markets_pub;
3022: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3023: FND_MSG_PUB.Count_And_Get(
3024: p_encoded => FND_API.G_FALSE,
3025: p_count => x_msg_count,
3026: p_data => x_msg_data);
3027:
3030: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3031:
3032: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3033: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3034: FND_MSG_PUB.ADD;
3035:
3036: FND_MSG_PUB.Count_And_Get(
3037: p_encoded => FND_API.G_FALSE,
3038: p_count => x_msg_count,
3032: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3033: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3034: FND_MSG_PUB.ADD;
3035:
3036: FND_MSG_PUB.Count_And_Get(
3037: p_encoded => FND_API.G_FALSE,
3038: p_count => x_msg_count,
3039: p_data => x_msg_data);
3040:
3101: END IF;
3102:
3103: --Initialize message list if p_init_msg_list is set to TRUE.
3104: IF FND_API.to_Boolean(p_init_msg_list) THEN
3105: FND_MSG_PUB.initialize;
3106: END IF;
3107:
3108: --Initialize API return status to success.
3109: x_return_status := FND_API.G_RET_STS_SUCCESS;
3123: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
3124: FND_MESSAGE.SET_TOKEN('PROCEDURE',
3125: 'HZ_ORG_INFO_CRMHK.CREATE_SECURITY_ISSUED_PRE');
3126: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3127: FND_MSG_PUB.ADD;
3128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3129: END IF;
3130:
3131: END IF;
3152: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
3153: FND_MESSAGE.SET_TOKEN('PROCEDURE',
3154: 'HZ_ORG_INFO_CRMHK.CREATE_SECURITY_ISSUED_POST');
3155: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3156: FND_MSG_PUB.ADD;
3157: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3158: END IF;
3159:
3160: END IF;
3172: Commit;
3173: END IF;
3174:
3175: --Standard call to get message count and if count is 1, get message info.
3176: FND_MSG_PUB.Count_And_Get(
3177: p_encoded => FND_API.G_FALSE,
3178: p_count => x_msg_count,
3179: p_data => x_msg_data);
3180: EXCEPTION
3180: EXCEPTION
3181: WHEN FND_API.G_EXC_ERROR THEN
3182: ROLLBACK TO create_security_issued_pub;
3183: x_return_status := FND_API.G_RET_STS_ERROR;
3184: FND_MSG_PUB.Count_And_Get(
3185: p_encoded => FND_API.G_FALSE,
3186: p_count => x_msg_count,
3187: p_data => x_msg_data);
3188:
3188:
3189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3190: ROLLBACK TO create_security_issued_pub;
3191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3192: FND_MSG_PUB.Count_And_Get(
3193: p_encoded => FND_API.G_FALSE,
3194: p_count => x_msg_count,
3195: p_data => x_msg_data);
3196:
3199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3200:
3201: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3202: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3203: FND_MSG_PUB.ADD;
3204:
3205: FND_MSG_PUB.Count_And_Get(
3206: p_encoded => FND_API.G_FALSE,
3207: p_count => x_msg_count,
3201: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3202: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3203: FND_MSG_PUB.ADD;
3204:
3205: FND_MSG_PUB.Count_And_Get(
3206: p_encoded => FND_API.G_FALSE,
3207: p_count => x_msg_count,
3208: p_data => x_msg_data);
3209:
3271: END IF;
3272:
3273: --Initialize message list if p_init_msg_list is set to TRUE.
3274: IF FND_API.to_Boolean(p_init_msg_list) THEN
3275: FND_MSG_PUB.initialize;
3276: END IF;
3277:
3278: --Initialize API return status to success.
3279: x_return_status := FND_API.G_RET_STS_SUCCESS;
3308: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
3309: FND_MESSAGE.SET_TOKEN('PROCEDURE',
3310: 'HZ_ORG_INFO_CRMHK.UPDATE_SECURITY_ISSUED_PRE');
3311: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3312: FND_MSG_PUB.ADD;
3313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3314: END IF;
3315:
3316: END IF;
3337: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
3338: FND_MESSAGE.SET_TOKEN('PROCEDURE',
3339: 'HZ_ORG_INFO_CRMHK.UPDATE_SECURITY_ISSUED_POST');
3340: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3341: FND_MSG_PUB.ADD;
3342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3343: END IF;
3344:
3345: END IF;
3357: Commit;
3358: END IF;
3359:
3360: --Standard call to get message count and if count is 1, get message info.
3361: FND_MSG_PUB.Count_And_Get(
3362: p_encoded => FND_API.G_FALSE,
3363: p_count => x_msg_count,
3364: p_data => x_msg_data);
3365: EXCEPTION
3365: EXCEPTION
3366: WHEN FND_API.G_EXC_ERROR THEN
3367: ROLLBACK TO update_security_issued_pub;
3368: x_return_status := FND_API.G_RET_STS_ERROR;
3369: FND_MSG_PUB.Count_And_Get(
3370: p_encoded => FND_API.G_FALSE,
3371: p_count => x_msg_count,
3372: p_data => x_msg_data);
3373:
3373:
3374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3375: ROLLBACK TO update_security_issued_pub;
3376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3377: FND_MSG_PUB.Count_And_Get(
3378: p_encoded => FND_API.G_FALSE,
3379: p_count => x_msg_count,
3380: p_data => x_msg_data);
3381:
3384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3385:
3386: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3387: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3388: FND_MSG_PUB.ADD;
3389:
3390: FND_MSG_PUB.Count_And_Get(
3391: p_encoded => FND_API.G_FALSE,
3392: p_count => x_msg_count,
3386: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3387: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3388: FND_MSG_PUB.ADD;
3389:
3390: FND_MSG_PUB.Count_And_Get(
3391: p_encoded => FND_API.G_FALSE,
3392: p_count => x_msg_count,
3393: p_data => x_msg_data);
3394:
3461: END IF;
3462:
3463: --Initialize message list if p_init_msg_list is set to TRUE.
3464: IF FND_API.to_Boolean(p_init_msg_list) THEN
3465: FND_MSG_PUB.initialize;
3466: END IF;
3467:
3468: --Initialize API return status to success.
3469: x_return_status := FND_API.G_RET_STS_SUCCESS;
3535: Commit;
3536: END IF;
3537:
3538: --Standard call to get message count and if count is 1, get message info.
3539: FND_MSG_PUB.Count_And_Get(
3540: p_encoded => FND_API.G_FALSE,
3541: p_count => x_msg_count,
3542: p_data => x_msg_data);
3543:
3545: WHEN FND_API.G_EXC_ERROR THEN
3546: ROLLBACK TO create_financial_reports_pub;
3547: x_return_status := FND_API.G_RET_STS_ERROR;
3548:
3549: FND_MSG_PUB.Count_And_Get(
3550: p_encoded => FND_API.G_FALSE,
3551: p_count => x_msg_count,
3552: p_data => x_msg_data);
3553:
3554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3555: ROLLBACK TO create_financial_reports_pub;
3556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3557:
3558: FND_MSG_PUB.Count_And_Get(
3559: p_encoded => FND_API.G_FALSE,
3560: p_count => x_msg_count,
3561: p_data => x_msg_data);
3562:
3565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3566:
3567: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3568: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3569: FND_MSG_PUB.ADD;
3570:
3571: FND_MSG_PUB.Count_And_Get(
3572: p_encoded => FND_API.G_FALSE,
3573: p_count => x_msg_count,
3567: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3568: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3569: FND_MSG_PUB.ADD;
3570:
3571: FND_MSG_PUB.Count_And_Get(
3572: p_encoded => FND_API.G_FALSE,
3573: p_count => x_msg_count,
3574: p_data => x_msg_data);
3575:
3645: END IF;
3646:
3647: --Initialize message list if p_init_msg_list is set to TRUE.
3648: IF FND_API.to_Boolean(p_init_msg_list) THEN
3649: FND_MSG_PUB.initialize;
3650: END IF;
3651:
3652: --Initialize API return status to success.
3653: x_return_status := FND_API.G_RET_STS_SUCCESS;
3725: Commit;
3726: END IF;
3727:
3728: --Standard call to get message count and if count is 1, get message info.
3729: FND_MSG_PUB.Count_And_Get(
3730: p_encoded => FND_API.G_FALSE,
3731: p_count => x_msg_count,
3732: p_data => x_msg_data);
3733:
3735: WHEN FND_API.G_EXC_ERROR THEN
3736: ROLLBACK TO update_financial_reports_pub;
3737: x_return_status := FND_API.G_RET_STS_ERROR;
3738:
3739: FND_MSG_PUB.Count_And_Get(
3740: p_encoded => FND_API.G_FALSE,
3741: p_count => x_msg_count,
3742: p_data => x_msg_data);
3743:
3744: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3745: ROLLBACK TO update_financial_reports_pub;
3746: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3747:
3748: FND_MSG_PUB.Count_And_Get(
3749: p_encoded => FND_API.G_FALSE,
3750: p_count => x_msg_count,
3751: p_data => x_msg_data);
3752:
3755: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3756:
3757: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3758: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3759: FND_MSG_PUB.ADD;
3760:
3761: FND_MSG_PUB.Count_And_Get(
3762: p_encoded => FND_API.G_FALSE,
3763: p_count => x_msg_count,
3757: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3758: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3759: FND_MSG_PUB.ADD;
3760:
3761: FND_MSG_PUB.Count_And_Get(
3762: p_encoded => FND_API.G_FALSE,
3763: p_count => x_msg_count,
3764: p_data => x_msg_data);
3765:
3834: END IF;
3835:
3836: --Initialize message list if p_init_msg_list is set to TRUE.
3837: IF FND_API.to_Boolean(p_init_msg_list) THEN
3838: FND_MSG_PUB.initialize;
3839: END IF;
3840:
3841: --Initialize API return status to success.
3842: x_return_status := FND_API.G_RET_STS_SUCCESS;
3888: Commit;
3889: END IF;
3890:
3891: --Standard call to get message count and if count is 1, get message info.
3892: FND_MSG_PUB.Count_And_Get(
3893: p_encoded => FND_API.G_FALSE,
3894: p_count => x_msg_count,
3895: p_data => x_msg_data);
3896:
3898: WHEN FND_API.G_EXC_ERROR THEN
3899: ROLLBACK TO create_financial_numbers_pub;
3900: x_return_status := FND_API.G_RET_STS_ERROR;
3901:
3902: FND_MSG_PUB.Count_And_Get(
3903: p_encoded => FND_API.G_FALSE,
3904: p_count => x_msg_count,
3905: p_data => x_msg_data);
3906:
3907: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3908: ROLLBACK TO create_financial_numbers_pub;
3909: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3910:
3911: FND_MSG_PUB.Count_And_Get(
3912: p_encoded => FND_API.G_FALSE,
3913: p_count => x_msg_count,
3914: p_data => x_msg_data);
3915:
3918: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3919:
3920: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3921: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3922: FND_MSG_PUB.ADD;
3923:
3924: FND_MSG_PUB.Count_And_Get(
3925: p_encoded => FND_API.G_FALSE,
3926: p_count => x_msg_count,
3920: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3921: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3922: FND_MSG_PUB.ADD;
3923:
3924: FND_MSG_PUB.Count_And_Get(
3925: p_encoded => FND_API.G_FALSE,
3926: p_count => x_msg_count,
3927: p_data => x_msg_data);
3928:
3998: END IF;
3999:
4000: --Initialize message list if p_init_msg_list is set to TRUE.
4001: IF FND_API.to_Boolean(p_init_msg_list) THEN
4002: FND_MSG_PUB.initialize;
4003: END IF;
4004:
4005: --Initialize API return status to success.
4006: x_return_status := FND_API.G_RET_STS_SUCCESS;
4067: Commit;
4068: END IF;
4069:
4070: --Standard call to get message count and if count is 1, get message info.
4071: FND_MSG_PUB.Count_And_Get(
4072: p_encoded => FND_API.G_FALSE,
4073: p_count => x_msg_count,
4074: p_data => x_msg_data);
4075:
4077: WHEN FND_API.G_EXC_ERROR THEN
4078: ROLLBACK TO update_financial_numbers_pub;
4079: x_return_status := FND_API.G_RET_STS_ERROR;
4080:
4081: FND_MSG_PUB.Count_And_Get(
4082: p_encoded => FND_API.G_FALSE,
4083: p_count => x_msg_count,
4084: p_data => x_msg_data);
4085:
4086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4087: ROLLBACK TO update_financial_numbers_pub;
4088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4089:
4090: FND_MSG_PUB.Count_And_Get(
4091: p_encoded => FND_API.G_FALSE,
4092: p_count => x_msg_count,
4093: p_data => x_msg_data);
4094:
4097: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4098:
4099: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4100: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4101: FND_MSG_PUB.ADD;
4102:
4103: FND_MSG_PUB.Count_And_Get(
4104: p_encoded => FND_API.G_FALSE,
4105: p_count => x_msg_count,
4099: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4100: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4101: FND_MSG_PUB.ADD;
4102:
4103: FND_MSG_PUB.Count_And_Get(
4104: p_encoded => FND_API.G_FALSE,
4105: p_count => x_msg_count,
4106: p_data => x_msg_data);
4107:
4169: END IF;
4170:
4171: --Initialize message list if p_init_msg_list is set to TRUE.
4172: IF FND_API.to_Boolean(p_init_msg_list) THEN
4173: FND_MSG_PUB.initialize;
4174: END IF;
4175:
4176: --Initialize API return status to success.
4177: x_return_status := FND_API.G_RET_STS_SUCCESS;
4191: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4192: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4193: 'HZ_ORG_INFO_CRMHK.CREATE_CERTIFICATIONS_PRE');
4194: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4195: FND_MSG_PUB.ADD;
4196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4197: END IF;
4198:
4199: END IF;
4220: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4221: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4222: 'HZ_ORG_INFO_CRMHK.CREATE_CERTIFICATIONS_POST');
4223: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4224: FND_MSG_PUB.ADD;
4225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4226: END IF;
4227:
4228: END IF;
4246: Commit;
4247: END IF;
4248:
4249: --Standard call to get message count and if count is 1, get message info.
4250: FND_MSG_PUB.Count_And_Get(
4251: p_encoded => FND_API.G_FALSE,
4252: p_count => x_msg_count,
4253: p_data => x_msg_data);
4254: EXCEPTION
4254: EXCEPTION
4255: WHEN FND_API.G_EXC_ERROR THEN
4256: ROLLBACK TO create_certifications_pub;
4257: x_return_status := FND_API.G_RET_STS_ERROR;
4258: FND_MSG_PUB.Count_And_Get(
4259: p_encoded => FND_API.G_FALSE,
4260: p_count => x_msg_count,
4261: p_data => x_msg_data);
4262:
4262:
4263: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4264: ROLLBACK TO create_certifications_pub;
4265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4266: FND_MSG_PUB.Count_And_Get(
4267: p_encoded => FND_API.G_FALSE,
4268: p_count => x_msg_count,
4269: p_data => x_msg_data);
4270: WHEN OTHERS THEN
4272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4273:
4274: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4275: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4276: FND_MSG_PUB.ADD;
4277:
4278: FND_MSG_PUB.Count_And_Get(
4279: p_encoded => FND_API.G_FALSE,
4280: p_count => x_msg_count,
4274: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4275: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4276: FND_MSG_PUB.ADD;
4277:
4278: FND_MSG_PUB.Count_And_Get(
4279: p_encoded => FND_API.G_FALSE,
4280: p_count => x_msg_count,
4281: p_data => x_msg_data);
4282: END create_certifications;
4343: END IF;
4344:
4345: --Initialize message list if p_init_msg_list is set to TRUE.
4346: IF FND_API.to_Boolean(p_init_msg_list) THEN
4347: FND_MSG_PUB.initialize;
4348: END IF;
4349:
4350: --Initialize API return status to success.
4351: x_return_status := FND_API.G_RET_STS_SUCCESS;
4381: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4382: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4383: 'HZ_ORG_INFO_CRMHK.UPDATE_CERTIFICATIONS_PRE');
4384: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4385: FND_MSG_PUB.ADD;
4386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4387: END IF;
4388:
4389: END IF;
4410: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4411: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4412: 'HZ_ORG_INFO_CRMHK.UPDATE_CERTIFICATIONS_POST');
4413: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4414: FND_MSG_PUB.ADD;
4415: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4416: END IF;
4417:
4418: END IF;
4436: Commit;
4437: END IF;
4438:
4439: --Standard call to get message count and if count is 1, get message info.
4440: FND_MSG_PUB.Count_And_Get(
4441: p_encoded => FND_API.G_FALSE,
4442: p_count => x_msg_count,
4443: p_data => x_msg_data);
4444: EXCEPTION
4444: EXCEPTION
4445: WHEN FND_API.G_EXC_ERROR THEN
4446: ROLLBACK TO update_certifications_pub;
4447: x_return_status := FND_API.G_RET_STS_ERROR;
4448: FND_MSG_PUB.Count_And_Get(
4449: p_encoded => FND_API.G_FALSE,
4450: p_count => x_msg_count,
4451: p_data => x_msg_data);
4452:
4452:
4453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4454: ROLLBACK TO update_certifications_pub;
4455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4456: FND_MSG_PUB.Count_And_Get(
4457: p_encoded => FND_API.G_FALSE,
4458: p_count => x_msg_count,
4459: p_data => x_msg_data);
4460:
4463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4464:
4465: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4466: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4467: FND_MSG_PUB.ADD;
4468:
4469: FND_MSG_PUB.Count_And_Get(
4470: p_encoded => FND_API.G_FALSE,
4471: p_count => x_msg_count,
4465: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4466: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4467: FND_MSG_PUB.ADD;
4468:
4469: FND_MSG_PUB.Count_And_Get(
4470: p_encoded => FND_API.G_FALSE,
4471: p_count => x_msg_count,
4472: p_data => x_msg_data);
4473:
4534: END IF;
4535:
4536: --Initialize message list if p_init_msg_list is set to TRUE.
4537: IF FND_API.to_Boolean(p_init_msg_list) THEN
4538: FND_MSG_PUB.initialize;
4539: END IF;
4540:
4541: --Initialize API return status to success.
4542: x_return_status := FND_API.G_RET_STS_SUCCESS;
4556: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4557: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4558: 'HZ_ORG_INFO_CRMHK.CREATE_INDUSTRIAL_REF_PRE');
4559: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4560: FND_MSG_PUB.ADD;
4561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4562: END IF;
4563:
4564: END IF;
4585: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4586: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4587: 'HZ_ORG_INFO_CRMHK.CREATE_INDUSTRIAL_REF_POST');
4588: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4589: FND_MSG_PUB.ADD;
4590: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4591: END IF;
4592:
4593: END IF;
4599: Commit;
4600: END IF;
4601:
4602: --Standard call to get message count and if count is 1, get message info.
4603: FND_MSG_PUB.Count_And_Get(
4604: p_encoded => FND_API.G_FALSE,
4605: p_count => x_msg_count,
4606: p_data => x_msg_data);
4607: EXCEPTION
4607: EXCEPTION
4608: WHEN FND_API.G_EXC_ERROR THEN
4609: ROLLBACK TO create_industrial_ref_pub;
4610: x_return_status := FND_API.G_RET_STS_ERROR;
4611: FND_MSG_PUB.Count_And_Get(
4612: p_encoded => FND_API.G_FALSE,
4613: p_count => x_msg_count,
4614: p_data => x_msg_data);
4615:
4615:
4616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4617: ROLLBACK TO create_industrial_ref_pub;
4618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4619: FND_MSG_PUB.Count_And_Get(
4620: p_encoded => FND_API.G_FALSE,
4621: p_count => x_msg_count,
4622: p_data => x_msg_data);
4623:
4626: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4627:
4628: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4629: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4630: FND_MSG_PUB.ADD;
4631:
4632: FND_MSG_PUB.Count_And_Get(
4633: p_encoded => FND_API.G_FALSE,
4634: p_count => x_msg_count,
4628: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4629: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4630: FND_MSG_PUB.ADD;
4631:
4632: FND_MSG_PUB.Count_And_Get(
4633: p_encoded => FND_API.G_FALSE,
4634: p_count => x_msg_count,
4635: p_data => x_msg_data);
4636:
4696: END IF;
4697:
4698: --Initialize message list if p_init_msg_list is set to TRUE.
4699: IF FND_API.to_Boolean(p_init_msg_list) THEN
4700: FND_MSG_PUB.initialize;
4701: END IF;
4702:
4703: --Initialize API return status to success.
4704: x_return_status := FND_API.G_RET_STS_SUCCESS;
4718: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4719: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4720: 'HZ_ORG_INFO_CRMHK.UPDATE_INDUSTRIAL_REF_PRE');
4721: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4722: FND_MSG_PUB.ADD;
4723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4724: END IF;
4725:
4726: END IF;
4746: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4747: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4748: 'HZ_ORG_INFO_CRMHK.UPDATE_INDUSTRIAL_REF_POST');
4749: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4750: FND_MSG_PUB.ADD;
4751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4752: END IF;
4753:
4754: END IF;
4759: Commit;
4760: END IF;
4761:
4762: --Standard call to get message count and if count is 1, get message info.
4763: FND_MSG_PUB.Count_And_Get(
4764: p_encoded => FND_API.G_FALSE,
4765: p_count => x_msg_count,
4766: p_data => x_msg_data);
4767: EXCEPTION
4767: EXCEPTION
4768: WHEN FND_API.G_EXC_ERROR THEN
4769: ROLLBACK TO update_industrial_ref_pub;
4770: x_return_status := FND_API.G_RET_STS_ERROR;
4771: FND_MSG_PUB.Count_And_Get(
4772: p_encoded => FND_API.G_FALSE,
4773: p_count => x_msg_count,
4774: p_data => x_msg_data);
4775:
4775:
4776: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4777: ROLLBACK TO update_industrial_ref_pub;
4778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4779: FND_MSG_PUB.Count_And_Get(
4780: p_encoded => FND_API.G_FALSE,
4781: p_count => x_msg_count,
4782: p_data => x_msg_data);
4783:
4786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4787:
4788: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4789: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4790: FND_MSG_PUB.ADD;
4791:
4792: FND_MSG_PUB.Count_And_Get(
4793: p_encoded => FND_API.G_FALSE,
4794: p_count => x_msg_count,
4788: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4789: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4790: FND_MSG_PUB.ADD;
4791:
4792: FND_MSG_PUB.Count_And_Get(
4793: p_encoded => FND_API.G_FALSE,
4794: p_count => x_msg_count,
4795: p_data => x_msg_data);
4796:
4856: END IF;
4857:
4858: --Initialize message list if p_init_msg_list is set to TRUE.
4859: IF FND_API.to_Boolean(p_init_msg_list) THEN
4860: FND_MSG_PUB.initialize;
4861: END IF;
4862:
4863: --Initialize API return status to success.
4864: x_return_status := FND_API.G_RET_STS_SUCCESS;
4878: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4879: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4880: 'HZ_ORG_INFO_CRMHK.CREATE_INDUSTRIAL_CLASSES_PRE');
4881: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4882: FND_MSG_PUB.ADD;
4883: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4884: END IF;
4885:
4886: END IF;
4906: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
4907: FND_MESSAGE.SET_TOKEN('PROCEDURE',
4908: 'HZ_ORG_INFO_CRMHK.CREATE_INDUSTRIAL_CLASSES_POST');
4909: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4910: FND_MSG_PUB.ADD;
4911: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4912: END IF;
4913:
4914: END IF;
4919: Commit;
4920: END IF;
4921:
4922: --Standard call to get message count and if count is 1, get message info.
4923: FND_MSG_PUB.Count_And_Get(
4924: p_encoded => FND_API.G_FALSE,
4925: p_count => x_msg_count,
4926: p_data => x_msg_data);
4927: EXCEPTION
4927: EXCEPTION
4928: WHEN FND_API.G_EXC_ERROR THEN
4929: ROLLBACK TO create_industrial_classes_pub;
4930: x_return_status := FND_API.G_RET_STS_ERROR;
4931: FND_MSG_PUB.Count_And_Get(
4932: p_encoded => FND_API.G_FALSE,
4933: p_count => x_msg_count,
4934: p_data => x_msg_data);
4935:
4935:
4936: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4937: ROLLBACK TO create_industrial_classes_pub;
4938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4939: FND_MSG_PUB.Count_And_Get(
4940: p_encoded => FND_API.G_FALSE,
4941: p_count => x_msg_count,
4942: p_data => x_msg_data);
4943:
4946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4947:
4948: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4949: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4950: FND_MSG_PUB.ADD;
4951:
4952: FND_MSG_PUB.Count_And_Get(
4953: p_encoded => FND_API.G_FALSE,
4954: p_count => x_msg_count,
4948: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4949: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4950: FND_MSG_PUB.ADD;
4951:
4952: FND_MSG_PUB.Count_And_Get(
4953: p_encoded => FND_API.G_FALSE,
4954: p_count => x_msg_count,
4955: p_data => x_msg_data);
4956:
5018: END IF;
5019:
5020: --Initialize message list if p_init_msg_list is set to TRUE.
5021: IF FND_API.to_Boolean(p_init_msg_list) THEN
5022: FND_MSG_PUB.initialize;
5023: END IF;
5024:
5025: --Initialize API return status to success.
5026: x_return_status := FND_API.G_RET_STS_SUCCESS;
5051: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
5052: FND_MESSAGE.SET_TOKEN('PROCEDURE',
5053: 'HZ_ORG_INFO_CRMHK.UPDATE_INDUSTRIAL_CLASSES_PRE');
5054: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5055: FND_MSG_PUB.ADD;
5056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5057: END IF;
5058:
5059: END IF;
5080: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
5081: FND_MESSAGE.SET_TOKEN('PROCEDURE',
5082: 'HZ_ORG_INFO_CRMHK.UPDATE_INDUSTRIAL_CLASSES_POST');
5083: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5084: FND_MSG_PUB.ADD;
5085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5086: END IF;
5087:
5088: END IF;
5093: Commit;
5094: END IF;
5095:
5096: --Standard call to get message count and if count is 1, get message info.
5097: FND_MSG_PUB.Count_And_Get(
5098: p_encoded => FND_API.G_FALSE,
5099: p_count => x_msg_count,
5100: p_data => x_msg_data);
5101: EXCEPTION
5101: EXCEPTION
5102: WHEN FND_API.G_EXC_ERROR THEN
5103: ROLLBACK TO update_industrial_classes_pub;
5104: x_return_status := FND_API.G_RET_STS_ERROR;
5105: FND_MSG_PUB.Count_And_Get(
5106: p_encoded => FND_API.G_FALSE,
5107: p_count => x_msg_count,
5108: p_data => x_msg_data);
5109:
5109:
5110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5111: ROLLBACK TO update_industrial_classes_pub;
5112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5113: FND_MSG_PUB.Count_And_Get(
5114: p_encoded => FND_API.G_FALSE,
5115: p_count => x_msg_count,
5116: p_data => x_msg_data);
5117:
5120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5121:
5122: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5123: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5124: FND_MSG_PUB.ADD;
5125:
5126: FND_MSG_PUB.Count_And_Get(
5127: p_encoded => FND_API.G_FALSE,
5128: p_count => x_msg_count,
5122: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5123: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5124: FND_MSG_PUB.ADD;
5125:
5126: FND_MSG_PUB.Count_And_Get(
5127: p_encoded => FND_API.G_FALSE,
5128: p_count => x_msg_count,
5129: p_data => x_msg_data);
5130:
5190: END IF;
5191:
5192: --Initialize message list if p_init_msg_list is set to TRUE.
5193: IF FND_API.to_Boolean(p_init_msg_list) THEN
5194: FND_MSG_PUB.initialize;
5195: END IF;
5196:
5197: --Initialize API return status to success.
5198: x_return_status := FND_API.G_RET_STS_SUCCESS;
5212: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
5213: FND_MESSAGE.SET_TOKEN('PROCEDURE',
5214: 'HZ_ORG_INFO_CRMHK.CREATE_INDUS_CLASS_APP_PRE');
5215: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5216: FND_MSG_PUB.ADD;
5217: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5218: END IF;
5219:
5220: END IF;
5241: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
5242: FND_MESSAGE.SET_TOKEN('PROCEDURE',
5243: 'HZ_ORG_INFO_CRMHK.CREATE_INDUS_CLASS_APP_POST');
5244: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5245: FND_MSG_PUB.ADD;
5246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5247: END IF;
5248:
5249: END IF;
5254: Commit;
5255: END IF;
5256:
5257: --Standard call to get message count and if count is 1, get message info.
5258: FND_MSG_PUB.Count_And_Get(
5259: p_encoded => FND_API.G_FALSE,
5260: p_count => x_msg_count,
5261: p_data => x_msg_data);
5262: EXCEPTION
5262: EXCEPTION
5263: WHEN FND_API.G_EXC_ERROR THEN
5264: ROLLBACK TO create_indus_class_app_pub;
5265: x_return_status := FND_API.G_RET_STS_ERROR;
5266: FND_MSG_PUB.Count_And_Get(
5267: p_encoded => FND_API.G_FALSE,
5268: p_count => x_msg_count,
5269: p_data => x_msg_data);
5270:
5270:
5271: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5272: ROLLBACK TO create_indus_class_app_pub;
5273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5274: FND_MSG_PUB.Count_And_Get(
5275: p_encoded => FND_API.G_FALSE,
5276: p_count => x_msg_count,
5277: p_data => x_msg_data);
5278:
5281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5282:
5283: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5284: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5285: FND_MSG_PUB.ADD;
5286:
5287: FND_MSG_PUB.Count_And_Get(
5288: p_encoded => FND_API.G_FALSE,
5289: p_count => x_msg_count,
5283: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5284: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5285: FND_MSG_PUB.ADD;
5286:
5287: FND_MSG_PUB.Count_And_Get(
5288: p_encoded => FND_API.G_FALSE,
5289: p_count => x_msg_count,
5290: p_data => x_msg_data);
5291:
5351: END IF;
5352:
5353: --Initialize message list if p_init_msg_list is set to TRUE.
5354: IF FND_API.to_Boolean(p_init_msg_list) THEN
5355: FND_MSG_PUB.initialize;
5356: END IF;
5357:
5358: --Initialize API return status to success.
5359: x_return_status := FND_API.G_RET_STS_SUCCESS;
5373: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
5374: FND_MESSAGE.SET_TOKEN('PROCEDURE',
5375: 'HZ_ORG_INFO_CRMHK.CREATE_INDUS_CLASS_APP_PRE');
5376: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5377: FND_MSG_PUB.ADD;
5378: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5379: END IF;
5380:
5381: END IF;
5402: FND_MESSAGE.SET_NAME('AR', 'HZ_API_HOOK_ERROR');
5403: FND_MESSAGE.SET_TOKEN('PROCEDURE',
5404: 'HZ_ORG_INFO_CRMHK.UPDATE_INDUS_CLASS_APP_POST');
5405: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5406: FND_MSG_PUB.ADD;
5407: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5408: END IF;
5409:
5410: END IF;
5415: Commit;
5416: END IF;
5417:
5418: --Standard call to get message count and if count is 1, get message info.
5419: FND_MSG_PUB.Count_And_Get(
5420: p_encoded => FND_API.G_FALSE,
5421: p_count => x_msg_count,
5422: p_data => x_msg_data);
5423: EXCEPTION
5423: EXCEPTION
5424: WHEN FND_API.G_EXC_ERROR THEN
5425: ROLLBACK TO update_indus_class_app_pub;
5426: x_return_status := FND_API.G_RET_STS_ERROR;
5427: FND_MSG_PUB.Count_And_Get(
5428: p_encoded => FND_API.G_FALSE,
5429: p_count => x_msg_count,
5430: p_data => x_msg_data);
5431:
5431:
5432: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5433: ROLLBACK TO update_indus_class_app_pub;
5434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5435: FND_MSG_PUB.Count_And_Get(
5436: p_encoded => FND_API.G_FALSE,
5437: p_count => x_msg_count,
5438: p_data => x_msg_data);
5439:
5442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5443:
5444: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5445: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5446: FND_MSG_PUB.ADD;
5447:
5448: FND_MSG_PUB.Count_And_Get(
5449: p_encoded => FND_API.G_FALSE,
5450: p_count => x_msg_count,
5444: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5445: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5446: FND_MSG_PUB.ADD;
5447:
5448: FND_MSG_PUB.Count_And_Get(
5449: p_encoded => FND_API.G_FALSE,
5450: p_count => x_msg_count,
5451: p_data => x_msg_data);
5452:
5478: END IF;
5479:
5480: --Initialize message list if p_init_msg_list is set to TRUE.
5481: IF FND_API.to_Boolean(p_init_msg_list) THEN
5482: FND_MSG_PUB.initialize;
5483: END IF;
5484:
5485: --Initialize API return status to success.
5486: x_return_status := FND_API.G_RET_STS_SUCCESS;
5490: p_financial_report_id = FND_API.G_MISS_NUM THEN
5491:
5492: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
5493: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_report_id');
5494: FND_MSG_PUB.ADD;
5495: RAISE FND_API.G_EXC_ERROR;
5496: END IF;
5497:
5498: BEGIN /* Just for select statement */
5559: WHEN NO_DATA_FOUND THEN
5560: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
5561: FND_MESSAGE.SET_TOKEN('RECORD', 'financial report');
5562: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_financial_report_id));
5563: FND_MSG_PUB.ADD;
5564: RAISE FND_API.G_EXC_ERROR;
5565: END;
5566: --Standard call to get message count and if count is 1, get message info.
5567: FND_MSG_PUB.Count_And_Get(
5563: FND_MSG_PUB.ADD;
5564: RAISE FND_API.G_EXC_ERROR;
5565: END;
5566: --Standard call to get message count and if count is 1, get message info.
5567: FND_MSG_PUB.Count_And_Get(
5568: p_encoded => FND_API.G_FALSE,
5569: p_count => x_msg_count,
5570: p_data => x_msg_data);
5571:
5571:
5572: EXCEPTION
5573: WHEN FND_API.G_EXC_ERROR THEN
5574: x_return_status := FND_API.G_RET_STS_ERROR;
5575: FND_MSG_PUB.Count_And_Get(
5576: p_encoded => FND_API.G_FALSE,
5577: p_count => x_msg_count,
5578: p_data => x_msg_data);
5579:
5578: p_data => x_msg_data);
5579:
5580: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5582: FND_MSG_PUB.Count_And_Get(
5583: p_encoded => FND_API.G_FALSE,
5584: p_count => x_msg_count,
5585: p_data => x_msg_data);
5586: WHEN OTHERS THEN
5587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5588:
5589: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5590: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5591: FND_MSG_PUB.ADD;
5592:
5593: FND_MSG_PUB.Count_And_Get(
5594: p_encoded => FND_API.G_FALSE,
5595: p_count => x_msg_count,
5589: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5590: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5591: FND_MSG_PUB.ADD;
5592:
5593: FND_MSG_PUB.Count_And_Get(
5594: p_encoded => FND_API.G_FALSE,
5595: p_count => x_msg_count,
5596: p_data => x_msg_data);
5597:
5623: END IF;
5624:
5625: --Initialize message list if p_init_msg_list is set to TRUE.
5626: IF FND_API.to_Boolean(p_init_msg_list) THEN
5627: FND_MSG_PUB.initialize;
5628: END IF;
5629:
5630: --Initialize API return status to success.
5631: x_return_status := FND_API.G_RET_STS_SUCCESS;
5635: p_financial_number_id = FND_API.G_MISS_NUM THEN
5636:
5637: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
5638: FND_MESSAGE.SET_TOKEN('COLUMN', 'financial_number_id');
5639: FND_MSG_PUB.ADD;
5640: RAISE FND_API.G_EXC_ERROR;
5641: END IF;
5642:
5643: BEGIN /* Just for select statement */
5671: WHEN NO_DATA_FOUND THEN
5672: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
5673: FND_MESSAGE.SET_TOKEN('RECORD', 'credit rating');
5674: FND_MESSAGE.SET_TOKEN('VALUE', to_char(p_financial_number_id));
5675: FND_MSG_PUB.ADD;
5676: RAISE FND_API.G_EXC_ERROR;
5677: END;
5678: --Standard call to get message count and if count is 1, get message info.
5679: FND_MSG_PUB.Count_And_Get(
5675: FND_MSG_PUB.ADD;
5676: RAISE FND_API.G_EXC_ERROR;
5677: END;
5678: --Standard call to get message count and if count is 1, get message info.
5679: FND_MSG_PUB.Count_And_Get(
5680: p_encoded => FND_API.G_FALSE,
5681: p_count => x_msg_count,
5682: p_data => x_msg_data);
5683:
5683:
5684: EXCEPTION
5685: WHEN FND_API.G_EXC_ERROR THEN
5686: x_return_status := FND_API.G_RET_STS_ERROR;
5687: FND_MSG_PUB.Count_And_Get(
5688: p_encoded => FND_API.G_FALSE,
5689: p_count => x_msg_count,
5690: p_data => x_msg_data);
5691:
5690: p_data => x_msg_data);
5691:
5692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5694: FND_MSG_PUB.Count_And_Get(
5695: p_encoded => FND_API.G_FALSE,
5696: p_count => x_msg_count,
5697: p_data => x_msg_data);
5698: WHEN OTHERS THEN
5699: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5700:
5701: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5702: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5703: FND_MSG_PUB.ADD;
5704:
5705: FND_MSG_PUB.Count_And_Get(
5706: p_encoded => FND_API.G_FALSE,
5707: p_count => x_msg_count,
5701: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
5702: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
5703: FND_MSG_PUB.ADD;
5704:
5705: FND_MSG_PUB.Count_And_Get(
5706: p_encoded => FND_API.G_FALSE,
5707: p_count => x_msg_count,
5708: p_data => x_msg_data);
5709: