eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.HZ_ORIG_SYSTEM_REF_PVT dependencies on FND_API

Line 137: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

133:
134:
135:
136: PROCEDURE get_orig_sys_reference_rec (
137: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
138: p_orig_system_ref_id in number,
139: x_orig_sys_reference_rec OUT NOCOPY HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
140: x_return_status OUT NOCOPY VARCHAR2,
141: x_msg_count OUT NOCOPY NUMBER,

Line 149: IF FND_API.To_Boolean(p_init_msg_list) THEN

145: l_orig_system_ref_id number := p_orig_system_ref_id;
146: BEGIN
147:
148: --Initialize message list if p_init_msg_list is set to TRUE.
149: IF FND_API.To_Boolean(p_init_msg_list) THEN
150: FND_MSG_PUB.initialize;
151: END IF;
152:
153: --Initialize API return status to success.

Line 154: x_return_status := FND_API.G_RET_STS_SUCCESS;

150: FND_MSG_PUB.initialize;
151: END IF;
152:
153: --Initialize API return status to success.
154: x_return_status := FND_API.G_RET_STS_SUCCESS;
155:
156: --Check whether primary key has been passed in.
157: IF (p_orig_system_ref_id IS NULL OR
158: p_orig_system_ref_id = FND_API.G_MISS_NUM)

Line 158: p_orig_system_ref_id = FND_API.G_MISS_NUM)

154: x_return_status := FND_API.G_RET_STS_SUCCESS;
155:
156: --Check whether primary key has been passed in.
157: IF (p_orig_system_ref_id IS NULL OR
158: p_orig_system_ref_id = FND_API.G_MISS_NUM)
159: THEN
160: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
161: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system_ref_id');
162: FND_MSG_PUB.ADD;

Line 163: RAISE FND_API.G_EXC_ERROR;

159: THEN
160: FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
161: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system_ref_id');
162: FND_MSG_PUB.ADD;
163: RAISE FND_API.G_EXC_ERROR;
164: END IF;
165:
166: HZ_ORIG_SYSTEM_REF_PKG.Select_Row (
167: x_orig_system_ref_id => l_orig_system_ref_id,

Line 208: p_encoded => FND_API.G_FALSE,

204: x_orig_sys_reference_rec.orig_system_ref_id := l_orig_system_ref_id;
205:
206: --Standard call to get message count and if count is 1, get message info.
207: FND_MSG_PUB.Count_And_Get(
208: p_encoded => FND_API.G_FALSE,
209: p_count => x_msg_count,
210: p_data => x_msg_data );
211:
212: EXCEPTION

Line 213: WHEN FND_API.G_EXC_ERROR THEN

209: p_count => x_msg_count,
210: p_data => x_msg_data );
211:
212: EXCEPTION
213: WHEN FND_API.G_EXC_ERROR THEN
214: x_return_status := FND_API.G_RET_STS_ERROR;
215:
216: FND_MSG_PUB.Count_And_Get(
217: p_encoded => FND_API.G_FALSE,

Line 214: x_return_status := FND_API.G_RET_STS_ERROR;

210: p_data => x_msg_data );
211:
212: EXCEPTION
213: WHEN FND_API.G_EXC_ERROR THEN
214: x_return_status := FND_API.G_RET_STS_ERROR;
215:
216: FND_MSG_PUB.Count_And_Get(
217: p_encoded => FND_API.G_FALSE,
218: p_count => x_msg_count,

Line 217: p_encoded => FND_API.G_FALSE,

213: WHEN FND_API.G_EXC_ERROR THEN
214: x_return_status := FND_API.G_RET_STS_ERROR;
215:
216: FND_MSG_PUB.Count_And_Get(
217: p_encoded => FND_API.G_FALSE,
218: p_count => x_msg_count,
219: p_data => x_msg_data );
220:
221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

217: p_encoded => FND_API.G_FALSE,
218: p_count => x_msg_count,
219: p_data => x_msg_data );
220:
221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
223:
224: FND_MSG_PUB.Count_And_Get(
225: p_encoded => FND_API.G_FALSE,

Line 222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

218: p_count => x_msg_count,
219: p_data => x_msg_data );
220:
221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
223:
224: FND_MSG_PUB.Count_And_Get(
225: p_encoded => FND_API.G_FALSE,
226: p_count => x_msg_count,

Line 225: p_encoded => FND_API.G_FALSE,

221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
223:
224: FND_MSG_PUB.Count_And_Get(
225: p_encoded => FND_API.G_FALSE,
226: p_count => x_msg_count,
227: p_data => x_msg_data );
228:
229: WHEN OTHERS THEN

Line 230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

226: p_count => x_msg_count,
227: p_data => x_msg_data );
228:
229: WHEN OTHERS THEN
230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231:
232: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
233: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
234: FND_MSG_PUB.ADD;

Line 237: p_encoded => FND_API.G_FALSE,

233: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
234: FND_MSG_PUB.ADD;
235:
236: FND_MSG_PUB.Count_And_Get(
237: p_encoded => FND_API.G_FALSE,
238: p_count => x_msg_count,
239: p_data => x_msg_data );
240:
241: END get_orig_sys_reference_rec;

Line 246: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

242:
243:
244: PROCEDURE do_create_orig_sys_entity_map(
245: p_orig_sys_entity_map_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_ENTITY_MAP_REC_TYPE,
246: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
247: x_return_status IN OUT NOCOPY VARCHAR2
248: ) is
249: begin
250:

Line 252: x_return_status := FND_API.G_RET_STS_SUCCESS;

248: ) is
249: begin
250:
251: --Initialize API return status to success.
252: x_return_status := FND_API.G_RET_STS_SUCCESS;
253:
254: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
255: then
256: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_ENTITY_MAP ('C',

Line 254: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

250:
251: --Initialize API return status to success.
252: x_return_status := FND_API.G_RET_STS_SUCCESS;
253:
254: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
255: then
256: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_ENTITY_MAP ('C',
257: p_orig_sys_entity_map_rec,
258: x_return_status);

Line 259: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

255: then
256: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_ENTITY_MAP ('C',
257: p_orig_sys_entity_map_rec,
258: x_return_status);
259: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
260: RAISE FND_API.G_EXC_ERROR;
261: END IF;
262: end if;
263:

Line 260: RAISE FND_API.G_EXC_ERROR;

256: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_ENTITY_MAP ('C',
257: p_orig_sys_entity_map_rec,
258: x_return_status);
259: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
260: RAISE FND_API.G_EXC_ERROR;
261: END IF;
262: end if;
263:
264: HZ_ORIG_SYS_ENTITY_MAP_PKG.Insert_Row (

Line 300: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

296: end do_create_orig_sys_entity_map;
297:
298: PROCEDURE do_update_orig_sys_entity_map(
299: p_orig_sys_entity_map_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_ENTITY_MAP_REC_TYPE,
300: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
301: p_object_version_number IN OUT NOCOPY NUMBER,
302: x_return_status IN OUT NOCOPY VARCHAR2
303: ) is
304: l_object_version_number NUMBER;

Line 308: x_return_status := FND_API.G_RET_STS_SUCCESS;

304: l_object_version_number NUMBER;
305: begin
306:
307: --Initialize API return status to success.
308: x_return_status := FND_API.G_RET_STS_SUCCESS;
309:
310: -- check whether record has been updated by another user. If not, lock it.
311: BEGIN
312: SELECT OBJECT_VERSION_NUMBER

Line 326: x_return_status := FND_API.G_RET_STS_ERROR;

322: THEN
323: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
324: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_MAPPING');
325: FND_MSG_PUB.ADD;
326: x_return_status := FND_API.G_RET_STS_ERROR;
327: RAISE FND_API.G_EXC_ERROR;
328: END IF;
329:
330: p_object_version_number := nvl(l_object_version_number, 1) + 1;

Line 327: RAISE FND_API.G_EXC_ERROR;

323: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
324: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_MAPPING');
325: FND_MSG_PUB.ADD;
326: x_return_status := FND_API.G_RET_STS_ERROR;
327: RAISE FND_API.G_EXC_ERROR;
328: END IF;
329:
330: p_object_version_number := nvl(l_object_version_number, 1) + 1;
331:

Line 337: RAISE FND_API.G_EXC_ERROR;

333: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
334: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_ORIG_SYS_MAPPING');
335: FND_MESSAGE.SET_TOKEN('VALUE', p_orig_sys_entity_map_rec.orig_system);
336: FND_MSG_PUB.ADD;
337: RAISE FND_API.G_EXC_ERROR;
338: END;
339: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
340: then
341: -- call for validations.

Line 339: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

335: FND_MESSAGE.SET_TOKEN('VALUE', p_orig_sys_entity_map_rec.orig_system);
336: FND_MSG_PUB.ADD;
337: RAISE FND_API.G_EXC_ERROR;
338: END;
339: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
340: then
341: -- call for validations.
342: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_ENTITY_MAP ('U',
343: p_orig_sys_entity_map_rec,

Line 345: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

341: -- call for validations.
342: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_ENTITY_MAP ('U',
343: p_orig_sys_entity_map_rec,
344: x_return_status);
345: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
346: RAISE FND_API.G_EXC_ERROR;
347: END IF;
348: end if;
349: -- call table handler

Line 346: RAISE FND_API.G_EXC_ERROR;

342: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_ENTITY_MAP ('U',
343: p_orig_sys_entity_map_rec,
344: x_return_status);
345: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
346: RAISE FND_API.G_EXC_ERROR;
347: END IF;
348: end if;
349: -- call table handler
350:

Line 388: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

384: end do_update_orig_sys_entity_map;
385:
386: /* This is private API and should be only called in HTML admin UI */
387: PROCEDURE create_orig_sys_entity_mapping(
388: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
389: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
390: p_orig_sys_entity_map_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_ENTITY_MAP_REC_TYPE,
391: x_return_status OUT NOCOPY VARCHAR2,
392: x_msg_count OUT NOCOPY NUMBER,

Line 389: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

385:
386: /* This is private API and should be only called in HTML admin UI */
387: PROCEDURE create_orig_sys_entity_mapping(
388: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
389: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
390: p_orig_sys_entity_map_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_ENTITY_MAP_REC_TYPE,
391: x_return_status OUT NOCOPY VARCHAR2,
392: x_msg_count OUT NOCOPY NUMBER,
393: x_msg_data OUT NOCOPY VARCHAR2

Line 402: IF FND_API.to_Boolean(p_init_msg_list) THEN

398: -- standard start of API savepoint
399: SAVEPOINT create_orig_sys_entity_mapping;
400:
401: -- initialize message list if p_init_msg_list is set to TRUE.
402: IF FND_API.to_Boolean(p_init_msg_list) THEN
403: FND_MSG_PUB.initialize;
404: END IF;
405:
406: -- initialize API return status to success.

Line 407: x_return_status := FND_API.G_RET_STS_SUCCESS;

403: FND_MSG_PUB.initialize;
404: END IF;
405:
406: -- initialize API return status to success.
407: x_return_status := FND_API.G_RET_STS_SUCCESS;
408:
409: -- call to business logic.
410: do_create_orig_sys_entity_map(
411: l_orig_sys_entity_map_rec,

Line 418: p_encoded => FND_API.G_FALSE,

414:
415:
416: -- standard call to get message count and if count is 1, get message info.
417: FND_MSG_PUB.Count_And_Get(
418: p_encoded => FND_API.G_FALSE,
419: p_count => x_msg_count,
420: p_data => x_msg_data);
421:
422: EXCEPTION

Line 423: WHEN FND_API.G_EXC_ERROR THEN

419: p_count => x_msg_count,
420: p_data => x_msg_data);
421:
422: EXCEPTION
423: WHEN FND_API.G_EXC_ERROR THEN
424: ROLLBACK TO create_orig_sys_entity_mapping;
425: x_return_status := FND_API.G_RET_STS_ERROR;
426: FND_MSG_PUB.Count_And_Get(
427: p_encoded => FND_API.G_FALSE,

Line 425: x_return_status := FND_API.G_RET_STS_ERROR;

421:
422: EXCEPTION
423: WHEN FND_API.G_EXC_ERROR THEN
424: ROLLBACK TO create_orig_sys_entity_mapping;
425: x_return_status := FND_API.G_RET_STS_ERROR;
426: FND_MSG_PUB.Count_And_Get(
427: p_encoded => FND_API.G_FALSE,
428: p_count => x_msg_count,
429: p_data => x_msg_data);

Line 427: p_encoded => FND_API.G_FALSE,

423: WHEN FND_API.G_EXC_ERROR THEN
424: ROLLBACK TO create_orig_sys_entity_mapping;
425: x_return_status := FND_API.G_RET_STS_ERROR;
426: FND_MSG_PUB.Count_And_Get(
427: p_encoded => FND_API.G_FALSE,
428: p_count => x_msg_count,
429: p_data => x_msg_data);
430:
431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

427: p_encoded => FND_API.G_FALSE,
428: p_count => x_msg_count,
429: p_data => x_msg_data);
430:
431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
432: ROLLBACK TO create_orig_sys_entity_mapping;
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
434: FND_MSG_PUB.Count_And_Get(
435: p_encoded => FND_API.G_FALSE,

Line 433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

429: p_data => x_msg_data);
430:
431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
432: ROLLBACK TO create_orig_sys_entity_mapping;
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
434: FND_MSG_PUB.Count_And_Get(
435: p_encoded => FND_API.G_FALSE,
436: p_count => x_msg_count,
437: p_data => x_msg_data);

Line 435: p_encoded => FND_API.G_FALSE,

431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
432: ROLLBACK TO create_orig_sys_entity_mapping;
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
434: FND_MSG_PUB.Count_And_Get(
435: p_encoded => FND_API.G_FALSE,
436: p_count => x_msg_count,
437: p_data => x_msg_data);
438:
439: WHEN OTHERS THEN

Line 441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

437: p_data => x_msg_data);
438:
439: WHEN OTHERS THEN
440: ROLLBACK TO create_orig_sys_entity_mapping;
441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
442: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
443: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
444: FND_MSG_PUB.ADD;
445: FND_MSG_PUB.Count_And_Get(

Line 446: p_encoded => FND_API.G_FALSE,

442: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
443: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
444: FND_MSG_PUB.ADD;
445: FND_MSG_PUB.Count_And_Get(
446: p_encoded => FND_API.G_FALSE,
447: p_count => x_msg_count,
448: p_data => x_msg_data);
449: end create_orig_sys_entity_mapping;
450:

Line 453: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

449: end create_orig_sys_entity_mapping;
450:
451: /* This is private API and should be only called in HTML admin UI */
452: PROCEDURE update_orig_sys_entity_mapping(
453: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
454: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
455: p_orig_sys_entity_map_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_ENTITY_MAP_REC_TYPE,
456: p_object_version_number IN OUT NOCOPY NUMBER,
457: x_return_status OUT NOCOPY VARCHAR2,

Line 454: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

450:
451: /* This is private API and should be only called in HTML admin UI */
452: PROCEDURE update_orig_sys_entity_mapping(
453: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
454: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
455: p_orig_sys_entity_map_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_ENTITY_MAP_REC_TYPE,
456: p_object_version_number IN OUT NOCOPY NUMBER,
457: x_return_status OUT NOCOPY VARCHAR2,
458: x_msg_count OUT NOCOPY NUMBER,

Line 468: IF FND_API.to_Boolean(p_init_msg_list) THEN

464: -- standard start of API savepoint
465: SAVEPOINT update_orig_sys_entity_mapping;
466:
467: -- initialize message list if p_init_msg_list is set to TRUE.
468: IF FND_API.to_Boolean(p_init_msg_list) THEN
469: FND_MSG_PUB.initialize;
470: END IF;
471:
472: -- initialize API return status to success.

Line 473: x_return_status := FND_API.G_RET_STS_SUCCESS;

469: FND_MSG_PUB.initialize;
470: END IF;
471:
472: -- initialize API return status to success.
473: x_return_status := FND_API.G_RET_STS_SUCCESS;
474:
475: -- call to business logic.
476: do_update_orig_sys_entity_map(
477: l_orig_sys_entity_map_rec,

Line 484: p_encoded => FND_API.G_FALSE,

480: x_return_status );
481:
482: -- standard call to get message count and if count is 1, get message info.
483: FND_MSG_PUB.Count_And_Get(
484: p_encoded => FND_API.G_FALSE,
485: p_count => x_msg_count,
486: p_data => x_msg_data);
487:
488: EXCEPTION

Line 489: WHEN FND_API.G_EXC_ERROR THEN

485: p_count => x_msg_count,
486: p_data => x_msg_data);
487:
488: EXCEPTION
489: WHEN FND_API.G_EXC_ERROR THEN
490: ROLLBACK TO update_orig_sys_entity_mapping;
491: x_return_status := FND_API.G_RET_STS_ERROR;
492: FND_MSG_PUB.Count_And_Get(
493: p_encoded => FND_API.G_FALSE,

Line 491: x_return_status := FND_API.G_RET_STS_ERROR;

487:
488: EXCEPTION
489: WHEN FND_API.G_EXC_ERROR THEN
490: ROLLBACK TO update_orig_sys_entity_mapping;
491: x_return_status := FND_API.G_RET_STS_ERROR;
492: FND_MSG_PUB.Count_And_Get(
493: p_encoded => FND_API.G_FALSE,
494: p_count => x_msg_count,
495: p_data => x_msg_data);

Line 493: p_encoded => FND_API.G_FALSE,

489: WHEN FND_API.G_EXC_ERROR THEN
490: ROLLBACK TO update_orig_sys_entity_mapping;
491: x_return_status := FND_API.G_RET_STS_ERROR;
492: FND_MSG_PUB.Count_And_Get(
493: p_encoded => FND_API.G_FALSE,
494: p_count => x_msg_count,
495: p_data => x_msg_data);
496:
497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

493: p_encoded => FND_API.G_FALSE,
494: p_count => x_msg_count,
495: p_data => x_msg_data);
496:
497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
498: ROLLBACK TO update_orig_sys_entity_mapping;
499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
500: FND_MSG_PUB.Count_And_Get(
501: p_encoded => FND_API.G_FALSE,

Line 499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

495: p_data => x_msg_data);
496:
497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
498: ROLLBACK TO update_orig_sys_entity_mapping;
499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
500: FND_MSG_PUB.Count_And_Get(
501: p_encoded => FND_API.G_FALSE,
502: p_count => x_msg_count,
503: p_data => x_msg_data);

Line 501: p_encoded => FND_API.G_FALSE,

497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
498: ROLLBACK TO update_orig_sys_entity_mapping;
499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
500: FND_MSG_PUB.Count_And_Get(
501: p_encoded => FND_API.G_FALSE,
502: p_count => x_msg_count,
503: p_data => x_msg_data);
504:
505: WHEN OTHERS THEN

Line 507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

503: p_data => x_msg_data);
504:
505: WHEN OTHERS THEN
506: ROLLBACK TO update_orig_sys_entity_mapping;
507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
508: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
509: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
510: FND_MSG_PUB.ADD;
511: FND_MSG_PUB.Count_And_Get(

Line 512: p_encoded => FND_API.G_FALSE,

508: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
509: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
510: FND_MSG_PUB.ADD;
511: FND_MSG_PUB.Count_And_Get(
512: p_encoded => FND_API.G_FALSE,
513: p_count => x_msg_count,
514: p_data => x_msg_data);
515:
516: end update_orig_sys_entity_mapping;

Line 520: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

516: end update_orig_sys_entity_mapping;
517:
518: PROCEDURE do_create_orig_sys_reference(
519: p_orig_sys_reference_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
520: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
521: x_return_status IN OUT NOCOPY VARCHAR2
522: ) is
523: l_dummy VARCHAR2(32);
524: l_status VARCHAR2(1);

Line 528: x_return_status := FND_API.G_RET_STS_SUCCESS;

524: l_status VARCHAR2(1);
525: begin
526:
527: --Initialize API return status to success.
528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529:
530: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
531: then
532: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('C',

Line 530: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

526:
527: --Initialize API return status to success.
528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529:
530: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
531: then
532: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('C',
533: p_orig_sys_reference_rec,
534: x_return_status);

Line 536: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

532: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('C',
533: p_orig_sys_reference_rec,
534: x_return_status);
535:
536: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
537: RAISE FND_API.G_EXC_ERROR;
538: END IF;
539: end if;
540: if (p_orig_sys_reference_rec.end_date_active is not null

Line 537: RAISE FND_API.G_EXC_ERROR;

533: p_orig_sys_reference_rec,
534: x_return_status);
535:
536: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
537: RAISE FND_API.G_EXC_ERROR;
538: END IF;
539: end if;
540: if (p_orig_sys_reference_rec.end_date_active is not null
541: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date

Line 541: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date

537: RAISE FND_API.G_EXC_ERROR;
538: END IF;
539: end if;
540: if (p_orig_sys_reference_rec.end_date_active is not null
541: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date
542: and p_orig_sys_reference_rec.end_date_active <= sysdate)
543: then
544: p_orig_sys_reference_rec.status := 'I';
545: else p_orig_sys_reference_rec.status := 'A';

Line 631: x_return_status := fnd_api.g_ret_sts_error;

627: fnd_message.set_token('FK', 'party_id');
628: fnd_message.set_token('COLUMN', 'party_id');
629: fnd_message.set_token('TABLE', 'hz_parties');
630: fnd_msg_pub.add;
631: x_return_status := fnd_api.g_ret_sts_error;
632:
633: END;
634:
635: -- SYNC PARTY SITES

Line 725: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

721: end get_start_date_active;
722:
723: PROCEDURE do_update_orig_sys_reference(
724: p_orig_sys_reference_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
725: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
726: p_object_version_number IN OUT NOCOPY NUMBER,
727: x_return_status IN OUT NOCOPY VARCHAR2
728: ) is
729: cursor get_pk_by_owner_id is

Line 751: x_return_status := FND_API.G_RET_STS_SUCCESS;

747: l_temp varchar2(255);
748: l_status VARCHAR2(1);
749: begin
750: -- initialize API return status to success.
751: x_return_status := FND_API.G_RET_STS_SUCCESS;
752: if (p_orig_sys_reference_rec.owner_table_id is not null
753: and p_orig_sys_reference_rec.owner_table_id<>fnd_api.g_miss_num)
754: then
755: open get_pk_by_owner_id;

Line 753: and p_orig_sys_reference_rec.owner_table_id<>fnd_api.g_miss_num)

749: begin
750: -- initialize API return status to success.
751: x_return_status := FND_API.G_RET_STS_SUCCESS;
752: if (p_orig_sys_reference_rec.owner_table_id is not null
753: and p_orig_sys_reference_rec.owner_table_id<>fnd_api.g_miss_num)
754: then
755: open get_pk_by_owner_id;
756: fetch get_pk_by_owner_id into l_orig_system_ref_id;
757: close get_pk_by_owner_id;

Line 764: x_return_status := FND_API.G_RET_STS_ERROR;

760: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
761: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
762: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
763: FND_MSG_PUB.ADD;
764: x_return_status := FND_API.G_RET_STS_ERROR;
765: RAISE FND_API.G_EXC_ERROR;
766: end if;
767: end if;
768: if (p_orig_sys_reference_rec.orig_system_ref_id is not null

Line 765: RAISE FND_API.G_EXC_ERROR;

761: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
762: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
763: FND_MSG_PUB.ADD;
764: x_return_status := FND_API.G_RET_STS_ERROR;
765: RAISE FND_API.G_EXC_ERROR;
766: end if;
767: end if;
768: if (p_orig_sys_reference_rec.orig_system_ref_id is not null
769: and p_orig_sys_reference_rec.orig_system_ref_id<>fnd_api.g_miss_num)

Line 769: and p_orig_sys_reference_rec.orig_system_ref_id<>fnd_api.g_miss_num)

765: RAISE FND_API.G_EXC_ERROR;
766: end if;
767: end if;
768: if (p_orig_sys_reference_rec.orig_system_ref_id is not null
769: and p_orig_sys_reference_rec.orig_system_ref_id<>fnd_api.g_miss_num)
770: then
771: if nvl(l_orig_system_ref_id,p_orig_sys_reference_rec.orig_system_ref_id)<>p_orig_sys_reference_rec.orig_system_ref_id
772: then
773: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');

Line 777: x_return_status := FND_API.G_RET_STS_ERROR;

773: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
774: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id+orig_system_ref_id');
775: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
776: FND_MSG_PUB.ADD;
777: x_return_status := FND_API.G_RET_STS_ERROR;
778: RAISE FND_API.G_EXC_ERROR;
779: end if;
780: l_orig_system_ref_id := p_orig_sys_reference_rec.orig_system_ref_id;
781: end if;

Line 778: RAISE FND_API.G_EXC_ERROR;

774: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id+orig_system_ref_id');
775: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
776: FND_MSG_PUB.ADD;
777: x_return_status := FND_API.G_RET_STS_ERROR;
778: RAISE FND_API.G_EXC_ERROR;
779: end if;
780: l_orig_system_ref_id := p_orig_sys_reference_rec.orig_system_ref_id;
781: end if;
782:

Line 792: x_return_status := FND_API.G_RET_STS_ERROR;

788: then
789: FND_MESSAGE.SET_NAME('AR', 'HZ_MOSR_CANNOT_UPDATE');
790: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
791: FND_MSG_PUB.ADD;
792: x_return_status := FND_API.G_RET_STS_ERROR;
793: RAISE FND_API.G_EXC_ERROR;
794: elsif l_count = 0
795: then
796: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');

Line 793: RAISE FND_API.G_EXC_ERROR;

789: FND_MESSAGE.SET_NAME('AR', 'HZ_MOSR_CANNOT_UPDATE');
790: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
791: FND_MSG_PUB.ADD;
792: x_return_status := FND_API.G_RET_STS_ERROR;
793: RAISE FND_API.G_EXC_ERROR;
794: elsif l_count = 0
795: then
796: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
797: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');

Line 800: x_return_status := FND_API.G_RET_STS_ERROR;

796: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
797: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
798: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
799: FND_MSG_PUB.ADD;
800: x_return_status := FND_API.G_RET_STS_ERROR;
801: RAISE FND_API.G_EXC_ERROR;
802: elsif l_count = 1
803: then
804: l_orig_system_ref_id :=get_orig_system_ref_id(p_orig_sys_reference_rec.orig_system,

Line 801: RAISE FND_API.G_EXC_ERROR;

797: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
798: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
799: FND_MSG_PUB.ADD;
800: x_return_status := FND_API.G_RET_STS_ERROR;
801: RAISE FND_API.G_EXC_ERROR;
802: elsif l_count = 1
803: then
804: l_orig_system_ref_id :=get_orig_system_ref_id(p_orig_sys_reference_rec.orig_system,
805: p_orig_sys_reference_rec.orig_system_reference,

Line 828: x_return_status := FND_API.G_RET_STS_ERROR;

824: THEN
825: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
826: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
827: FND_MSG_PUB.ADD;
828: x_return_status := FND_API.G_RET_STS_ERROR;
829: RAISE FND_API.G_EXC_ERROR;
830: END IF;
831:
832: p_object_version_number := nvl(l_object_version_number, 1) + 1;

Line 829: RAISE FND_API.G_EXC_ERROR;

825: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
826: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
827: FND_MSG_PUB.ADD;
828: x_return_status := FND_API.G_RET_STS_ERROR;
829: RAISE FND_API.G_EXC_ERROR;
830: END IF;
831:
832: p_object_version_number := nvl(l_object_version_number, 1) + 1;
833:

Line 839: RAISE FND_API.G_EXC_ERROR;

835: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
836: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_ORIG_SYS_REFERENCES');
837: FND_MESSAGE.SET_TOKEN('VALUE', l_orig_system_ref_id);
838: FND_MSG_PUB.ADD;
839: RAISE FND_API.G_EXC_ERROR;
840: END;
841:
842: -- Bug 4206884: Raise an error if orig_system_reference of a purchased content source is updated
843: if p_orig_sys_reference_rec.orig_system_reference is not null and

Line 844: p_orig_sys_reference_rec.orig_system_reference <> fnd_api.g_miss_char and

840: END;
841:
842: -- Bug 4206884: Raise an error if orig_system_reference of a purchased content source is updated
843: if p_orig_sys_reference_rec.orig_system_reference is not null and
844: p_orig_sys_reference_rec.orig_system_reference <> fnd_api.g_miss_char and
845: p_orig_sys_reference_rec.orig_system_reference <> l_orig_system_reference
846: then
847: if HZ_UTILITY_V2PUB.is_purchased_content_source(l_orig_system) = 'Y'
848: then

Line 851: RAISE FND_API.G_EXC_ERROR;

847: if HZ_UTILITY_V2PUB.is_purchased_content_source(l_orig_system) = 'Y'
848: then
849: FND_MESSAGE.SET_NAME('AR', 'HZ_SSM_NO_UPDATE_PUR');
850: FND_MSG_PUB.ADD;
851: RAISE FND_API.G_EXC_ERROR;
852: end if;
853: end if;
854:
855: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

Line 855: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

851: RAISE FND_API.G_EXC_ERROR;
852: end if;
853: end if;
854:
855: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
856: then
857: -- call for validations.
858: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('U',
859: p_orig_sys_reference_rec,

Line 861: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

857: -- call for validations.
858: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('U',
859: p_orig_sys_reference_rec,
860: x_return_status);
861: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
862: RAISE FND_API.G_EXC_ERROR;
863: END IF;
864: end if;
865:

Line 862: RAISE FND_API.G_EXC_ERROR;

858: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('U',
859: p_orig_sys_reference_rec,
860: x_return_status);
861: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
862: RAISE FND_API.G_EXC_ERROR;
863: END IF;
864: end if;
865:
866: if (p_orig_sys_reference_rec.end_date_active is not null

Line 867: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date

863: END IF;
864: end if;
865:
866: if (p_orig_sys_reference_rec.end_date_active is not null
867: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date
868: and p_orig_sys_reference_rec.end_date_active <= sysdate)
869: then
870: p_orig_sys_reference_rec.status := 'I';
871: else p_orig_sys_reference_rec.status := 'A';

Line 971: x_return_status := fnd_api.g_ret_sts_error;

967: fnd_message.set_token('FK', 'party_id');
968: fnd_message.set_token('COLUMN', 'party_id');
969: fnd_message.set_token('TABLE', 'hz_parties');
970: fnd_msg_pub.add;
971: x_return_status := fnd_api.g_ret_sts_error;
972:
973: END;
974:
975: -- SYNC PARTY SITES

Line 1029: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1025:
1026:
1027: /* Public API */
1028: PROCEDURE create_orig_system_reference(
1029: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1030: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1031: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1032: x_return_status OUT NOCOPY VARCHAR2,
1033: x_msg_count OUT NOCOPY NUMBER,

Line 1030: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1026:
1027: /* Public API */
1028: PROCEDURE create_orig_system_reference(
1029: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1030: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1031: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1032: x_return_status OUT NOCOPY VARCHAR2,
1033: x_msg_count OUT NOCOPY NUMBER,
1034: x_msg_data OUT NOCOPY VARCHAR2

Line 1066: IF FND_API.to_Boolean(p_init_msg_list) THEN

1062: -- standard start of API savepoint
1063: SAVEPOINT create_orig_sys_reference;
1064:
1065: -- initialize message list if p_init_msg_list is set to TRUE.
1066: IF FND_API.to_Boolean(p_init_msg_list) THEN
1067: FND_MSG_PUB.initialize;
1068: END IF;
1069:
1070: -- initialize API return status to success.

Line 1071: x_return_status := FND_API.G_RET_STS_SUCCESS;

1067: FND_MSG_PUB.initialize;
1068: END IF;
1069:
1070: -- initialize API return status to success.
1071: x_return_status := FND_API.G_RET_STS_SUCCESS;
1072:
1073: -- call to business logic.
1074: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1075: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)

Line 1075: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)

1071: x_return_status := FND_API.G_RET_STS_SUCCESS;
1072:
1073: -- call to business logic.
1074: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1075: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)
1076: then
1077: l_orig_sys_reference_rec.orig_system_reference :=l_orig_sys_reference_rec.old_orig_system_reference;
1078: l_orig_sys_reference_rec.status := 'I';
1079: l_orig_sys_reference_rec.end_date_active := SYSDATE;

Line 1107: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1103: if l_multi_osr_flag = 'N' then
1104: open get_orig_system_new;
1105: fetch get_orig_system_new into l_dummy ;
1106: if get_orig_system_new%FOUND then
1107: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1108: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1109: FND_MSG_PUB.ADD;
1110: x_return_status := FND_API.G_RET_STS_ERROR;
1111: end if;

Line 1110: x_return_status := FND_API.G_RET_STS_ERROR;

1106: if get_orig_system_new%FOUND then
1107: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1108: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1109: FND_MSG_PUB.ADD;
1110: x_return_status := FND_API.G_RET_STS_ERROR;
1111: end if;
1112: else
1113: --//logic for populating party_id
1114: get_party_id(l_orig_sys_reference_rec.owner_table_id,

Line 1145: p_encoded => FND_API.G_FALSE,

1141:
1142:
1143: -- standard call to get message count and if count is 1, get message info.
1144: FND_MSG_PUB.Count_And_Get(
1145: p_encoded => FND_API.G_FALSE,
1146: p_count => x_msg_count,
1147: p_data => x_msg_data);
1148:
1149: EXCEPTION

Line 1150: WHEN FND_API.G_EXC_ERROR THEN

1146: p_count => x_msg_count,
1147: p_data => x_msg_data);
1148:
1149: EXCEPTION
1150: WHEN FND_API.G_EXC_ERROR THEN
1151: ROLLBACK TO create_orig_sys_reference;
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: FND_MSG_PUB.Count_And_Get(
1154: p_encoded => FND_API.G_FALSE,

Line 1152: x_return_status := FND_API.G_RET_STS_ERROR;

1148:
1149: EXCEPTION
1150: WHEN FND_API.G_EXC_ERROR THEN
1151: ROLLBACK TO create_orig_sys_reference;
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: FND_MSG_PUB.Count_And_Get(
1154: p_encoded => FND_API.G_FALSE,
1155: p_count => x_msg_count,
1156: p_data => x_msg_data);

Line 1154: p_encoded => FND_API.G_FALSE,

1150: WHEN FND_API.G_EXC_ERROR THEN
1151: ROLLBACK TO create_orig_sys_reference;
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: FND_MSG_PUB.Count_And_Get(
1154: p_encoded => FND_API.G_FALSE,
1155: p_count => x_msg_count,
1156: p_data => x_msg_data);
1157:
1158: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1158: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1154: p_encoded => FND_API.G_FALSE,
1155: p_count => x_msg_count,
1156: p_data => x_msg_data);
1157:
1158: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1159: ROLLBACK TO create_orig_sys_reference;
1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1161: FND_MSG_PUB.Count_And_Get(
1162: p_encoded => FND_API.G_FALSE,

Line 1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1156: p_data => x_msg_data);
1157:
1158: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1159: ROLLBACK TO create_orig_sys_reference;
1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1161: FND_MSG_PUB.Count_And_Get(
1162: p_encoded => FND_API.G_FALSE,
1163: p_count => x_msg_count,
1164: p_data => x_msg_data);

Line 1162: p_encoded => FND_API.G_FALSE,

1158: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1159: ROLLBACK TO create_orig_sys_reference;
1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1161: FND_MSG_PUB.Count_And_Get(
1162: p_encoded => FND_API.G_FALSE,
1163: p_count => x_msg_count,
1164: p_data => x_msg_data);
1165:
1166: WHEN OTHERS THEN

Line 1168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1164: p_data => x_msg_data);
1165:
1166: WHEN OTHERS THEN
1167: ROLLBACK TO create_orig_sys_reference;
1168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1169: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1170: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1171: FND_MSG_PUB.ADD;
1172: FND_MSG_PUB.Count_And_Get(

Line 1173: p_encoded => FND_API.G_FALSE,

1169: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1170: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1171: FND_MSG_PUB.ADD;
1172: FND_MSG_PUB.Count_And_Get(
1173: p_encoded => FND_API.G_FALSE,
1174: p_count => x_msg_count,
1175: p_data => x_msg_data);
1176:
1177: end create_orig_system_reference;

Line 1202: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1198: end inactive_mosr_exist;
1199:
1200: /* Public API */
1201: PROCEDURE update_orig_system_reference(
1202: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1203: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1204: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1205: p_object_version_number IN OUT NOCOPY NUMBER,
1206: x_return_status OUT NOCOPY VARCHAR2,

Line 1203: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1199:
1200: /* Public API */
1201: PROCEDURE update_orig_system_reference(
1202: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1203: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1204: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1205: p_object_version_number IN OUT NOCOPY NUMBER,
1206: x_return_status OUT NOCOPY VARCHAR2,
1207: x_msg_count OUT NOCOPY NUMBER,

Line 1244: IF FND_API.to_Boolean(p_init_msg_list) THEN

1240: -- standard start of API savepoint
1241: SAVEPOINT update_orig_sys_reference;
1242:
1243: -- initialize message list if p_init_msg_list is set to TRUE.
1244: IF FND_API.to_Boolean(p_init_msg_list) THEN
1245: FND_MSG_PUB.initialize;
1246: END IF;
1247:
1248: -- initialize API return status to success.

Line 1249: x_return_status := FND_API.G_RET_STS_SUCCESS;

1245: FND_MSG_PUB.initialize;
1246: END IF;
1247:
1248: -- initialize API return status to success.
1249: x_return_status := FND_API.G_RET_STS_SUCCESS;
1250:
1251: --raji
1252: -- //Phase 2 logic
1253:

Line 1264: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)

1260: then
1261: l_orig_sys_reference_rec.old_orig_system_reference := null;
1262: end if;
1263: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1264: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)
1265: then
1266: l_orig_sys_reference_rec.orig_system_reference := p_orig_sys_reference_rec.old_orig_system_reference;
1267: else
1268: l_orig_sys_reference_rec.orig_system_reference :=p_orig_sys_reference_rec.orig_system_reference;

Line 1285: and (p_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)) then

1281: fetch get_orig_system_new into l_dummy ;
1282: if get_orig_system_new%FOUND then
1283: if ((p_orig_sys_reference_rec.old_orig_system_reference <> p_orig_sys_reference_rec.orig_system_reference)
1284: and (p_orig_sys_reference_rec.old_orig_system_reference is not null)
1285: and (p_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)) then
1286: -- first make the old OSR inactive
1287: lc_orig_sys_reference_rec.orig_system_reference := p_orig_sys_reference_rec.old_orig_system_reference;
1288: lc_orig_sys_reference_rec.status := 'I';
1289: l_start_date_active := get_start_date_active(p_orig_sys_reference_rec.orig_system,

Line 1318: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1314: l_orig_sys_reference_rec,
1315: p_validation_level,
1316: x_return_status );
1317: else
1318: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1319: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1320: FND_MSG_PUB.ADD;
1321: x_return_status := FND_API.G_RET_STS_ERROR;
1322: end if;

Line 1321: x_return_status := FND_API.G_RET_STS_ERROR;

1317: else
1318: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1319: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1320: FND_MSG_PUB.ADD;
1321: x_return_status := FND_API.G_RET_STS_ERROR;
1322: end if;
1323: end if;
1324: else
1325: --//logic for populating party_id

Line 1342: and (p_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)) then

1338: else -- l_multi_osr_flag = 'Y'
1339: -- //logic for populating party_id
1340: if ((p_orig_sys_reference_rec.old_orig_system_reference <> p_orig_sys_reference_rec.orig_system_reference)
1341: and (p_orig_sys_reference_rec.old_orig_system_reference is not null)
1342: and (p_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)) then
1343: -- first make the old OSR inactive
1344: lc_orig_sys_reference_rec.orig_system_reference := p_orig_sys_reference_rec.old_orig_system_reference;
1345: lc_orig_sys_reference_rec.status := 'I';
1346: l_start_date_active := get_start_date_active(p_orig_sys_reference_rec.orig_system,

Line 1405: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)

1401: -- call to business logic.
1402:
1403:
1404: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1405: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)
1406: -- if old OSR passed
1407: then
1408: l_orig_sys_reference_rec.orig_system_reference :=l_orig_sys_reference_rec.old_orig_system_reference;
1409: l_orig_sys_reference_rec.status := 'I';

Line 1433: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1429: if l_multi_osr_flag = 'N' then
1430: open get_orig_system_new;
1431: fetch get_orig_system_new into l_dummy ;
1432: if get_orig_system_new%FOUND then
1433: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1434: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1435: FND_MSG_PUB.ADD;
1436: x_return_status := FND_API.G_RET_STS_ERROR;
1437: end if;

Line 1436: x_return_status := FND_API.G_RET_STS_ERROR;

1432: if get_orig_system_new%FOUND then
1433: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1434: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1435: FND_MSG_PUB.ADD;
1436: x_return_status := FND_API.G_RET_STS_ERROR;
1437: end if;
1438: else
1439: --//logic for populating party_id
1440: get_party_id(l_orig_sys_reference_rec.owner_table_id,

Line 1493: p_encoded => FND_API.G_FALSE,

1489:
1490:
1491: -- standard call to get message count and if count is 1, get message info.
1492: FND_MSG_PUB.Count_And_Get(
1493: p_encoded => FND_API.G_FALSE,
1494: p_count => x_msg_count,
1495: p_data => x_msg_data);
1496:
1497: EXCEPTION

Line 1498: WHEN FND_API.G_EXC_ERROR THEN

1494: p_count => x_msg_count,
1495: p_data => x_msg_data);
1496:
1497: EXCEPTION
1498: WHEN FND_API.G_EXC_ERROR THEN
1499: ROLLBACK TO update_orig_sys_reference;
1500: x_return_status := FND_API.G_RET_STS_ERROR;
1501: FND_MSG_PUB.Count_And_Get(
1502: p_encoded => FND_API.G_FALSE,

Line 1500: x_return_status := FND_API.G_RET_STS_ERROR;

1496:
1497: EXCEPTION
1498: WHEN FND_API.G_EXC_ERROR THEN
1499: ROLLBACK TO update_orig_sys_reference;
1500: x_return_status := FND_API.G_RET_STS_ERROR;
1501: FND_MSG_PUB.Count_And_Get(
1502: p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data);

Line 1502: p_encoded => FND_API.G_FALSE,

1498: WHEN FND_API.G_EXC_ERROR THEN
1499: ROLLBACK TO update_orig_sys_reference;
1500: x_return_status := FND_API.G_RET_STS_ERROR;
1501: FND_MSG_PUB.Count_And_Get(
1502: p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data);
1505:
1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1502: p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data);
1505:
1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1507: ROLLBACK TO update_orig_sys_reference;
1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1509: FND_MSG_PUB.Count_And_Get(
1510: p_encoded => FND_API.G_FALSE,

Line 1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1504: p_data => x_msg_data);
1505:
1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1507: ROLLBACK TO update_orig_sys_reference;
1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1509: FND_MSG_PUB.Count_And_Get(
1510: p_encoded => FND_API.G_FALSE,
1511: p_count => x_msg_count,
1512: p_data => x_msg_data);

Line 1510: p_encoded => FND_API.G_FALSE,

1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1507: ROLLBACK TO update_orig_sys_reference;
1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1509: FND_MSG_PUB.Count_And_Get(
1510: p_encoded => FND_API.G_FALSE,
1511: p_count => x_msg_count,
1512: p_data => x_msg_data);
1513:
1514: WHEN OTHERS THEN

Line 1516: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1512: p_data => x_msg_data);
1513:
1514: WHEN OTHERS THEN
1515: ROLLBACK TO update_orig_sys_reference;
1516: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1517: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1518: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1519: FND_MSG_PUB.ADD;
1520: FND_MSG_PUB.Count_And_Get(

Line 1521: p_encoded => FND_API.G_FALSE,

1517: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1518: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1519: FND_MSG_PUB.ADD;
1520: FND_MSG_PUB.Count_And_Get(
1521: p_encoded => FND_API.G_FALSE,
1522: p_count => x_msg_count,
1523: p_data => x_msg_data);
1524:
1525: end update_orig_system_reference;

Line 1528: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1524:
1525: end update_orig_system_reference;
1526:
1527: PROCEDURE remap_internal_identifier(
1528: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1529: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1530: p_old_owner_table_id IN NUMBER,
1531: p_new_owner_table_id IN NUMBER,
1532: p_owner_table_name IN VARCHAR2,

Line 1529: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1525: end update_orig_system_reference;
1526:
1527: PROCEDURE remap_internal_identifier(
1528: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1529: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1530: p_old_owner_table_id IN NUMBER,
1531: p_new_owner_table_id IN NUMBER,
1532: p_owner_table_name IN VARCHAR2,
1533: p_orig_system IN VARCHAR2,

Line 1597: x_return_status := FND_API.G_RET_STS_SUCCESS;

1593:
1594: begin
1595:
1596: --Initialize API return status to success.
1597: x_return_status := FND_API.G_RET_STS_SUCCESS;
1598:
1599: if p_orig_system is not null and p_orig_system_reference is not null
1600: then
1601:

Line 1620: FND_API.G_FALSE,

1616: l_orig_sys_reference_rec.end_date_active := SYSDATE;
1617: l_orig_sys_reference_rec.reason_code := p_reason_code;
1618:
1619: update_orig_system_reference(
1620: FND_API.G_FALSE,
1621: p_validation_level,
1622: l_orig_sys_reference_rec,
1623: l_object_version_number,
1624: x_return_status,

Line 1627: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1623: l_object_version_number,
1624: x_return_status,
1625: x_msg_count,
1626: x_msg_data);
1627: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1628: RAISE FND_API.G_EXC_ERROR;
1629: END IF;
1630: --raji
1631: -- //logic for populating party_id

Line 1628: RAISE FND_API.G_EXC_ERROR;

1624: x_return_status,
1625: x_msg_count,
1626: x_msg_data);
1627: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1628: RAISE FND_API.G_EXC_ERROR;
1629: END IF;
1630: --raji
1631: -- //logic for populating party_id
1632:

Line 1647: FND_API.G_FALSE,

1643: l_orig_sys_reference_rec.reason_code := p_reason_code;
1644: l_orig_sys_reference_rec.status := 'A';
1645: l_orig_sys_reference_rec.end_date_active := null;
1646: create_orig_system_reference(
1647: FND_API.G_FALSE,
1648: p_validation_level,
1649: l_orig_sys_reference_rec,
1650: x_return_status,
1651: x_msg_count,

Line 1653: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1649: l_orig_sys_reference_rec,
1650: x_return_status,
1651: x_msg_count,
1652: x_msg_data);
1653: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1654: RAISE FND_API.G_EXC_ERROR;
1655: END IF;
1656: else
1657: open get_orig_system_csr;

Line 1654: RAISE FND_API.G_EXC_ERROR;

1650: x_return_status,
1651: x_msg_count,
1652: x_msg_data);
1653: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1654: RAISE FND_API.G_EXC_ERROR;
1655: END IF;
1656: else
1657: open get_orig_system_csr;
1658: loop

Line 1688: FND_API.G_FALSE,

1684: l_orig_sys_reference_rec.end_date_active := SYSDATE;
1685: l_orig_sys_reference_rec.reason_code := p_reason_code;
1686: l_orig_sys_reference_rec.orig_system_ref_id := l_orig_system_ref_id;
1687: update_orig_system_reference(
1688: FND_API.G_FALSE,
1689: p_validation_level,
1690: l_orig_sys_reference_rec,
1691: l_object_version_number,
1692: x_return_status,

Line 1695: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1691: l_object_version_number,
1692: x_return_status,
1693: x_msg_count,
1694: x_msg_data);
1695: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1696: RAISE FND_API.G_EXC_ERROR;
1697: END IF;
1698:
1699: if l_multi_osr_flag = 'Y' then

Line 1696: RAISE FND_API.G_EXC_ERROR;

1692: x_return_status,
1693: x_msg_count,
1694: x_msg_data);
1695: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1696: RAISE FND_API.G_EXC_ERROR;
1697: END IF;
1698:
1699: if l_multi_osr_flag = 'Y' then
1700: --bug 4261242 check if merge-to party has ssm record with same orig_system and orig_system_reference as that of merge-from party

Line 1722: FND_API.G_FALSE,

1718: l_orig_sys_reference_rec.end_date_active := null;
1719: l_orig_sys_reference_rec.reason_code := p_reason_code;
1720: l_orig_sys_reference_rec.orig_system_ref_id := null;
1721: create_orig_system_reference(
1722: FND_API.G_FALSE,
1723: p_validation_level,
1724: l_orig_sys_reference_rec,
1725: x_return_status,
1726: x_msg_count,

Line 1728: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1724: l_orig_sys_reference_rec,
1725: x_return_status,
1726: x_msg_count,
1727: x_msg_data);
1728: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: END IF;
1731: end if;
1732: else --//l_multi_osr_flag = 'N'

Line 1729: RAISE FND_API.G_EXC_ERROR;

1725: x_return_status,
1726: x_msg_count,
1727: x_msg_data);
1728: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: END IF;
1731: end if;
1732: else --//l_multi_osr_flag = 'N'
1733: open get_orig_system_new;

Line 1752: FND_API.G_FALSE,

1748: l_orig_sys_reference_rec.end_date_active := null;
1749: l_orig_sys_reference_rec.reason_code := p_reason_code;
1750: l_orig_sys_reference_rec.orig_system_ref_id := null;
1751: create_orig_system_reference(
1752: FND_API.G_FALSE,
1753: p_validation_level,
1754: l_orig_sys_reference_rec,
1755: x_return_status,
1756: x_msg_count,

Line 1758: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1754: l_orig_sys_reference_rec,
1755: x_return_status,
1756: x_msg_count,
1757: x_msg_data);
1758: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1759: RAISE FND_API.G_EXC_ERROR;
1760: END IF;
1761:
1762: end if;

Line 1759: RAISE FND_API.G_EXC_ERROR;

1755: x_return_status,
1756: x_msg_count,
1757: x_msg_data);
1758: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1759: RAISE FND_API.G_EXC_ERROR;
1760: END IF;
1761:
1762: end if;
1763: close get_orig_system_new;

Line 1768: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then--YES

1764: end if; --//multi_osr_flag
1765: -- END IF;
1766: end loop;
1767: IF l_party_merge_flag = FALSE THEN /*Bug 3235877*/
1768: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then--YES
1769: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
1770: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
1771: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
1772: FND_MSG_PUB.ADD;

Line 1773: x_return_status := FND_API.G_RET_STS_ERROR;

1769: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
1770: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
1771: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
1772: FND_MSG_PUB.ADD;
1773: x_return_status := FND_API.G_RET_STS_ERROR;
1774: end if;
1775: END IF;
1776: close get_orig_system_csr;
1777: end if;

Line 1779: WHEN FND_API.G_EXC_ERROR THEN

1775: END IF;
1776: close get_orig_system_csr;
1777: end if;
1778: EXCEPTION
1779: WHEN FND_API.G_EXC_ERROR THEN
1780: x_return_status := FND_API.G_RET_STS_ERROR;
1781:
1782: FND_MSG_PUB.Count_And_Get(
1783: p_encoded => FND_API.G_FALSE,

Line 1780: x_return_status := FND_API.G_RET_STS_ERROR;

1776: close get_orig_system_csr;
1777: end if;
1778: EXCEPTION
1779: WHEN FND_API.G_EXC_ERROR THEN
1780: x_return_status := FND_API.G_RET_STS_ERROR;
1781:
1782: FND_MSG_PUB.Count_And_Get(
1783: p_encoded => FND_API.G_FALSE,
1784: p_count => x_msg_count,

Line 1783: p_encoded => FND_API.G_FALSE,

1779: WHEN FND_API.G_EXC_ERROR THEN
1780: x_return_status := FND_API.G_RET_STS_ERROR;
1781:
1782: FND_MSG_PUB.Count_And_Get(
1783: p_encoded => FND_API.G_FALSE,
1784: p_count => x_msg_count,
1785: p_data => x_msg_data );
1786:
1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1783: p_encoded => FND_API.G_FALSE,
1784: p_count => x_msg_count,
1785: p_data => x_msg_data );
1786:
1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1789:
1790: FND_MSG_PUB.Count_And_Get(
1791: p_encoded => FND_API.G_FALSE,

Line 1788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1784: p_count => x_msg_count,
1785: p_data => x_msg_data );
1786:
1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1789:
1790: FND_MSG_PUB.Count_And_Get(
1791: p_encoded => FND_API.G_FALSE,
1792: p_count => x_msg_count,

Line 1791: p_encoded => FND_API.G_FALSE,

1787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1789:
1790: FND_MSG_PUB.Count_And_Get(
1791: p_encoded => FND_API.G_FALSE,
1792: p_count => x_msg_count,
1793: p_data => x_msg_data );
1794:
1795: WHEN OTHERS THEN

Line 1796: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1792: p_count => x_msg_count,
1793: p_data => x_msg_data );
1794:
1795: WHEN OTHERS THEN
1796: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1797:
1798: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1799: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1800: FND_MSG_PUB.ADD;

Line 1803: p_encoded => FND_API.G_FALSE,

1799: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1800: FND_MSG_PUB.ADD;
1801:
1802: FND_MSG_PUB.Count_And_Get(
1803: p_encoded => FND_API.G_FALSE,
1804: p_count => x_msg_count,
1805: p_data => x_msg_data );
1806:
1807: end;

Line 1811: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1807: end;
1808:
1809: /* not called anywhere currently */
1810: PROCEDURE create_mosr_for_merge(
1811: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1812: p_owner_table_name IN VARCHAR2,
1813: p_owner_table_id IN NUMBER,
1814: x_return_status OUT NOCOPY VARCHAR2,
1815: x_msg_count OUT NOCOPY NUMBER,

Line 1849: x_return_status := FND_API.G_RET_STS_SUCCESS;

1845:
1846: begin
1847:
1848: --Initialize API return status to success.
1849: x_return_status := FND_API.G_RET_STS_SUCCESS;
1850:
1851: open get_orig_system_csr;
1852: loop
1853: fetch get_orig_system_csr into l_orig_system, l_orig_system_reference,l_created_by_module;

Line 1876: FND_API.G_FALSE,

1872: l_orig_sys_reference_rec.owner_table_id := p_owner_table_id;
1873: l_orig_sys_reference_rec.reason_code := 'MERGED';
1874: l_orig_sys_reference_rec.created_by_module := l_created_by_module;
1875: create_orig_system_reference(
1876: FND_API.G_FALSE,
1877: FND_API.G_VALID_LEVEL_NONE,
1878: l_orig_sys_reference_rec,
1879: x_return_status,
1880: x_msg_count,

Line 1877: FND_API.G_VALID_LEVEL_NONE,

1873: l_orig_sys_reference_rec.reason_code := 'MERGED';
1874: l_orig_sys_reference_rec.created_by_module := l_created_by_module;
1875: create_orig_system_reference(
1876: FND_API.G_FALSE,
1877: FND_API.G_VALID_LEVEL_NONE,
1878: l_orig_sys_reference_rec,
1879: x_return_status,
1880: x_msg_count,
1881: x_msg_data);

Line 1882: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1878: l_orig_sys_reference_rec,
1879: x_return_status,
1880: x_msg_count,
1881: x_msg_data);
1882: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1883: RAISE FND_API.G_EXC_ERROR;
1884: END IF;
1885: end if;
1886: end if;

Line 1883: RAISE FND_API.G_EXC_ERROR;

1879: x_return_status,
1880: x_msg_count,
1881: x_msg_data);
1882: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1883: RAISE FND_API.G_EXC_ERROR;
1884: END IF;
1885: end if;
1886: end if;
1887: end loop;

Line 1889: WHEN FND_API.G_EXC_ERROR THEN

1885: end if;
1886: end if;
1887: end loop;
1888: EXCEPTION
1889: WHEN FND_API.G_EXC_ERROR THEN
1890: x_return_status := FND_API.G_RET_STS_ERROR;
1891:
1892: FND_MSG_PUB.Count_And_Get(
1893: p_encoded => FND_API.G_FALSE,

Line 1890: x_return_status := FND_API.G_RET_STS_ERROR;

1886: end if;
1887: end loop;
1888: EXCEPTION
1889: WHEN FND_API.G_EXC_ERROR THEN
1890: x_return_status := FND_API.G_RET_STS_ERROR;
1891:
1892: FND_MSG_PUB.Count_And_Get(
1893: p_encoded => FND_API.G_FALSE,
1894: p_count => x_msg_count,

Line 1893: p_encoded => FND_API.G_FALSE,

1889: WHEN FND_API.G_EXC_ERROR THEN
1890: x_return_status := FND_API.G_RET_STS_ERROR;
1891:
1892: FND_MSG_PUB.Count_And_Get(
1893: p_encoded => FND_API.G_FALSE,
1894: p_count => x_msg_count,
1895: p_data => x_msg_data );
1896:
1897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1893: p_encoded => FND_API.G_FALSE,
1894: p_count => x_msg_count,
1895: p_data => x_msg_data );
1896:
1897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1899:
1900: FND_MSG_PUB.Count_And_Get(
1901: p_encoded => FND_API.G_FALSE,

Line 1898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1894: p_count => x_msg_count,
1895: p_data => x_msg_data );
1896:
1897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1899:
1900: FND_MSG_PUB.Count_And_Get(
1901: p_encoded => FND_API.G_FALSE,
1902: p_count => x_msg_count,

Line 1901: p_encoded => FND_API.G_FALSE,

1897: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1899:
1900: FND_MSG_PUB.Count_And_Get(
1901: p_encoded => FND_API.G_FALSE,
1902: p_count => x_msg_count,
1903: p_data => x_msg_data );
1904:
1905: WHEN OTHERS THEN

Line 1906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1902: p_count => x_msg_count,
1903: p_data => x_msg_data );
1904:
1905: WHEN OTHERS THEN
1906: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1907:
1908: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1909: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1910: FND_MSG_PUB.ADD;

Line 1913: p_encoded => FND_API.G_FALSE,

1909: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1910: FND_MSG_PUB.ADD;
1911:
1912: FND_MSG_PUB.Count_And_Get(
1913: p_encoded => FND_API.G_FALSE,
1914: p_count => x_msg_count,
1915: p_data => x_msg_data );
1916:
1917: end create_mosr_for_merge;

Line 2057: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2053:
2054:
2055: PROCEDURE do_create_orig_system(
2056: p_orig_sys_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PVT.ORIG_SYS_REC_TYPE,
2057: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2058: x_return_status IN OUT NOCOPY VARCHAR2
2059: ) is
2060: l_entity_name HZ_ENTITY_ATTRIBUTES.ENTITY_NAME%TYPE;
2061: l_attribute_name HZ_ENTITY_ATTRIBUTES.ATTRIBUTE_NAME%TYPE;

Line 2075: x_return_status := FND_API.G_RET_STS_SUCCESS;

2071: FROM HZ_ENTITY_ATTRIBUTES;
2072: begin
2073:
2074: --Initialize API return status to success.
2075: x_return_status := FND_API.G_RET_STS_SUCCESS;
2076:
2077: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
2078: then
2079: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',

Line 2077: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

2073:
2074: --Initialize API return status to success.
2075: x_return_status := FND_API.G_RET_STS_SUCCESS;
2076:
2077: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
2078: then
2079: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',
2080: p_orig_sys_rec,
2081: x_return_status);

Line 2082: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2078: then
2079: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',
2080: p_orig_sys_rec,
2081: x_return_status);
2082: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2083: RAISE FND_API.G_EXC_ERROR;
2084: END IF;
2085: end if;
2086:

Line 2083: RAISE FND_API.G_EXC_ERROR;

2079: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',
2080: p_orig_sys_rec,
2081: x_return_status);
2082: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2083: RAISE FND_API.G_EXC_ERROR;
2084: END IF;
2085: end if;
2086:
2087:

Line 2145: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2141: x_return_status => x_return_status,
2142: x_msg_count => x_msg_count,
2143: x_msg_data => x_msg_data);
2144:
2145: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2146: RAISE FND_API.G_EXC_ERROR;
2147: END IF;
2148:
2149: END LOOP;

Line 2146: RAISE FND_API.G_EXC_ERROR;

2142: x_msg_count => x_msg_count,
2143: x_msg_data => x_msg_data);
2144:
2145: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2146: RAISE FND_API.G_EXC_ERROR;
2147: END IF;
2148:
2149: END LOOP;
2150: CLOSE c_data_sources;

Line 2158: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2154: end do_create_orig_system;
2155:
2156: PROCEDURE do_update_orig_system(
2157: p_orig_sys_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PVT.ORIG_SYS_REC_TYPE,
2158: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2159: p_object_version_number IN OUT NOCOPY NUMBER,
2160: x_return_status IN OUT NOCOPY VARCHAR2
2161: ) is
2162: l_object_version_number NUMBER;

Line 2181: x_return_status := FND_API.G_RET_STS_SUCCESS;

2177:
2178: begin
2179:
2180: --Initialize API return status to success.
2181: x_return_status := FND_API.G_RET_STS_SUCCESS;
2182:
2183: -- check whether record has been updated by another user. If not, lock it.
2184:
2185: BEGIN

Line 2199: x_return_status := FND_API.G_RET_STS_ERROR;

2195: THEN
2196: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
2197: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYSTEMS_B');
2198: FND_MSG_PUB.ADD;
2199: x_return_status := FND_API.G_RET_STS_ERROR;
2200: RAISE FND_API.G_EXC_ERROR;
2201: END IF;
2202:
2203: p_object_version_number := nvl(l_object_version_number, 1) + 1;

Line 2200: RAISE FND_API.G_EXC_ERROR;

2196: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
2197: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYSTEMS_B');
2198: FND_MSG_PUB.ADD;
2199: x_return_status := FND_API.G_RET_STS_ERROR;
2200: RAISE FND_API.G_EXC_ERROR;
2201: END IF;
2202:
2203: p_object_version_number := nvl(l_object_version_number, 1) + 1;
2204:

Line 2210: RAISE FND_API.G_EXC_ERROR;

2206: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
2207: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_ORIG_SYSTEMS_B');
2208: FND_MESSAGE.SET_TOKEN('VALUE', p_orig_sys_rec.orig_system_id);
2209: FND_MSG_PUB.ADD;
2210: RAISE FND_API.G_EXC_ERROR;
2211: END;
2212:
2213:
2214: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

Line 2214: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

2210: RAISE FND_API.G_EXC_ERROR;
2211: END;
2212:
2213:
2214: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
2215: then
2216: -- call for validations.
2217: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('U',
2218: p_orig_sys_rec,

Line 2220: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2216: -- call for validations.
2217: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('U',
2218: p_orig_sys_rec,
2219: x_return_status);
2220: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2221: RAISE FND_API.G_EXC_ERROR;
2222: END IF;
2223: end if;
2224:

Line 2221: RAISE FND_API.G_EXC_ERROR;

2217: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('U',
2218: p_orig_sys_rec,
2219: x_return_status);
2220: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2221: RAISE FND_API.G_EXC_ERROR;
2222: END IF;
2223: end if;
2224:
2225: -- call table handler

Line 2284: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2280: x_return_status => x_return_status,
2281: x_msg_count => x_msg_count,
2282: x_msg_data => x_msg_data);
2283:
2284: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2285: RAISE FND_API.G_EXC_ERROR;
2286: END IF;
2287:
2288: END LOOP;

Line 2285: RAISE FND_API.G_EXC_ERROR;

2281: x_msg_count => x_msg_count,
2282: x_msg_data => x_msg_data);
2283:
2284: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2285: RAISE FND_API.G_EXC_ERROR;
2286: END IF;
2287:
2288: END LOOP;
2289: CLOSE c_data_sources;

Line 2295: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2291: END IF;
2292: end do_update_orig_system;
2293:
2294: PROCEDURE create_orig_system(
2295: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2296: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2297: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2298: x_return_status OUT NOCOPY VARCHAR2,
2299: x_msg_count OUT NOCOPY NUMBER,

Line 2296: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2292: end do_update_orig_system;
2293:
2294: PROCEDURE create_orig_system(
2295: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2296: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2297: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2298: x_return_status OUT NOCOPY VARCHAR2,
2299: x_msg_count OUT NOCOPY NUMBER,
2300: x_msg_data OUT NOCOPY VARCHAR2

Line 2309: IF FND_API.to_Boolean(p_init_msg_list) THEN

2305: -- standard start of API savepoint
2306: SAVEPOINT create_orig_system;
2307:
2308: -- initialize message list if p_init_msg_list is set to TRUE.
2309: IF FND_API.to_Boolean(p_init_msg_list) THEN
2310: FND_MSG_PUB.initialize;
2311: END IF;
2312:
2313: -- initialize API return status to success.

Line 2314: x_return_status := FND_API.G_RET_STS_SUCCESS;

2310: FND_MSG_PUB.initialize;
2311: END IF;
2312:
2313: -- initialize API return status to success.
2314: x_return_status := FND_API.G_RET_STS_SUCCESS;
2315:
2316: -- call to business logic.
2317: do_create_orig_system(
2318: l_orig_sys_rec,

Line 2325: p_encoded => FND_API.G_FALSE,

2321:
2322:
2323: -- standard call to get message count and if count is 1, get message info.
2324: FND_MSG_PUB.Count_And_Get(
2325: p_encoded => FND_API.G_FALSE,
2326: p_count => x_msg_count,
2327: p_data => x_msg_data);
2328:
2329: EXCEPTION

Line 2330: WHEN FND_API.G_EXC_ERROR THEN

2326: p_count => x_msg_count,
2327: p_data => x_msg_data);
2328:
2329: EXCEPTION
2330: WHEN FND_API.G_EXC_ERROR THEN
2331: ROLLBACK TO create_orig_system;
2332: x_return_status := FND_API.G_RET_STS_ERROR;
2333: FND_MSG_PUB.Count_And_Get(
2334: p_encoded => FND_API.G_FALSE,

Line 2332: x_return_status := FND_API.G_RET_STS_ERROR;

2328:
2329: EXCEPTION
2330: WHEN FND_API.G_EXC_ERROR THEN
2331: ROLLBACK TO create_orig_system;
2332: x_return_status := FND_API.G_RET_STS_ERROR;
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);

Line 2334: p_encoded => FND_API.G_FALSE,

2330: WHEN FND_API.G_EXC_ERROR THEN
2331: ROLLBACK TO create_orig_system;
2332: x_return_status := FND_API.G_RET_STS_ERROR;
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:
2338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2334: p_encoded => FND_API.G_FALSE,
2335: p_count => x_msg_count,
2336: p_data => x_msg_data);
2337:
2338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2339: ROLLBACK TO create_orig_system;
2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2341: FND_MSG_PUB.Count_And_Get(
2342: p_encoded => FND_API.G_FALSE,

Line 2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2336: p_data => x_msg_data);
2337:
2338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2339: ROLLBACK TO create_orig_system;
2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2341: FND_MSG_PUB.Count_And_Get(
2342: p_encoded => FND_API.G_FALSE,
2343: p_count => x_msg_count,
2344: p_data => x_msg_data);

Line 2342: p_encoded => FND_API.G_FALSE,

2338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2339: ROLLBACK TO create_orig_system;
2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2341: FND_MSG_PUB.Count_And_Get(
2342: p_encoded => FND_API.G_FALSE,
2343: p_count => x_msg_count,
2344: p_data => x_msg_data);
2345:
2346: WHEN OTHERS THEN

Line 2348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2344: p_data => x_msg_data);
2345:
2346: WHEN OTHERS THEN
2347: ROLLBACK TO create_orig_system;
2348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2349: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2350: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2351: FND_MSG_PUB.ADD;
2352: FND_MSG_PUB.Count_And_Get(

Line 2353: p_encoded => FND_API.G_FALSE,

2349: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2350: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2351: FND_MSG_PUB.ADD;
2352: FND_MSG_PUB.Count_And_Get(
2353: p_encoded => FND_API.G_FALSE,
2354: p_count => x_msg_count,
2355: p_data => x_msg_data);
2356: end create_orig_system;
2357:

Line 2359: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2355: p_data => x_msg_data);
2356: end create_orig_system;
2357:
2358: PROCEDURE update_orig_system(
2359: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2360: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2361: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2362: p_object_version_number IN OUT NOCOPY NUMBER,
2363: x_return_status OUT NOCOPY VARCHAR2,

Line 2360: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2356: end create_orig_system;
2357:
2358: PROCEDURE update_orig_system(
2359: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2360: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2361: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2362: p_object_version_number IN OUT NOCOPY NUMBER,
2363: x_return_status OUT NOCOPY VARCHAR2,
2364: x_msg_count OUT NOCOPY NUMBER,

Line 2375: IF FND_API.to_Boolean(p_init_msg_list) THEN

2371: -- standard start of API savepoint
2372: SAVEPOINT update_orig_system;
2373:
2374: -- initialize message list if p_init_msg_list is set to TRUE.
2375: IF FND_API.to_Boolean(p_init_msg_list) THEN
2376: FND_MSG_PUB.initialize;
2377: END IF;
2378:
2379: -- initialize API return status to success.

Line 2380: x_return_status := FND_API.G_RET_STS_SUCCESS;

2376: FND_MSG_PUB.initialize;
2377: END IF;
2378:
2379: -- initialize API return status to success.
2380: x_return_status := FND_API.G_RET_STS_SUCCESS;
2381:
2382: -- call to business logic.
2383: do_update_orig_system(
2384: l_orig_sys_rec,

Line 2392: p_encoded => FND_API.G_FALSE,

2388:
2389:
2390: -- standard call to get message count and if count is 1, get message info.
2391: FND_MSG_PUB.Count_And_Get(
2392: p_encoded => FND_API.G_FALSE,
2393: p_count => x_msg_count,
2394: p_data => x_msg_data);
2395:
2396: EXCEPTION

Line 2397: WHEN FND_API.G_EXC_ERROR THEN

2393: p_count => x_msg_count,
2394: p_data => x_msg_data);
2395:
2396: EXCEPTION
2397: WHEN FND_API.G_EXC_ERROR THEN
2398: ROLLBACK TO update_orig_system;
2399: x_return_status := FND_API.G_RET_STS_ERROR;
2400: FND_MSG_PUB.Count_And_Get(
2401: p_encoded => FND_API.G_FALSE,

Line 2399: x_return_status := FND_API.G_RET_STS_ERROR;

2395:
2396: EXCEPTION
2397: WHEN FND_API.G_EXC_ERROR THEN
2398: ROLLBACK TO update_orig_system;
2399: x_return_status := FND_API.G_RET_STS_ERROR;
2400: FND_MSG_PUB.Count_And_Get(
2401: p_encoded => FND_API.G_FALSE,
2402: p_count => x_msg_count,
2403: p_data => x_msg_data);

Line 2401: p_encoded => FND_API.G_FALSE,

2397: WHEN FND_API.G_EXC_ERROR THEN
2398: ROLLBACK TO update_orig_system;
2399: x_return_status := FND_API.G_RET_STS_ERROR;
2400: FND_MSG_PUB.Count_And_Get(
2401: p_encoded => FND_API.G_FALSE,
2402: p_count => x_msg_count,
2403: p_data => x_msg_data);
2404:
2405: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2405: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2401: p_encoded => FND_API.G_FALSE,
2402: p_count => x_msg_count,
2403: p_data => x_msg_data);
2404:
2405: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2406: ROLLBACK TO update_orig_system;
2407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2408: FND_MSG_PUB.Count_And_Get(
2409: p_encoded => FND_API.G_FALSE,

Line 2407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2403: p_data => x_msg_data);
2404:
2405: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2406: ROLLBACK TO update_orig_system;
2407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2408: FND_MSG_PUB.Count_And_Get(
2409: p_encoded => FND_API.G_FALSE,
2410: p_count => x_msg_count,
2411: p_data => x_msg_data);

Line 2409: p_encoded => FND_API.G_FALSE,

2405: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2406: ROLLBACK TO update_orig_system;
2407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2408: FND_MSG_PUB.Count_And_Get(
2409: p_encoded => FND_API.G_FALSE,
2410: p_count => x_msg_count,
2411: p_data => x_msg_data);
2412:
2413: WHEN OTHERS THEN

Line 2415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2411: p_data => x_msg_data);
2412:
2413: WHEN OTHERS THEN
2414: ROLLBACK TO update_orig_system;
2415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2416: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2417: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2418: FND_MSG_PUB.ADD;
2419: FND_MSG_PUB.Count_And_Get(

Line 2420: p_encoded => FND_API.G_FALSE,

2416: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2417: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2418: FND_MSG_PUB.ADD;
2419: FND_MSG_PUB.Count_And_Get(
2420: p_encoded => FND_API.G_FALSE,
2421: p_count => x_msg_count,
2422: p_data => x_msg_data);
2423: end update_orig_system;
2424: