203: INTO l_dummy
204: FROM HZ_ORG_CONTACTS
205: WHERE ORG_CONTACT_ID = l_org_contact_id;
206:
207: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
208: FND_MESSAGE.SET_TOKEN('COLUMN', 'org_contact_id');
209: FND_MSG_PUB.ADD;
210: RAISE FND_API.G_EXC_ERROR;
211:
204: FROM HZ_ORG_CONTACTS
205: WHERE ORG_CONTACT_ID = l_org_contact_id;
206:
207: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
208: FND_MESSAGE.SET_TOKEN('COLUMN', 'org_contact_id');
209: FND_MSG_PUB.ADD;
210: RAISE FND_API.G_EXC_ERROR;
211:
212: EXCEPTION
263: THEN
264: OPEN c_rel;
265: FETCH c_rel INTO p_org_contact_rec.party_rel_rec.relationship_code;
266: IF c_rel%NOTFOUND THEN
267: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_FK');
268: FND_MESSAGE.SET_TOKEN('FK', 'relationship_code, subject_type, object_type');
269: FND_MESSAGE.SET_TOKEN('COLUMN', 'forward_rel_code, subject_type, object_type');
270: FND_MESSAGE.SET_TOKEN('TABLE', 'hz_relationship_types');
271: FND_MSG_PUB.ADD;
264: OPEN c_rel;
265: FETCH c_rel INTO p_org_contact_rec.party_rel_rec.relationship_code;
266: IF c_rel%NOTFOUND THEN
267: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_FK');
268: FND_MESSAGE.SET_TOKEN('FK', 'relationship_code, subject_type, object_type');
269: FND_MESSAGE.SET_TOKEN('COLUMN', 'forward_rel_code, subject_type, object_type');
270: FND_MESSAGE.SET_TOKEN('TABLE', 'hz_relationship_types');
271: FND_MSG_PUB.ADD;
272: RAISE FND_API.G_EXC_ERROR;
265: FETCH c_rel INTO p_org_contact_rec.party_rel_rec.relationship_code;
266: IF c_rel%NOTFOUND THEN
267: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_FK');
268: FND_MESSAGE.SET_TOKEN('FK', 'relationship_code, subject_type, object_type');
269: FND_MESSAGE.SET_TOKEN('COLUMN', 'forward_rel_code, subject_type, object_type');
270: FND_MESSAGE.SET_TOKEN('TABLE', 'hz_relationship_types');
271: FND_MSG_PUB.ADD;
272: RAISE FND_API.G_EXC_ERROR;
273: END IF;
266: IF c_rel%NOTFOUND THEN
267: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_FK');
268: FND_MESSAGE.SET_TOKEN('FK', 'relationship_code, subject_type, object_type');
269: FND_MESSAGE.SET_TOKEN('COLUMN', 'forward_rel_code, subject_type, object_type');
270: FND_MESSAGE.SET_TOKEN('TABLE', 'hz_relationship_types');
271: FND_MSG_PUB.ADD;
272: RAISE FND_API.G_EXC_ERROR;
273: END IF;
274: CLOSE c_rel;
293: AND party_type = 'PERSON'
294: FOR UPDATE NOWAIT;
295: EXCEPTION
296: WHEN OTHERS THEN
297: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
298: fnd_message.set_token('TABLE', 'HZ_PARTIES');
299: fnd_msg_pub.add;
300: RAISE FND_API.G_EXC_ERROR;
301: END;
294: FOR UPDATE NOWAIT;
295: EXCEPTION
296: WHEN OTHERS THEN
297: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
298: fnd_message.set_token('TABLE', 'HZ_PARTIES');
299: fnd_msg_pub.add;
300: RAISE FND_API.G_EXC_ERROR;
301: END;
302: IF l_person_pre_name IS NULL THEN
314: AND effective_end_date IS NULL
315: FOR UPDATE NOWAIT;
316: EXCEPTION
317: WHEN OTHERS THEN
318: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
319: fnd_message.set_token('TABLE', 'HZ_PERSON_PROFILES');
320: fnd_msg_pub.add;
321: RAISE FND_API.G_EXC_ERROR;
322: END;
315: FOR UPDATE NOWAIT;
316: EXCEPTION
317: WHEN OTHERS THEN
318: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
319: fnd_message.set_token('TABLE', 'HZ_PERSON_PROFILES');
320: fnd_msg_pub.add;
321: RAISE FND_API.G_EXC_ERROR;
322: END;
323: UPDATE hz_person_profiles
526: ( p_cont_object_version_number IS NOT NULL AND
527: l_object_version_number IS NOT NULL AND
528: p_cont_object_version_number = l_object_version_number ) )
529: THEN
530: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
531: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_org_contacts' );
532: FND_MSG_PUB.ADD;
533: RAISE FND_API.G_EXC_ERROR;
534: END IF;
527: l_object_version_number IS NOT NULL AND
528: p_cont_object_version_number = l_object_version_number ) )
529: THEN
530: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
531: FND_MESSAGE.SET_TOKEN( 'TABLE', 'hz_org_contacts' );
532: FND_MSG_PUB.ADD;
533: RAISE FND_API.G_EXC_ERROR;
534: END IF;
535:
536: p_cont_object_version_number := NVL( l_object_version_number, 1 ) + 1;
537:
538: EXCEPTION
539: WHEN NO_DATA_FOUND THEN
540: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
541: FND_MESSAGE.SET_TOKEN( 'RECORD', 'org contact' );
542: FND_MESSAGE.SET_TOKEN( 'VALUE',
543: NVL( TO_CHAR( p_org_contact_rec.org_contact_id ), 'null' ) );
544: FND_MSG_PUB.ADD;
537:
538: EXCEPTION
539: WHEN NO_DATA_FOUND THEN
540: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
541: FND_MESSAGE.SET_TOKEN( 'RECORD', 'org contact' );
542: FND_MESSAGE.SET_TOKEN( 'VALUE',
543: NVL( TO_CHAR( p_org_contact_rec.org_contact_id ), 'null' ) );
544: FND_MSG_PUB.ADD;
545: RAISE FND_API.G_EXC_ERROR;
538: EXCEPTION
539: WHEN NO_DATA_FOUND THEN
540: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
541: FND_MESSAGE.SET_TOKEN( 'RECORD', 'org contact' );
542: FND_MESSAGE.SET_TOKEN( 'VALUE',
543: NVL( TO_CHAR( p_org_contact_rec.org_contact_id ), 'null' ) );
544: FND_MSG_PUB.ADD;
545: RAISE FND_API.G_EXC_ERROR;
546: END;
563:
564:
565: EXCEPTION
566: WHEN NO_DATA_FOUND THEN
567: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
568: FND_MESSAGE.SET_TOKEN( 'RECORD', 'party relationship' );
569: FND_MESSAGE.SET_TOKEN( 'VALUE',
570: NVL( TO_CHAR( p_org_contact_rec.party_rel_rec.relationship_id ), 'null' ) );
571: FND_MSG_PUB.ADD;
564:
565: EXCEPTION
566: WHEN NO_DATA_FOUND THEN
567: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
568: FND_MESSAGE.SET_TOKEN( 'RECORD', 'party relationship' );
569: FND_MESSAGE.SET_TOKEN( 'VALUE',
570: NVL( TO_CHAR( p_org_contact_rec.party_rel_rec.relationship_id ), 'null' ) );
571: FND_MSG_PUB.ADD;
572: RAISE FND_API.G_EXC_ERROR;
565: EXCEPTION
566: WHEN NO_DATA_FOUND THEN
567: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
568: FND_MESSAGE.SET_TOKEN( 'RECORD', 'party relationship' );
569: FND_MESSAGE.SET_TOKEN( 'VALUE',
570: NVL( TO_CHAR( p_org_contact_rec.party_rel_rec.relationship_id ), 'null' ) );
571: FND_MSG_PUB.ADD;
572: RAISE FND_API.G_EXC_ERROR;
573: END;
731: AND DIRECTIONAL_FLAG = 'F';
732:
733: EXCEPTION
734: WHEN NO_DATA_FOUND THEN
735: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
736: FND_MESSAGE.SET_TOKEN( 'RECORD', 'party relationship' );
737: FND_MESSAGE.SET_TOKEN( 'VALUE', NVL( TO_CHAR( p_org_contact_rec.party_rel_rec.relationship_id ), 'null' ) );
738: FND_MSG_PUB.ADD;
739: RAISE FND_API.G_EXC_ERROR;
732:
733: EXCEPTION
734: WHEN NO_DATA_FOUND THEN
735: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
736: FND_MESSAGE.SET_TOKEN( 'RECORD', 'party relationship' );
737: FND_MESSAGE.SET_TOKEN( 'VALUE', NVL( TO_CHAR( p_org_contact_rec.party_rel_rec.relationship_id ), 'null' ) );
738: FND_MSG_PUB.ADD;
739: RAISE FND_API.G_EXC_ERROR;
740: END;
733: EXCEPTION
734: WHEN NO_DATA_FOUND THEN
735: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NO_RECORD' );
736: FND_MESSAGE.SET_TOKEN( 'RECORD', 'party relationship' );
737: FND_MESSAGE.SET_TOKEN( 'VALUE', NVL( TO_CHAR( p_org_contact_rec.party_rel_rec.relationship_id ), 'null' ) );
738: FND_MSG_PUB.ADD;
739: RAISE FND_API.G_EXC_ERROR;
740: END;
741:
826: INTO l_dummy
827: FROM HZ_ORG_CONTACT_ROLES
828: WHERE ORG_CONTACT_ROLE_ID = l_org_contact_role_id;
829:
830: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
831: FND_MESSAGE.SET_TOKEN('COLUMN', 'org_contact_role_id');
832: FND_MSG_PUB.ADD;
833: RAISE FND_API.G_EXC_ERROR;
834:
827: FROM HZ_ORG_CONTACT_ROLES
828: WHERE ORG_CONTACT_ROLE_ID = l_org_contact_role_id;
829:
830: FND_MESSAGE.SET_NAME('AR', 'HZ_API_DUPLICATE_COLUMN');
831: FND_MESSAGE.SET_TOKEN('COLUMN', 'org_contact_role_id');
832: FND_MSG_PUB.ADD;
833: RAISE FND_API.G_EXC_ERROR;
834:
835: EXCEPTION
1028: ( p_object_version_number IS NOT NULL AND
1029: l_object_version_number IS NOT NULL AND
1030: p_object_version_number = l_object_version_number ) )
1031: THEN
1032: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1033: FND_MESSAGE.SET_TOKEN('TABLE', 'hz_org_contact_roles');
1034: FND_MSG_PUB.ADD;
1035: RAISE FND_API.G_EXC_ERROR;
1036: END IF;
1029: l_object_version_number IS NOT NULL AND
1030: p_object_version_number = l_object_version_number ) )
1031: THEN
1032: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1033: FND_MESSAGE.SET_TOKEN('TABLE', 'hz_org_contact_roles');
1034: FND_MSG_PUB.ADD;
1035: RAISE FND_API.G_EXC_ERROR;
1036: END IF;
1037:
1037:
1038: p_object_version_number := nvl(l_object_version_number, 1) + 1;
1039:
1040: EXCEPTION WHEN NO_DATA_FOUND THEN
1041: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
1042: FND_MESSAGE.SET_TOKEN('RECORD', 'contact role');
1043: FND_MESSAGE.SET_TOKEN('VALUE', NVL( TO_CHAR(p_org_contact_role_rec.org_contact_role_id ), 'null' ) );
1044: FND_MSG_PUB.ADD;
1045: RAISE FND_API.G_EXC_ERROR;
1038: p_object_version_number := nvl(l_object_version_number, 1) + 1;
1039:
1040: EXCEPTION WHEN NO_DATA_FOUND THEN
1041: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
1042: FND_MESSAGE.SET_TOKEN('RECORD', 'contact role');
1043: FND_MESSAGE.SET_TOKEN('VALUE', NVL( TO_CHAR(p_org_contact_role_rec.org_contact_role_id ), 'null' ) );
1044: FND_MSG_PUB.ADD;
1045: RAISE FND_API.G_EXC_ERROR;
1046: END;
1039:
1040: EXCEPTION WHEN NO_DATA_FOUND THEN
1041: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
1042: FND_MESSAGE.SET_TOKEN('RECORD', 'contact role');
1043: FND_MESSAGE.SET_TOKEN('VALUE', NVL( TO_CHAR(p_org_contact_role_rec.org_contact_role_id ), 'null' ) );
1044: FND_MSG_PUB.ADD;
1045: RAISE FND_API.G_EXC_ERROR;
1046: END;
1047:
1303:
1304: WHEN OTHERS THEN
1305: ROLLBACK TO create_org_contact;
1306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1307: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1308: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1309: FND_MSG_PUB.ADD;
1310: FND_MSG_PUB.Count_And_Get(
1311: p_encoded => FND_API.G_FALSE,
1304: WHEN OTHERS THEN
1305: ROLLBACK TO create_org_contact;
1306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1307: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1308: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1309: FND_MSG_PUB.ADD;
1310: FND_MSG_PUB.Count_And_Get(
1311: p_encoded => FND_API.G_FALSE,
1312: p_count => x_msg_count,
1550:
1551: WHEN OTHERS THEN
1552: ROLLBACK TO update_org_contact;
1553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1554: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1555: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1556: FND_MSG_PUB.ADD;
1557: FND_MSG_PUB.Count_And_Get(
1558: p_encoded => FND_API.G_FALSE,
1551: WHEN OTHERS THEN
1552: ROLLBACK TO update_org_contact;
1553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1554: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1555: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1556: FND_MSG_PUB.ADD;
1557: FND_MSG_PUB.Count_And_Get(
1558: p_encoded => FND_API.G_FALSE,
1559: p_count => x_msg_count,
1738:
1739: WHEN OTHERS THEN
1740: ROLLBACK TO create_org_contact_role;
1741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1742: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1743: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1744: FND_MSG_PUB.ADD;
1745: FND_MSG_PUB.Count_And_Get(
1746: p_encoded => FND_API.G_FALSE,
1739: WHEN OTHERS THEN
1740: ROLLBACK TO create_org_contact_role;
1741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1742: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1743: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1744: FND_MSG_PUB.ADD;
1745: FND_MSG_PUB.Count_And_Get(
1746: p_encoded => FND_API.G_FALSE,
1747: p_count => x_msg_count,
1958:
1959: WHEN OTHERS THEN
1960: ROLLBACK TO update_org_contact_role;
1961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1962: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1963: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1964: FND_MSG_PUB.ADD;
1965: FND_MSG_PUB.Count_And_Get(
1966: p_encoded => FND_API.G_FALSE,
1959: WHEN OTHERS THEN
1960: ROLLBACK TO update_org_contact_role;
1961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1962: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1963: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1964: FND_MSG_PUB.ADD;
1965: FND_MSG_PUB.Count_And_Get(
1966: p_encoded => FND_API.G_FALSE,
1967: p_count => x_msg_count,
2041: x_return_status := FND_API.G_RET_STS_SUCCESS;
2042: --Check whether primary key has been passed in.
2043: IF p_org_contact_id IS NULL OR
2044: p_org_contact_id = FND_API.G_MISS_NUM THEN
2045: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2046: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'org_contact_id' );
2047: FND_MSG_PUB.ADD;
2048: RAISE FND_API.G_EXC_ERROR;
2049: END IF;
2042: --Check whether primary key has been passed in.
2043: IF p_org_contact_id IS NULL OR
2044: p_org_contact_id = FND_API.G_MISS_NUM THEN
2045: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2046: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'org_contact_id' );
2047: FND_MSG_PUB.ADD;
2048: RAISE FND_API.G_EXC_ERROR;
2049: END IF;
2050:
2141: p_data => x_msg_data );
2142:
2143: WHEN OTHERS THEN
2144: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2145: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2146: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2147: FND_MSG_PUB.ADD;
2148: FND_MSG_PUB.Count_And_Get(
2149: p_encoded => FND_API.G_FALSE,
2142:
2143: WHEN OTHERS THEN
2144: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2145: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2146: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2147: FND_MSG_PUB.ADD;
2148: FND_MSG_PUB.Count_And_Get(
2149: p_encoded => FND_API.G_FALSE,
2150: p_count => x_msg_count,
2204:
2205: --Check whether primary key has been passed in.
2206: IF p_org_contact_role_id IS NULL OR
2207: p_org_contact_role_id = FND_API.G_MISS_NUM THEN
2208: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2209: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'org_contact_role_id' );
2210: FND_MSG_PUB.ADD;
2211: RAISE FND_API.G_EXC_ERROR;
2212: END IF;
2205: --Check whether primary key has been passed in.
2206: IF p_org_contact_role_id IS NULL OR
2207: p_org_contact_role_id = FND_API.G_MISS_NUM THEN
2208: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2209: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'org_contact_role_id' );
2210: FND_MSG_PUB.ADD;
2211: RAISE FND_API.G_EXC_ERROR;
2212: END IF;
2213:
2251:
2252: WHEN OTHERS THEN
2253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2254:
2255: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2256: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2257: FND_MSG_PUB.ADD;
2258:
2259: FND_MSG_PUB.Count_And_Get(
2252: WHEN OTHERS THEN
2253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2254:
2255: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2256: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2257: FND_MSG_PUB.ADD;
2258:
2259: FND_MSG_PUB.Count_And_Get(
2260: p_encoded => FND_API.G_FALSE,
2293: (p_create_update_flag = 'U' AND
2294: p_org_contact_rec.title IS NOT NULL AND
2295: p_org_contact_rec.title <> p_old_org_contact_rec.title)
2296: THEN
2297: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
2298: FND_MESSAGE.SET_TOKEN('COLUMN', 'title');
2299: FND_MSG_PUB.ADD;
2300: x_return_status := FND_API.G_RET_STS_ERROR;
2301: END IF;
2294: p_org_contact_rec.title IS NOT NULL AND
2295: p_org_contact_rec.title <> p_old_org_contact_rec.title)
2296: THEN
2297: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');
2298: FND_MESSAGE.SET_TOKEN('COLUMN', 'title');
2299: FND_MSG_PUB.ADD;
2300: x_return_status := FND_API.G_RET_STS_ERROR;
2301: END IF;
2302: