288: FROM HZ_PARTIES
289: WHERE PARTY_ID = l_party_id;
290:
291: IF l_party_type <> p_entity_type THEN
292: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
293: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
294: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
295: FND_MSG_PUB.ADD;
296: RAISE FND_API.G_EXC_ERROR;
289: WHERE PARTY_ID = l_party_id;
290:
291: IF l_party_type <> p_entity_type THEN
292: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
293: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
294: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
295: FND_MSG_PUB.ADD;
296: RAISE FND_API.G_EXC_ERROR;
297: END IF;
290:
291: IF l_party_type <> p_entity_type THEN
292: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
293: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
294: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
295: FND_MSG_PUB.ADD;
296: RAISE FND_API.G_EXC_ERROR;
297: END IF;
298:
332: FROM HZ_PARTIES
333: WHERE PARTY_ID = l_party_id;
334:
335: IF l_party_type <> p_entity_type THEN
336: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
337: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
338: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
339: FND_MSG_PUB.ADD;
340: RAISE FND_API.G_EXC_ERROR;
333: WHERE PARTY_ID = l_party_id;
334:
335: IF l_party_type <> p_entity_type THEN
336: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
337: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
338: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
339: FND_MSG_PUB.ADD;
340: RAISE FND_API.G_EXC_ERROR;
341: END IF;
334:
335: IF l_party_type <> p_entity_type THEN
336: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
337: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
338: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
339: FND_MSG_PUB.ADD;
340: RAISE FND_API.G_EXC_ERROR;
341: END IF;
342: EXCEPTION
370: FROM HZ_PARTIES
371: WHERE PARTY_ID = l_party_id;
372:
373: IF l_party_type <> p_entity_type THEN
374: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
375: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
376: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
377: FND_MSG_PUB.ADD;
378: RAISE FND_API.G_EXC_ERROR;
371: WHERE PARTY_ID = l_party_id;
372:
373: IF l_party_type <> p_entity_type THEN
374: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
375: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
376: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
377: FND_MSG_PUB.ADD;
378: RAISE FND_API.G_EXC_ERROR;
379: END IF;
372:
373: IF l_party_type <> p_entity_type THEN
374: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_PARTY_TYPE' );
375: FND_MESSAGE.SET_TOKEN( 'PARTY_ID', l_party_id);
376: FND_MESSAGE.SET_TOKEN( 'TYPE', p_entity_type);
377: FND_MSG_PUB.ADD;
378: RAISE FND_API.G_EXC_ERROR;
379: END IF;
380: EXCEPTION
624:
625: IF p_customer_profile_rec.site_use_id IS NOT NULL AND
626: p_customer_profile_rec.site_use_id <> FND_API.G_MISS_NUM
627: THEN
628: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_COLUMN_SHOULD_BE_NULL' );
629: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'site_use_id' );
630: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_customer_profiles' );
631: FND_MSG_PUB.ADD;
632: RAISE FND_API.G_EXC_ERROR;
625: IF p_customer_profile_rec.site_use_id IS NOT NULL AND
626: p_customer_profile_rec.site_use_id <> FND_API.G_MISS_NUM
627: THEN
628: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_COLUMN_SHOULD_BE_NULL' );
629: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'site_use_id' );
630: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_customer_profiles' );
631: FND_MSG_PUB.ADD;
632: RAISE FND_API.G_EXC_ERROR;
633: END IF;
626: p_customer_profile_rec.site_use_id <> FND_API.G_MISS_NUM
627: THEN
628: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_COLUMN_SHOULD_BE_NULL' );
629: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'site_use_id' );
630: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_customer_profiles' );
631: FND_MSG_PUB.ADD;
632: RAISE FND_API.G_EXC_ERROR;
633: END IF;
634:
788: ( p_object_version_number IS NOT NULL AND
789: l_object_version_number IS NOT NULL AND
790: p_object_version_number = l_object_version_number ) )
791: THEN
792: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
793: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
794: FND_MSG_PUB.ADD;
795: RAISE FND_API.G_EXC_ERROR;
796: END IF;
789: l_object_version_number IS NOT NULL AND
790: p_object_version_number = l_object_version_number ) )
791: THEN
792: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
793: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_accounts' );
794: FND_MSG_PUB.ADD;
795: RAISE FND_API.G_EXC_ERROR;
796: END IF;
797:
798: p_object_version_number := NVL( l_object_version_number, 1 ) + 1;
799:
800: EXCEPTION
801: WHEN NO_DATA_FOUND THEN
802: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
803: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account' );
804: FND_MESSAGE.SET_TOKEN( 'VALUE',
805: NVL( TO_CHAR( p_cust_account_rec.cust_account_id ), 'null' ) );
806: FND_MSG_PUB.ADD;
799:
800: EXCEPTION
801: WHEN NO_DATA_FOUND THEN
802: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
803: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account' );
804: FND_MESSAGE.SET_TOKEN( 'VALUE',
805: NVL( TO_CHAR( p_cust_account_rec.cust_account_id ), 'null' ) );
806: FND_MSG_PUB.ADD;
807: RAISE FND_API.G_EXC_ERROR;
800: EXCEPTION
801: WHEN NO_DATA_FOUND THEN
802: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
803: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account' );
804: FND_MESSAGE.SET_TOKEN( 'VALUE',
805: NVL( TO_CHAR( p_cust_account_rec.cust_account_id ), 'null' ) );
806: FND_MSG_PUB.ADD;
807: RAISE FND_API.G_EXC_ERROR;
808: END;
1294: FOR UPDATE NOWAIT;
1295:
1296: EXCEPTION
1297: WHEN NO_DATA_FOUND THEN
1298: FND_MESSAGE.SET_NAME('AR','HZ_API_NO_ACTIVE_RECORD');
1299: FND_MESSAGE.SET_TOKEN( 'ACCOUNT1',p_cust_acct_relate_rec.cust_account_id);
1300: FND_MESSAGE.SET_TOKEN( 'ACCOUNT2',p_cust_acct_relate_rec.related_cust_account_id);
1301: FND_MSG_PUB.ADD;
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1295:
1296: EXCEPTION
1297: WHEN NO_DATA_FOUND THEN
1298: FND_MESSAGE.SET_NAME('AR','HZ_API_NO_ACTIVE_RECORD');
1299: FND_MESSAGE.SET_TOKEN( 'ACCOUNT1',p_cust_acct_relate_rec.cust_account_id);
1300: FND_MESSAGE.SET_TOKEN( 'ACCOUNT2',p_cust_acct_relate_rec.related_cust_account_id);
1301: FND_MSG_PUB.ADD;
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1303: RAISE FND_API.G_EXC_ERROR;
1296: EXCEPTION
1297: WHEN NO_DATA_FOUND THEN
1298: FND_MESSAGE.SET_NAME('AR','HZ_API_NO_ACTIVE_RECORD');
1299: FND_MESSAGE.SET_TOKEN( 'ACCOUNT1',p_cust_acct_relate_rec.cust_account_id);
1300: FND_MESSAGE.SET_TOKEN( 'ACCOUNT2',p_cust_acct_relate_rec.related_cust_account_id);
1301: FND_MSG_PUB.ADD;
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1303: RAISE FND_API.G_EXC_ERROR;
1304: END;
1313: WHERE ROWID = p_rowid;
1314:
1315: EXCEPTION
1316: WHEN NO_DATA_FOUND THEN
1317: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
1318: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account relate' );
1319: FND_MESSAGE.SET_TOKEN( 'VALUE',p_rowid);
1320: FND_MSG_PUB.ADD;
1321: x_return_status := FND_API.G_RET_STS_ERROR;
1314:
1315: EXCEPTION
1316: WHEN NO_DATA_FOUND THEN
1317: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
1318: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account relate' );
1319: FND_MESSAGE.SET_TOKEN( 'VALUE',p_rowid);
1320: FND_MSG_PUB.ADD;
1321: x_return_status := FND_API.G_RET_STS_ERROR;
1322: RAISE FND_API.G_EXC_ERROR;
1315: EXCEPTION
1316: WHEN NO_DATA_FOUND THEN
1317: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
1318: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account relate' );
1319: FND_MESSAGE.SET_TOKEN( 'VALUE',p_rowid);
1320: FND_MSG_PUB.ADD;
1321: x_return_status := FND_API.G_RET_STS_ERROR;
1322: RAISE FND_API.G_EXC_ERROR;
1323: END;
1345: IF p_cust_acct_relate_rec.cust_account_id IS NOT NULL AND
1346: (p_cust_acct_relate_rec.cust_account_id = FND_API.G_MISS_NUM OR
1347: l_cust_account_id <> p_cust_acct_relate_rec.cust_account_id)
1348: THEN
1349: FND_MESSAGE.SET_NAME ('AR','HZ_API_NONUPDATEABLE_COLUMN');
1350: FND_MESSAGE.SET_TOKEN('COLUMN','CUST_ACCOUNT_ID');
1351: FND_MSG_PUB.ADD;
1352: x_return_status := FND_API.G_RET_STS_ERROR;
1353: END IF;
1346: (p_cust_acct_relate_rec.cust_account_id = FND_API.G_MISS_NUM OR
1347: l_cust_account_id <> p_cust_acct_relate_rec.cust_account_id)
1348: THEN
1349: FND_MESSAGE.SET_NAME ('AR','HZ_API_NONUPDATEABLE_COLUMN');
1350: FND_MESSAGE.SET_TOKEN('COLUMN','CUST_ACCOUNT_ID');
1351: FND_MSG_PUB.ADD;
1352: x_return_status := FND_API.G_RET_STS_ERROR;
1353: END IF;
1354:
1356: IF p_cust_acct_relate_rec.related_cust_account_id IS NOT NULL AND
1357: (p_cust_acct_relate_rec.related_cust_account_id = FND_API.G_MISS_NUM OR
1358: l_related_cust_account_id <> p_cust_acct_relate_rec.related_cust_account_id)
1359: THEN
1360: FND_MESSAGE.SET_NAME ('AR','HZ_API_NONUPDATEABLE_COLUMN');
1361: FND_MESSAGE.SET_TOKEN('COLUMN','RELATED_CUST_ACCOUNT_ID');
1362: FND_MSG_PUB.ADD;
1363: x_return_status := FND_API.G_RET_STS_ERROR;
1364: END IF;
1357: (p_cust_acct_relate_rec.related_cust_account_id = FND_API.G_MISS_NUM OR
1358: l_related_cust_account_id <> p_cust_acct_relate_rec.related_cust_account_id)
1359: THEN
1360: FND_MESSAGE.SET_NAME ('AR','HZ_API_NONUPDATEABLE_COLUMN');
1361: FND_MESSAGE.SET_TOKEN('COLUMN','RELATED_CUST_ACCOUNT_ID');
1362: FND_MSG_PUB.ADD;
1363: x_return_status := FND_API.G_RET_STS_ERROR;
1364: END IF;
1365:
1376: STATUS = 'A' AND
1377: ORG_ID = p_cust_acct_relate_rec.org_id; -- Bug 3456489
1378:
1379: IF l_count <> 0 THEN
1380: FND_MESSAGE.SET_NAME ('AR','HZ_ACTIVE_CUST_ACCT_RELATE');
1381: FND_MESSAGE.SET_TOKEN('ACCOUNT1',l_cust_account_id);
1382: FND_MESSAGE.SET_TOKEN('ACCOUNT2',l_related_cust_account_id);
1383: FND_MSG_PUB.ADD;
1384: x_return_status := FND_API.G_RET_STS_ERROR;
1377: ORG_ID = p_cust_acct_relate_rec.org_id; -- Bug 3456489
1378:
1379: IF l_count <> 0 THEN
1380: FND_MESSAGE.SET_NAME ('AR','HZ_ACTIVE_CUST_ACCT_RELATE');
1381: FND_MESSAGE.SET_TOKEN('ACCOUNT1',l_cust_account_id);
1382: FND_MESSAGE.SET_TOKEN('ACCOUNT2',l_related_cust_account_id);
1383: FND_MSG_PUB.ADD;
1384: x_return_status := FND_API.G_RET_STS_ERROR;
1385: END IF;
1378:
1379: IF l_count <> 0 THEN
1380: FND_MESSAGE.SET_NAME ('AR','HZ_ACTIVE_CUST_ACCT_RELATE');
1381: FND_MESSAGE.SET_TOKEN('ACCOUNT1',l_cust_account_id);
1382: FND_MESSAGE.SET_TOKEN('ACCOUNT2',l_related_cust_account_id);
1383: FND_MSG_PUB.ADD;
1384: x_return_status := FND_API.G_RET_STS_ERROR;
1385: END IF;
1386:
1387: END IF;
1388:
1389: EXCEPTION
1390: WHEN NO_DATA_FOUND THEN
1391: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
1392: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account relate' );
1393: FND_MESSAGE.SET_TOKEN( 'VALUE', l_cust_acct_relate_id);
1394: FND_MSG_PUB.ADD;
1395: x_return_status := FND_API.G_RET_STS_ERROR;
1388:
1389: EXCEPTION
1390: WHEN NO_DATA_FOUND THEN
1391: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
1392: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account relate' );
1393: FND_MESSAGE.SET_TOKEN( 'VALUE', l_cust_acct_relate_id);
1394: FND_MSG_PUB.ADD;
1395: x_return_status := FND_API.G_RET_STS_ERROR;
1396: RAISE FND_API.G_EXC_ERROR;
1389: EXCEPTION
1390: WHEN NO_DATA_FOUND THEN
1391: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
1392: FND_MESSAGE.SET_TOKEN( 'RECORD', 'customer account relate' );
1393: FND_MESSAGE.SET_TOKEN( 'VALUE', l_cust_acct_relate_id);
1394: FND_MSG_PUB.ADD;
1395: x_return_status := FND_API.G_RET_STS_ERROR;
1396: RAISE FND_API.G_EXC_ERROR;
1397: END;
1402: ( p_object_version_number IS NOT NULL AND
1403: l_object_version_number IS NOT NULL AND
1404: p_object_version_number = l_object_version_number ) )
1405: THEN
1406: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
1407: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_relate' );
1408: FND_MSG_PUB.ADD;
1409: RAISE FND_API.G_EXC_ERROR;
1410: END IF;
1403: l_object_version_number IS NOT NULL AND
1404: p_object_version_number = l_object_version_number ) )
1405: THEN
1406: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
1407: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_cust_acct_relate' );
1408: FND_MSG_PUB.ADD;
1409: RAISE FND_API.G_EXC_ERROR;
1410: END IF;
1411:
1706: WHEN OTHERS THEN
1707: ROLLBACK TO create_cust_account;
1708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1709:
1710: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
1711: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1712: FND_MSG_PUB.ADD;
1713:
1714: FND_MSG_PUB.Count_And_Get(
1707: ROLLBACK TO create_cust_account;
1708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1709:
1710: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
1711: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1712: FND_MSG_PUB.ADD;
1713:
1714: FND_MSG_PUB.Count_And_Get(
1715: p_encoded => FND_API.G_FALSE,
1955: WHEN OTHERS THEN
1956: ROLLBACK TO create_cust_account;
1957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1958:
1959: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
1960: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1961: FND_MSG_PUB.ADD;
1962:
1963: FND_MSG_PUB.Count_And_Get(
1956: ROLLBACK TO create_cust_account;
1957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1958:
1959: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
1960: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1961: FND_MSG_PUB.ADD;
1962:
1963: FND_MSG_PUB.Count_And_Get(
1964: p_encoded => FND_API.G_FALSE,
2210: WHEN OTHERS THEN
2211: ROLLBACK TO update_cust_account;
2212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2213:
2214: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2215: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2216: FND_MSG_PUB.ADD;
2217:
2218: FND_MSG_PUB.Count_And_Get(
2211: ROLLBACK TO update_cust_account;
2212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2213:
2214: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2215: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2216: FND_MSG_PUB.ADD;
2217:
2218: FND_MSG_PUB.Count_And_Get(
2219: p_encoded => FND_API.G_FALSE,
2312:
2313: -- Check whether primary key has been passed in.
2314: IF p_cust_account_id IS NULL OR
2315: p_cust_account_id = FND_API.G_MISS_NUM THEN
2316: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2317: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
2318: FND_MSG_PUB.ADD;
2319: RAISE FND_API.G_EXC_ERROR;
2320: END IF;
2313: -- Check whether primary key has been passed in.
2314: IF p_cust_account_id IS NULL OR
2315: p_cust_account_id = FND_API.G_MISS_NUM THEN
2316: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2317: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
2318: FND_MSG_PUB.ADD;
2319: RAISE FND_API.G_EXC_ERROR;
2320: END IF;
2321:
2540:
2541: WHEN OTHERS THEN
2542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2543:
2544: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2545: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2546: FND_MSG_PUB.ADD;
2547:
2548: FND_MSG_PUB.Count_And_Get(
2541: WHEN OTHERS THEN
2542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2543:
2544: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2545: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2546: FND_MSG_PUB.ADD;
2547:
2548: FND_MSG_PUB.Count_And_Get(
2549: p_encoded => FND_API.G_FALSE,
2783: WHEN OTHERS THEN
2784: ROLLBACK TO create_cust_acct_relate;
2785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2786:
2787: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2788: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2789: FND_MSG_PUB.ADD;
2790:
2791: FND_MSG_PUB.Count_And_Get(
2784: ROLLBACK TO create_cust_acct_relate;
2785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2786:
2787: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2788: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2789: FND_MSG_PUB.ADD;
2790:
2791: FND_MSG_PUB.Count_And_Get(
2792: p_encoded => FND_API.G_FALSE,
3005: WHEN OTHERS THEN
3006: ROLLBACK TO update_cust_acct_relate;
3007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3008:
3009: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3010: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3011: FND_MSG_PUB.ADD;
3012:
3013: FND_MSG_PUB.Count_And_Get(
3006: ROLLBACK TO update_cust_acct_relate;
3007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3008:
3009: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3010: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3011: FND_MSG_PUB.ADD;
3012:
3013: FND_MSG_PUB.Count_And_Get(
3014: p_encoded => FND_API.G_FALSE,
3232: WHEN OTHERS THEN
3233: ROLLBACK TO update_cust_acct_relate;
3234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3235:
3236: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3237: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3238: FND_MSG_PUB.ADD;
3239:
3240: FND_MSG_PUB.Count_And_Get(
3233: ROLLBACK TO update_cust_acct_relate;
3234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3235:
3236: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3237: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3238: FND_MSG_PUB.ADD;
3239:
3240: FND_MSG_PUB.Count_And_Get(
3241: p_encoded => FND_API.G_FALSE,
3336:
3337: -- Check whether primary key has been passed in.
3338: IF p_cust_account_id IS NULL OR
3339: p_cust_account_id = FND_API.G_MISS_NUM THEN
3340: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3341: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
3342: FND_MSG_PUB.ADD;
3343: RAISE FND_API.G_EXC_ERROR;
3344: END IF;
3337: -- Check whether primary key has been passed in.
3338: IF p_cust_account_id IS NULL OR
3339: p_cust_account_id = FND_API.G_MISS_NUM THEN
3340: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3341: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'cust_account_id' );
3342: FND_MSG_PUB.ADD;
3343: RAISE FND_API.G_EXC_ERROR;
3344: END IF;
3345:
3344: END IF;
3345:
3346: IF p_related_cust_account_id IS NULL OR
3347: p_related_cust_account_id = FND_API.G_MISS_NUM THEN
3348: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3349: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'related_cust_account_id' );
3350: FND_MSG_PUB.ADD;
3351: RAISE FND_API.G_EXC_ERROR;
3352: END IF;
3345:
3346: IF p_related_cust_account_id IS NULL OR
3347: p_related_cust_account_id = FND_API.G_MISS_NUM THEN
3348: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3349: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'related_cust_account_id' );
3350: FND_MSG_PUB.ADD;
3351: RAISE FND_API.G_EXC_ERROR;
3352: END IF;
3353: END IF;
3516:
3517: WHEN OTHERS THEN
3518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3519:
3520: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3521: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3522: FND_MSG_PUB.ADD;
3523:
3524: FND_MSG_PUB.Count_And_Get(
3517: WHEN OTHERS THEN
3518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3519:
3520: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3521: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3522: FND_MSG_PUB.ADD;
3523:
3524: FND_MSG_PUB.Count_And_Get(
3525: p_encoded => FND_API.G_FALSE,
3577: (p_create_update_flag = 'U' AND
3578: p_cust_account_rec.account_activation_date IS NOT NULL AND
3579: p_cust_account_rec.account_activation_date <> p_old_cust_account_rec.account_activation_date)
3580: THEN
3581: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3582: FND_MESSAGE.SET_TOKEN('COLUMN', 'account_activation_date');
3583: FND_MSG_PUB.ADD;
3584: x_return_status := FND_API.G_RET_STS_ERROR;
3585: END IF;
3578: p_cust_account_rec.account_activation_date IS NOT NULL AND
3579: p_cust_account_rec.account_activation_date <> p_old_cust_account_rec.account_activation_date)
3580: THEN
3581: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3582: FND_MESSAGE.SET_TOKEN('COLUMN', 'account_activation_date');
3583: FND_MSG_PUB.ADD;
3584: x_return_status := FND_API.G_RET_STS_ERROR;
3585: END IF;
3586:
3591: (p_create_update_flag = 'U' AND
3592: p_cust_account_rec.account_liable_flag IS NOT NULL AND
3593: p_cust_account_rec.account_liable_flag <> p_old_cust_account_rec.account_liable_flag)
3594: THEN
3595: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3596: FND_MESSAGE.SET_TOKEN('COLUMN', 'account_liable_flag');
3597: FND_MSG_PUB.ADD;
3598: x_return_status := FND_API.G_RET_STS_ERROR;
3599: END IF;
3592: p_cust_account_rec.account_liable_flag IS NOT NULL AND
3593: p_cust_account_rec.account_liable_flag <> p_old_cust_account_rec.account_liable_flag)
3594: THEN
3595: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3596: FND_MESSAGE.SET_TOKEN('COLUMN', 'account_liable_flag');
3597: FND_MSG_PUB.ADD;
3598: x_return_status := FND_API.G_RET_STS_ERROR;
3599: END IF;
3600:
3605: (p_create_update_flag = 'U' AND
3606: p_cust_account_rec.account_termination_date IS NOT NULL AND
3607: p_cust_account_rec.account_termination_date <> p_old_cust_account_rec.account_termination_date)
3608: THEN
3609: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3610: FND_MESSAGE.SET_TOKEN('COLUMN', 'account_termination_date');
3611: FND_MSG_PUB.ADD;
3612: x_return_status := FND_API.G_RET_STS_ERROR;
3613: END IF;
3606: p_cust_account_rec.account_termination_date IS NOT NULL AND
3607: p_cust_account_rec.account_termination_date <> p_old_cust_account_rec.account_termination_date)
3608: THEN
3609: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3610: FND_MESSAGE.SET_TOKEN('COLUMN', 'account_termination_date');
3611: FND_MSG_PUB.ADD;
3612: x_return_status := FND_API.G_RET_STS_ERROR;
3613: END IF;
3614:
3619: (p_create_update_flag = 'U' AND
3620: p_cust_account_rec.acct_life_cycle_status IS NOT NULL AND
3621: p_cust_account_rec.acct_life_cycle_status <> p_old_cust_account_rec.acct_life_cycle_status)
3622: THEN
3623: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3624: FND_MESSAGE.SET_TOKEN('COLUMN', 'acct_life_cycle_status');
3625: FND_MSG_PUB.ADD;
3626: x_return_status := FND_API.G_RET_STS_ERROR;
3627: END IF;
3620: p_cust_account_rec.acct_life_cycle_status IS NOT NULL AND
3621: p_cust_account_rec.acct_life_cycle_status <> p_old_cust_account_rec.acct_life_cycle_status)
3622: THEN
3623: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3624: FND_MESSAGE.SET_TOKEN('COLUMN', 'acct_life_cycle_status');
3625: FND_MSG_PUB.ADD;
3626: x_return_status := FND_API.G_RET_STS_ERROR;
3627: END IF;
3628:
3633: (p_create_update_flag = 'U' AND
3634: p_cust_account_rec.current_balance IS NOT NULL AND
3635: p_cust_account_rec.current_balance <> p_old_cust_account_rec.current_balance)
3636: THEN
3637: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3638: FND_MESSAGE.SET_TOKEN('COLUMN', 'current_balance');
3639: FND_MSG_PUB.ADD;
3640: x_return_status := FND_API.G_RET_STS_ERROR;
3641: END IF;
3634: p_cust_account_rec.current_balance IS NOT NULL AND
3635: p_cust_account_rec.current_balance <> p_old_cust_account_rec.current_balance)
3636: THEN
3637: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3638: FND_MESSAGE.SET_TOKEN('COLUMN', 'current_balance');
3639: FND_MSG_PUB.ADD;
3640: x_return_status := FND_API.G_RET_STS_ERROR;
3641: END IF;
3642:
3647: (p_create_update_flag = 'U' AND
3648: p_cust_account_rec.department IS NOT NULL AND
3649: p_cust_account_rec.department <> p_old_cust_account_rec.department)
3650: THEN
3651: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3652: FND_MESSAGE.SET_TOKEN('COLUMN', 'department');
3653: FND_MSG_PUB.ADD;
3654: x_return_status := FND_API.G_RET_STS_ERROR;
3655: END IF;
3648: p_cust_account_rec.department IS NOT NULL AND
3649: p_cust_account_rec.department <> p_old_cust_account_rec.department)
3650: THEN
3651: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3652: FND_MESSAGE.SET_TOKEN('COLUMN', 'department');
3653: FND_MSG_PUB.ADD;
3654: x_return_status := FND_API.G_RET_STS_ERROR;
3655: END IF;
3656:
3661: (p_create_update_flag = 'U' AND
3662: p_cust_account_rec.dormant_account_flag IS NOT NULL AND
3663: p_cust_account_rec.dormant_account_flag <> p_old_cust_account_rec.dormant_account_flag)
3664: THEN
3665: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3666: FND_MESSAGE.SET_TOKEN('COLUMN', 'dormant_account_flag');
3667: FND_MSG_PUB.ADD;
3668: x_return_status := FND_API.G_RET_STS_ERROR;
3669: END IF;
3662: p_cust_account_rec.dormant_account_flag IS NOT NULL AND
3663: p_cust_account_rec.dormant_account_flag <> p_old_cust_account_rec.dormant_account_flag)
3664: THEN
3665: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3666: FND_MESSAGE.SET_TOKEN('COLUMN', 'dormant_account_flag');
3667: FND_MSG_PUB.ADD;
3668: x_return_status := FND_API.G_RET_STS_ERROR;
3669: END IF;
3670:
3675: (p_create_update_flag = 'U' AND
3676: p_cust_account_rec.notify_flag IS NOT NULL AND
3677: p_cust_account_rec.notify_flag <> p_old_cust_account_rec.notify_flag)
3678: THEN
3679: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3680: FND_MESSAGE.SET_TOKEN('COLUMN', 'notify_flag');
3681: FND_MSG_PUB.ADD;
3682: x_return_status := FND_API.G_RET_STS_ERROR;
3683: END IF;
3676: p_cust_account_rec.notify_flag IS NOT NULL AND
3677: p_cust_account_rec.notify_flag <> p_old_cust_account_rec.notify_flag)
3678: THEN
3679: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3680: FND_MESSAGE.SET_TOKEN('COLUMN', 'notify_flag');
3681: FND_MSG_PUB.ADD;
3682: x_return_status := FND_API.G_RET_STS_ERROR;
3683: END IF;
3684:
3689: (p_create_update_flag = 'U' AND
3690: p_cust_account_rec.order_type_id IS NOT NULL AND
3691: p_cust_account_rec.order_type_id <> p_old_cust_account_rec.order_type_id)
3692: THEN
3693: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3694: FND_MESSAGE.SET_TOKEN('COLUMN', 'order_type_id');
3695: FND_MSG_PUB.ADD;
3696: x_return_status := FND_API.G_RET_STS_ERROR;
3697: END IF;
3690: p_cust_account_rec.order_type_id IS NOT NULL AND
3691: p_cust_account_rec.order_type_id <> p_old_cust_account_rec.order_type_id)
3692: THEN
3693: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3694: FND_MESSAGE.SET_TOKEN('COLUMN', 'order_type_id');
3695: FND_MSG_PUB.ADD;
3696: x_return_status := FND_API.G_RET_STS_ERROR;
3697: END IF;
3698:
3703: (p_create_update_flag = 'U' AND
3704: p_cust_account_rec.primary_salesrep_id IS NOT NULL AND
3705: p_cust_account_rec.primary_salesrep_id <> p_old_cust_account_rec.primary_salesrep_id)
3706: THEN
3707: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3708: FND_MESSAGE.SET_TOKEN('COLUMN', 'primary_salesrep_id');
3709: FND_MSG_PUB.ADD;
3710: x_return_status := FND_API.G_RET_STS_ERROR;
3711: END IF;
3704: p_cust_account_rec.primary_salesrep_id IS NOT NULL AND
3705: p_cust_account_rec.primary_salesrep_id <> p_old_cust_account_rec.primary_salesrep_id)
3706: THEN
3707: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3708: FND_MESSAGE.SET_TOKEN('COLUMN', 'primary_salesrep_id');
3709: FND_MSG_PUB.ADD;
3710: x_return_status := FND_API.G_RET_STS_ERROR;
3711: END IF;
3712:
3717: (p_create_update_flag = 'U' AND
3718: p_cust_account_rec.realtime_rate_flag IS NOT NULL AND
3719: p_cust_account_rec.realtime_rate_flag <> p_old_cust_account_rec.realtime_rate_flag)
3720: THEN
3721: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3722: FND_MESSAGE.SET_TOKEN('COLUMN', 'realtime_rate_flag');
3723: FND_MSG_PUB.ADD;
3724: x_return_status := FND_API.G_RET_STS_ERROR;
3725: END IF;
3718: p_cust_account_rec.realtime_rate_flag IS NOT NULL AND
3719: p_cust_account_rec.realtime_rate_flag <> p_old_cust_account_rec.realtime_rate_flag)
3720: THEN
3721: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3722: FND_MESSAGE.SET_TOKEN('COLUMN', 'realtime_rate_flag');
3723: FND_MSG_PUB.ADD;
3724: x_return_status := FND_API.G_RET_STS_ERROR;
3725: END IF;
3726:
3731: (p_create_update_flag = 'U' AND
3732: p_cust_account_rec.suspension_date IS NOT NULL AND
3733: p_cust_account_rec.suspension_date <> p_old_cust_account_rec.suspension_date)
3734: THEN
3735: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3736: FND_MESSAGE.SET_TOKEN('COLUMN', 'suspension_date');
3737: FND_MSG_PUB.ADD;
3738: x_return_status := FND_API.G_RET_STS_ERROR;
3739: END IF;
3732: p_cust_account_rec.suspension_date IS NOT NULL AND
3733: p_cust_account_rec.suspension_date <> p_old_cust_account_rec.suspension_date)
3734: THEN
3735: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3736: FND_MESSAGE.SET_TOKEN('COLUMN', 'suspension_date');
3737: FND_MSG_PUB.ADD;
3738: x_return_status := FND_API.G_RET_STS_ERROR;
3739: END IF;
3740:
3746: (p_create_update_flag = 'U' AND
3747: p_cust_account_rec.tax_code IS NOT NULL AND
3748: p_cust_account_rec.tax_code <> p_old_cust_account_rec.tax_code)
3749: THEN
3750: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3751: FND_MESSAGE.SET_TOKEN('COLUMN', 'tax_code');
3752: FND_MSG_PUB.ADD;
3753: x_return_status := FND_API.G_RET_STS_ERROR;
3754: END IF;
3747: p_cust_account_rec.tax_code IS NOT NULL AND
3748: p_cust_account_rec.tax_code <> p_old_cust_account_rec.tax_code)
3749: THEN
3750: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
3751: FND_MESSAGE.SET_TOKEN('COLUMN', 'tax_code');
3752: FND_MSG_PUB.ADD;
3753: x_return_status := FND_API.G_RET_STS_ERROR;
3754: END IF;
3755: */