36: Where issuing_authority_site_id = p_from_fk_id
37: for update nowait;
38:
39: BEGIN
40: x_return_status := FND_API.G_RET_STS_SUCCESS;
41:
42: --check the merge reason, if merge reason is 'Duplicate Record' then no validation is performed.
43: --otherwise check if the resource is being used somewhere
44: SELECT merge_reason_code
122: WHEN OTHERS THEN
123: FND_MESSAGE.SET_NAME('XLE','HZ_API_OTHERS_EXCEP');
124: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
125: FND_MSG_PUB.ADD;
126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
127:
128: END merge_registrations;
129:
130:
166: for update nowait;
167:
168: BEGIN
169:
170: x_return_status := FND_API.G_RET_STS_SUCCESS;
171:
172: --check the merge reason, if merge reason is 'Duplicate Record' then no validation is performed.
173: --otherwise check if the resource is being used somewhere
174: SELECT merge_reason_code
251: WHEN OTHERS THEN
252: FND_MESSAGE.SET_NAME('XLE','HZ_API_OTHERS_EXCEP');
253: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
254: FND_MSG_PUB.ADD;
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
256:
257:
258: END merge_reg_functions;
259:
284: -- always veto legal entity merge
285:
286: fnd_message.set_name('XLE','XLE_LEGAL_ENTITY_VETO_MERGE');
287: fnd_msg_pub.ADD;
288: x_return_status := fnd_api.g_ret_sts_error ;
289:
290: EXCEPTION
291: WHEN OTHERS THEN
292: FND_MESSAGE.SET_NAME('XLE','HZ_API_OTHERS_EXCEP');
291: WHEN OTHERS THEN
292: FND_MESSAGE.SET_NAME('XLE','HZ_API_OTHERS_EXCEP');
293: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
294: FND_MSG_PUB.ADD;
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: END merge_legal_entities;
297:
298: --========================================================================
299: -- PROCEDURE : merge_establishments Called by HZ Party merge routine
321: -- always veto establishments merge
322:
323: fnd_message.set_name('XLE','XLE_ESTABLISHMENT_VETO_MERGE');
324: fnd_msg_pub.ADD;
325: x_return_status := fnd_api.g_ret_sts_error ;
326:
327: EXCEPTION
328: WHEN OTHERS THEN
329: FND_MESSAGE.SET_NAME('XLE','HZ_API_OTHERS_EXCEP');
328: WHEN OTHERS THEN
329: FND_MESSAGE.SET_NAME('XLE','HZ_API_OTHERS_EXCEP');
330: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
331: FND_MSG_PUB.ADD;
332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
333: END merge_establishments;
334:
335:
336: