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 533: x_return_status := FND_API.G_RET_STS_SUCCESS;

529: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_orig_sys_reference (+)',
530: p_msg_level=>fnd_log.level_procedure);
531: END IF;
532: --Initialize API return status to success.
533: x_return_status := FND_API.G_RET_STS_SUCCESS;
534:
535: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
536: then
537: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('C',

Line 535: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

531: END IF;
532: --Initialize API return status to success.
533: x_return_status := FND_API.G_RET_STS_SUCCESS;
534:
535: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
536: then
537: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('C',
538: p_orig_sys_reference_rec,
539: x_return_status);

Line 541: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

537: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('C',
538: p_orig_sys_reference_rec,
539: x_return_status);
540:
541: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
542: RAISE FND_API.G_EXC_ERROR;
543: END IF;
544: end if;
545: if (p_orig_sys_reference_rec.end_date_active is not null

Line 542: RAISE FND_API.G_EXC_ERROR;

538: p_orig_sys_reference_rec,
539: x_return_status);
540:
541: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
542: RAISE FND_API.G_EXC_ERROR;
543: END IF;
544: end if;
545: if (p_orig_sys_reference_rec.end_date_active is not null
546: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date

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

542: RAISE FND_API.G_EXC_ERROR;
543: END IF;
544: end if;
545: if (p_orig_sys_reference_rec.end_date_active is not null
546: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date
547: and p_orig_sys_reference_rec.end_date_active <= sysdate)
548: then
549: p_orig_sys_reference_rec.status := 'I';
550: else p_orig_sys_reference_rec.status := 'A';

Line 648: x_return_status := fnd_api.g_ret_sts_error;

644: fnd_message.set_token('FK', 'party_id');
645: fnd_message.set_token('COLUMN', 'party_id');
646: fnd_message.set_token('TABLE', 'hz_parties');
647: fnd_msg_pub.add;
648: x_return_status := fnd_api.g_ret_sts_error;
649:
650: END;
651:
652: -- SYNC PARTY SITES

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

743: end get_start_date_active;
744:
745: PROCEDURE do_update_orig_sys_reference(
746: p_orig_sys_reference_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
747: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
748: p_object_version_number IN OUT NOCOPY NUMBER,
749: x_return_status IN OUT NOCOPY VARCHAR2
750: ) is
751: cursor get_pk_by_owner_id is

Line 773: x_return_status := FND_API.G_RET_STS_SUCCESS;

769: l_temp varchar2(255);
770: l_status VARCHAR2(1);
771: begin
772: -- initialize API return status to success.
773: x_return_status := FND_API.G_RET_STS_SUCCESS;
774: if (p_orig_sys_reference_rec.owner_table_id is not null
775: and p_orig_sys_reference_rec.owner_table_id<>fnd_api.g_miss_num)
776: then
777: open get_pk_by_owner_id;

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

771: begin
772: -- initialize API return status to success.
773: x_return_status := FND_API.G_RET_STS_SUCCESS;
774: if (p_orig_sys_reference_rec.owner_table_id is not null
775: and p_orig_sys_reference_rec.owner_table_id<>fnd_api.g_miss_num)
776: then
777: open get_pk_by_owner_id;
778: fetch get_pk_by_owner_id into l_orig_system_ref_id;
779: close get_pk_by_owner_id;

Line 786: x_return_status := FND_API.G_RET_STS_ERROR;

782: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
783: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
784: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
785: FND_MSG_PUB.ADD;
786: x_return_status := FND_API.G_RET_STS_ERROR;
787: RAISE FND_API.G_EXC_ERROR;
788: end if;
789: end if;
790: if (p_orig_sys_reference_rec.orig_system_ref_id is not null

Line 787: RAISE FND_API.G_EXC_ERROR;

783: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
784: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
785: FND_MSG_PUB.ADD;
786: x_return_status := FND_API.G_RET_STS_ERROR;
787: RAISE FND_API.G_EXC_ERROR;
788: end if;
789: end if;
790: if (p_orig_sys_reference_rec.orig_system_ref_id is not null
791: and p_orig_sys_reference_rec.orig_system_ref_id<>fnd_api.g_miss_num)

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

787: RAISE FND_API.G_EXC_ERROR;
788: end if;
789: end if;
790: if (p_orig_sys_reference_rec.orig_system_ref_id is not null
791: and p_orig_sys_reference_rec.orig_system_ref_id<>fnd_api.g_miss_num)
792: then
793: 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
794: then
795: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');

Line 799: x_return_status := FND_API.G_RET_STS_ERROR;

795: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
796: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id+orig_system_ref_id');
797: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
798: FND_MSG_PUB.ADD;
799: x_return_status := FND_API.G_RET_STS_ERROR;
800: RAISE FND_API.G_EXC_ERROR;
801: end if;
802: l_orig_system_ref_id := p_orig_sys_reference_rec.orig_system_ref_id;
803: end if;

Line 800: RAISE FND_API.G_EXC_ERROR;

796: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id+orig_system_ref_id');
797: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
798: FND_MSG_PUB.ADD;
799: x_return_status := FND_API.G_RET_STS_ERROR;
800: RAISE FND_API.G_EXC_ERROR;
801: end if;
802: l_orig_system_ref_id := p_orig_sys_reference_rec.orig_system_ref_id;
803: end if;
804:

Line 814: x_return_status := FND_API.G_RET_STS_ERROR;

810: then
811: FND_MESSAGE.SET_NAME('AR', 'HZ_MOSR_CANNOT_UPDATE');
812: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
813: FND_MSG_PUB.ADD;
814: x_return_status := FND_API.G_RET_STS_ERROR;
815: RAISE FND_API.G_EXC_ERROR;
816: elsif l_count = 0
817: then
818: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');

Line 815: RAISE FND_API.G_EXC_ERROR;

811: FND_MESSAGE.SET_NAME('AR', 'HZ_MOSR_CANNOT_UPDATE');
812: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
813: FND_MSG_PUB.ADD;
814: x_return_status := FND_API.G_RET_STS_ERROR;
815: RAISE FND_API.G_EXC_ERROR;
816: elsif l_count = 0
817: then
818: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
819: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');

Line 822: x_return_status := FND_API.G_RET_STS_ERROR;

818: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
819: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
820: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
821: FND_MSG_PUB.ADD;
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: RAISE FND_API.G_EXC_ERROR;
824: elsif l_count = 1
825: then
826: l_orig_system_ref_id :=get_orig_system_ref_id(p_orig_sys_reference_rec.orig_system,

Line 823: RAISE FND_API.G_EXC_ERROR;

819: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference');
820: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
821: FND_MSG_PUB.ADD;
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: RAISE FND_API.G_EXC_ERROR;
824: elsif l_count = 1
825: then
826: l_orig_system_ref_id :=get_orig_system_ref_id(p_orig_sys_reference_rec.orig_system,
827: p_orig_sys_reference_rec.orig_system_reference,

Line 850: x_return_status := FND_API.G_RET_STS_ERROR;

846: THEN
847: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
848: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
849: FND_MSG_PUB.ADD;
850: x_return_status := FND_API.G_RET_STS_ERROR;
851: RAISE FND_API.G_EXC_ERROR;
852: END IF;
853:
854: p_object_version_number := nvl(l_object_version_number, 1) + 1;

Line 851: RAISE FND_API.G_EXC_ERROR;

847: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
848: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
849: FND_MSG_PUB.ADD;
850: x_return_status := FND_API.G_RET_STS_ERROR;
851: RAISE FND_API.G_EXC_ERROR;
852: END IF;
853:
854: p_object_version_number := nvl(l_object_version_number, 1) + 1;
855:

Line 861: RAISE FND_API.G_EXC_ERROR;

857: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
858: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_ORIG_SYS_REFERENCES');
859: FND_MESSAGE.SET_TOKEN('VALUE', l_orig_system_ref_id);
860: FND_MSG_PUB.ADD;
861: RAISE FND_API.G_EXC_ERROR;
862: END;
863:
864: -- Bug 4206884: Raise an error if orig_system_reference of a purchased content source is updated
865: if p_orig_sys_reference_rec.orig_system_reference is not null and

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

862: END;
863:
864: -- Bug 4206884: Raise an error if orig_system_reference of a purchased content source is updated
865: if p_orig_sys_reference_rec.orig_system_reference is not null and
866: p_orig_sys_reference_rec.orig_system_reference <> fnd_api.g_miss_char and
867: p_orig_sys_reference_rec.orig_system_reference <> l_orig_system_reference
868: then
869: if HZ_UTILITY_V2PUB.is_purchased_content_source(l_orig_system) = 'Y'
870: then

Line 873: RAISE FND_API.G_EXC_ERROR;

869: if HZ_UTILITY_V2PUB.is_purchased_content_source(l_orig_system) = 'Y'
870: then
871: FND_MESSAGE.SET_NAME('AR', 'HZ_SSM_NO_UPDATE_PUR');
872: FND_MSG_PUB.ADD;
873: RAISE FND_API.G_EXC_ERROR;
874: end if;
875: end if;
876:
877: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

Line 877: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

873: RAISE FND_API.G_EXC_ERROR;
874: end if;
875: end if;
876:
877: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
878: then
879: -- call for validations.
880: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('U',
881: p_orig_sys_reference_rec,

Line 883: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

879: -- call for validations.
880: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('U',
881: p_orig_sys_reference_rec,
882: x_return_status);
883: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
884: RAISE FND_API.G_EXC_ERROR;
885: END IF;
886: end if;
887:

Line 884: RAISE FND_API.G_EXC_ERROR;

880: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYS_REFERENCE ('U',
881: p_orig_sys_reference_rec,
882: x_return_status);
883: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
884: RAISE FND_API.G_EXC_ERROR;
885: END IF;
886: end if;
887:
888: if (p_orig_sys_reference_rec.end_date_active is not null

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

885: END IF;
886: end if;
887:
888: if (p_orig_sys_reference_rec.end_date_active is not null
889: and p_orig_sys_reference_rec.end_date_active <>fnd_api.g_miss_date
890: and p_orig_sys_reference_rec.end_date_active <= sysdate)
891: then
892: p_orig_sys_reference_rec.status := 'I';
893: else p_orig_sys_reference_rec.status := 'A';

Line 1000: x_return_status := fnd_api.g_ret_sts_error;

996: fnd_message.set_token('FK', 'party_id');
997: fnd_message.set_token('COLUMN', 'party_id');
998: fnd_message.set_token('TABLE', 'hz_parties');
999: fnd_msg_pub.add;
1000: x_return_status := fnd_api.g_ret_sts_error;
1001:
1002: END;
1003:
1004: -- SYNC PARTY SITES

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

1054:
1055:
1056: /* Public API */
1057: PROCEDURE create_orig_system_reference(
1058: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1059: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1060: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1061: x_return_status OUT NOCOPY VARCHAR2,
1062: x_msg_count OUT NOCOPY NUMBER,

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

1055:
1056: /* Public API */
1057: PROCEDURE create_orig_system_reference(
1058: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1059: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1060: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1061: x_return_status OUT NOCOPY VARCHAR2,
1062: x_msg_count OUT NOCOPY NUMBER,
1063: x_msg_data OUT NOCOPY VARCHAR2

Line 1095: IF FND_API.to_Boolean(p_init_msg_list) THEN

1091: -- standard start of API savepoint
1092: SAVEPOINT create_orig_sys_reference;
1093:
1094: -- initialize message list if p_init_msg_list is set to TRUE.
1095: IF FND_API.to_Boolean(p_init_msg_list) THEN
1096: FND_MSG_PUB.initialize;
1097: END IF;
1098:
1099: -- initialize API return status to success.

Line 1100: x_return_status := FND_API.G_RET_STS_SUCCESS;

1096: FND_MSG_PUB.initialize;
1097: END IF;
1098:
1099: -- initialize API return status to success.
1100: x_return_status := FND_API.G_RET_STS_SUCCESS;
1101:
1102: -- call to business logic.
1103: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1104: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)

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

1100: x_return_status := FND_API.G_RET_STS_SUCCESS;
1101:
1102: -- call to business logic.
1103: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1104: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)
1105: then
1106: l_orig_sys_reference_rec.orig_system_reference :=l_orig_sys_reference_rec.old_orig_system_reference;
1107: l_orig_sys_reference_rec.status := 'I';
1108: l_orig_sys_reference_rec.end_date_active := SYSDATE;

Line 1136: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1132: if l_multi_osr_flag = 'N' then
1133: open get_orig_system_new;
1134: fetch get_orig_system_new into l_dummy ;
1135: if get_orig_system_new%FOUND then
1136: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1137: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1138: FND_MSG_PUB.ADD;
1139: x_return_status := FND_API.G_RET_STS_ERROR;
1140: end if;

Line 1139: x_return_status := FND_API.G_RET_STS_ERROR;

1135: if get_orig_system_new%FOUND then
1136: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1137: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1138: FND_MSG_PUB.ADD;
1139: x_return_status := FND_API.G_RET_STS_ERROR;
1140: end if;
1141: else
1142: --//logic for populating party_id
1143: get_party_id(l_orig_sys_reference_rec.owner_table_id,

Line 1174: p_encoded => FND_API.G_FALSE,

1170:
1171:
1172: -- standard call to get message count and if count is 1, get message info.
1173: FND_MSG_PUB.Count_And_Get(
1174: p_encoded => FND_API.G_FALSE,
1175: p_count => x_msg_count,
1176: p_data => x_msg_data);
1177:
1178: EXCEPTION

Line 1179: WHEN FND_API.G_EXC_ERROR THEN

1175: p_count => x_msg_count,
1176: p_data => x_msg_data);
1177:
1178: EXCEPTION
1179: WHEN FND_API.G_EXC_ERROR THEN
1180: ROLLBACK TO create_orig_sys_reference;
1181: x_return_status := FND_API.G_RET_STS_ERROR;
1182: FND_MSG_PUB.Count_And_Get(
1183: p_encoded => FND_API.G_FALSE,

Line 1181: x_return_status := FND_API.G_RET_STS_ERROR;

1177:
1178: EXCEPTION
1179: WHEN FND_API.G_EXC_ERROR THEN
1180: ROLLBACK TO create_orig_sys_reference;
1181: x_return_status := FND_API.G_RET_STS_ERROR;
1182: FND_MSG_PUB.Count_And_Get(
1183: p_encoded => FND_API.G_FALSE,
1184: p_count => x_msg_count,
1185: p_data => x_msg_data);

Line 1183: p_encoded => FND_API.G_FALSE,

1179: WHEN FND_API.G_EXC_ERROR THEN
1180: ROLLBACK TO create_orig_sys_reference;
1181: x_return_status := FND_API.G_RET_STS_ERROR;
1182: FND_MSG_PUB.Count_And_Get(
1183: p_encoded => FND_API.G_FALSE,
1184: p_count => x_msg_count,
1185: p_data => x_msg_data);
1186:
1187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1183: p_encoded => FND_API.G_FALSE,
1184: p_count => x_msg_count,
1185: p_data => x_msg_data);
1186:
1187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1188: ROLLBACK TO create_orig_sys_reference;
1189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1190: FND_MSG_PUB.Count_And_Get(
1191: p_encoded => FND_API.G_FALSE,

Line 1189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1185: p_data => x_msg_data);
1186:
1187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1188: ROLLBACK TO create_orig_sys_reference;
1189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1190: FND_MSG_PUB.Count_And_Get(
1191: p_encoded => FND_API.G_FALSE,
1192: p_count => x_msg_count,
1193: p_data => x_msg_data);

Line 1191: p_encoded => FND_API.G_FALSE,

1187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1188: ROLLBACK TO create_orig_sys_reference;
1189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1190: FND_MSG_PUB.Count_And_Get(
1191: p_encoded => FND_API.G_FALSE,
1192: p_count => x_msg_count,
1193: p_data => x_msg_data);
1194:
1195: WHEN OTHERS THEN

Line 1197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1193: p_data => x_msg_data);
1194:
1195: WHEN OTHERS THEN
1196: ROLLBACK TO create_orig_sys_reference;
1197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1198: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1199: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1200: FND_MSG_PUB.ADD;
1201: FND_MSG_PUB.Count_And_Get(

Line 1202: p_encoded => FND_API.G_FALSE,

1198: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1199: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1200: FND_MSG_PUB.ADD;
1201: FND_MSG_PUB.Count_And_Get(
1202: p_encoded => FND_API.G_FALSE,
1203: p_count => x_msg_count,
1204: p_data => x_msg_data);
1205:
1206: end create_orig_system_reference;

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

1227: end inactive_mosr_exist;
1228:
1229: /* Public API */
1230: PROCEDURE update_orig_system_reference(
1231: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1232: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1233: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1234: p_object_version_number IN OUT NOCOPY NUMBER,
1235: x_return_status OUT NOCOPY VARCHAR2,

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

1228:
1229: /* Public API */
1230: PROCEDURE update_orig_system_reference(
1231: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1232: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1233: p_orig_sys_reference_rec IN HZ_ORIG_SYSTEM_REF_PUB.ORIG_SYS_REFERENCE_REC_TYPE,
1234: p_object_version_number IN OUT NOCOPY NUMBER,
1235: x_return_status OUT NOCOPY VARCHAR2,
1236: x_msg_count OUT NOCOPY NUMBER,

Line 1273: IF FND_API.to_Boolean(p_init_msg_list) THEN

1269: -- standard start of API savepoint
1270: SAVEPOINT update_orig_sys_reference;
1271:
1272: -- initialize message list if p_init_msg_list is set to TRUE.
1273: IF FND_API.to_Boolean(p_init_msg_list) THEN
1274: FND_MSG_PUB.initialize;
1275: END IF;
1276:
1277: -- initialize API return status to success.

Line 1278: x_return_status := FND_API.G_RET_STS_SUCCESS;

1274: FND_MSG_PUB.initialize;
1275: END IF;
1276:
1277: -- initialize API return status to success.
1278: x_return_status := FND_API.G_RET_STS_SUCCESS;
1279:
1280: --raji
1281: -- //Phase 2 logic
1282:

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

1289: then
1290: l_orig_sys_reference_rec.old_orig_system_reference := null;
1291: end if;
1292: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1293: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)
1294: then
1295: l_orig_sys_reference_rec.orig_system_reference := p_orig_sys_reference_rec.old_orig_system_reference;
1296: else
1297: l_orig_sys_reference_rec.orig_system_reference :=p_orig_sys_reference_rec.orig_system_reference;

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

1310: fetch get_orig_system_new into l_dummy ;
1311: if get_orig_system_new%FOUND then
1312: if ((p_orig_sys_reference_rec.old_orig_system_reference <> p_orig_sys_reference_rec.orig_system_reference)
1313: and (p_orig_sys_reference_rec.old_orig_system_reference is not null)
1314: and (p_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)) then
1315: -- first make the old OSR inactive
1316: lc_orig_sys_reference_rec.orig_system_reference := p_orig_sys_reference_rec.old_orig_system_reference;
1317: lc_orig_sys_reference_rec.status := 'I';
1318: l_start_date_active := get_start_date_active(p_orig_sys_reference_rec.orig_system,

Line 1347: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1343: l_orig_sys_reference_rec,
1344: p_validation_level,
1345: x_return_status );
1346: else
1347: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1348: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1349: FND_MSG_PUB.ADD;
1350: x_return_status := FND_API.G_RET_STS_ERROR;
1351: end if;

Line 1350: x_return_status := FND_API.G_RET_STS_ERROR;

1346: else
1347: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1348: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1349: FND_MSG_PUB.ADD;
1350: x_return_status := FND_API.G_RET_STS_ERROR;
1351: end if;
1352: end if;
1353: else
1354: --//logic for populating party_id

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

1367: else -- l_multi_osr_flag = 'Y'
1368: -- //logic for populating party_id
1369: if ((p_orig_sys_reference_rec.old_orig_system_reference <> p_orig_sys_reference_rec.orig_system_reference)
1370: and (p_orig_sys_reference_rec.old_orig_system_reference is not null)
1371: and (p_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)) then
1372: -- first make the old OSR inactive
1373: lc_orig_sys_reference_rec.orig_system_reference := p_orig_sys_reference_rec.old_orig_system_reference;
1374: lc_orig_sys_reference_rec.status := 'I';
1375: l_start_date_active := get_start_date_active(p_orig_sys_reference_rec.orig_system,

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

1430: -- call to business logic.
1431:
1432:
1433: if (l_orig_sys_reference_rec.old_orig_system_reference is not null and
1434: l_orig_sys_reference_rec.old_orig_system_reference <> fnd_api.g_miss_char)
1435: -- if old OSR passed
1436: then
1437: l_orig_sys_reference_rec.orig_system_reference :=l_orig_sys_reference_rec.old_orig_system_reference;
1438: l_orig_sys_reference_rec.status := 'I';

Line 1462: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then

1458: if l_multi_osr_flag = 'N' then
1459: open get_orig_system_new;
1460: fetch get_orig_system_new into l_dummy ;
1461: if get_orig_system_new%FOUND then
1462: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1463: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1464: FND_MSG_PUB.ADD;
1465: x_return_status := FND_API.G_RET_STS_ERROR;
1466: end if;

Line 1465: x_return_status := FND_API.G_RET_STS_ERROR;

1461: if get_orig_system_new%FOUND then
1462: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then
1463: FND_MESSAGE.SET_NAME( 'AR', 'HZ_MOSR_NO_MULTIPLE_ALLOWED' );
1464: FND_MSG_PUB.ADD;
1465: x_return_status := FND_API.G_RET_STS_ERROR;
1466: end if;
1467: else
1468: --//logic for populating party_id
1469: get_party_id(l_orig_sys_reference_rec.owner_table_id,

Line 1530: p_encoded => FND_API.G_FALSE,

1526:
1527:
1528: -- standard call to get message count and if count is 1, get message info.
1529: FND_MSG_PUB.Count_And_Get(
1530: p_encoded => FND_API.G_FALSE,
1531: p_count => x_msg_count,
1532: p_data => x_msg_data);
1533:
1534: EXCEPTION

Line 1535: WHEN FND_API.G_EXC_ERROR THEN

1531: p_count => x_msg_count,
1532: p_data => x_msg_data);
1533:
1534: EXCEPTION
1535: WHEN FND_API.G_EXC_ERROR THEN
1536: ROLLBACK TO update_orig_sys_reference;
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: FND_MSG_PUB.Count_And_Get(
1539: p_encoded => FND_API.G_FALSE,

Line 1537: x_return_status := FND_API.G_RET_STS_ERROR;

1533:
1534: EXCEPTION
1535: WHEN FND_API.G_EXC_ERROR THEN
1536: ROLLBACK TO update_orig_sys_reference;
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: FND_MSG_PUB.Count_And_Get(
1539: p_encoded => FND_API.G_FALSE,
1540: p_count => x_msg_count,
1541: p_data => x_msg_data);

Line 1539: p_encoded => FND_API.G_FALSE,

1535: WHEN FND_API.G_EXC_ERROR THEN
1536: ROLLBACK TO update_orig_sys_reference;
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: FND_MSG_PUB.Count_And_Get(
1539: p_encoded => FND_API.G_FALSE,
1540: p_count => x_msg_count,
1541: p_data => x_msg_data);
1542:
1543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1539: p_encoded => FND_API.G_FALSE,
1540: p_count => x_msg_count,
1541: p_data => x_msg_data);
1542:
1543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1544: ROLLBACK TO update_orig_sys_reference;
1545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1546: FND_MSG_PUB.Count_And_Get(
1547: p_encoded => FND_API.G_FALSE,

Line 1545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1541: p_data => x_msg_data);
1542:
1543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1544: ROLLBACK TO update_orig_sys_reference;
1545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1546: FND_MSG_PUB.Count_And_Get(
1547: p_encoded => FND_API.G_FALSE,
1548: p_count => x_msg_count,
1549: p_data => x_msg_data);

Line 1547: p_encoded => FND_API.G_FALSE,

1543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1544: ROLLBACK TO update_orig_sys_reference;
1545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1546: FND_MSG_PUB.Count_And_Get(
1547: p_encoded => FND_API.G_FALSE,
1548: p_count => x_msg_count,
1549: p_data => x_msg_data);
1550:
1551: WHEN OTHERS THEN

Line 1553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1549: p_data => x_msg_data);
1550:
1551: WHEN OTHERS THEN
1552: ROLLBACK TO update_orig_sys_reference;
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(

Line 1558: p_encoded => FND_API.G_FALSE,

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,
1560: p_data => x_msg_data);
1561:
1562: end update_orig_system_reference;

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

1561:
1562: end update_orig_system_reference;
1563:
1564: PROCEDURE remap_internal_identifier(
1565: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1566: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1567: p_old_owner_table_id IN NUMBER,
1568: p_new_owner_table_id IN NUMBER,
1569: p_owner_table_name IN VARCHAR2,

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

1562: end update_orig_system_reference;
1563:
1564: PROCEDURE remap_internal_identifier(
1565: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1566: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1567: p_old_owner_table_id IN NUMBER,
1568: p_new_owner_table_id IN NUMBER,
1569: p_owner_table_name IN VARCHAR2,
1570: p_orig_system IN VARCHAR2,

Line 1634: x_return_status := FND_API.G_RET_STS_SUCCESS;

1630:
1631: begin
1632:
1633: --Initialize API return status to success.
1634: x_return_status := FND_API.G_RET_STS_SUCCESS;
1635:
1636: if p_orig_system is not null and p_orig_system_reference is not null
1637: then
1638:

Line 1657: FND_API.G_FALSE,

1653: l_orig_sys_reference_rec.end_date_active := SYSDATE;
1654: l_orig_sys_reference_rec.reason_code := p_reason_code;
1655:
1656: update_orig_system_reference(
1657: FND_API.G_FALSE,
1658: p_validation_level,
1659: l_orig_sys_reference_rec,
1660: l_object_version_number,
1661: x_return_status,

Line 1664: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1660: l_object_version_number,
1661: x_return_status,
1662: x_msg_count,
1663: x_msg_data);
1664: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;
1667: --raji
1668: -- //logic for populating party_id

Line 1665: RAISE FND_API.G_EXC_ERROR;

1661: x_return_status,
1662: x_msg_count,
1663: x_msg_data);
1664: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;
1667: --raji
1668: -- //logic for populating party_id
1669:

Line 1684: FND_API.G_FALSE,

1680: l_orig_sys_reference_rec.reason_code := p_reason_code;
1681: l_orig_sys_reference_rec.status := 'A';
1682: l_orig_sys_reference_rec.end_date_active := null;
1683: create_orig_system_reference(
1684: FND_API.G_FALSE,
1685: p_validation_level,
1686: l_orig_sys_reference_rec,
1687: x_return_status,
1688: x_msg_count,

Line 1690: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1686: l_orig_sys_reference_rec,
1687: x_return_status,
1688: x_msg_count,
1689: x_msg_data);
1690: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1691: RAISE FND_API.G_EXC_ERROR;
1692: END IF;
1693: else
1694: open get_orig_system_csr;

Line 1691: RAISE FND_API.G_EXC_ERROR;

1687: x_return_status,
1688: x_msg_count,
1689: x_msg_data);
1690: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1691: RAISE FND_API.G_EXC_ERROR;
1692: END IF;
1693: else
1694: open get_orig_system_csr;
1695: loop

Line 1705: get_orig_sys_reference_rec (FND_API.G_FALSE,

1701: -- table, should skip without error changed, this if is unnecessary*/
1702: -- //logic for populating party_id
1703:
1704: --10329486
1705: get_orig_sys_reference_rec (FND_API.G_FALSE,
1706: l_orig_system_ref_id,
1707: l_orig_sys_reference_rec,
1708: x_return_status,
1709: x_msg_count,

Line 1733: FND_API.G_FALSE,

1729: l_orig_sys_reference_rec.end_date_active := SYSDATE;
1730: l_orig_sys_reference_rec.reason_code := p_reason_code;
1731: l_orig_sys_reference_rec.orig_system_ref_id := l_orig_system_ref_id;
1732: update_orig_system_reference(
1733: FND_API.G_FALSE,
1734: p_validation_level,
1735: l_orig_sys_reference_rec,
1736: l_object_version_number,
1737: x_return_status,

Line 1740: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1736: l_object_version_number,
1737: x_return_status,
1738: x_msg_count,
1739: x_msg_data);
1740: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1741: RAISE FND_API.G_EXC_ERROR;
1742: END IF;
1743:
1744: if l_multi_osr_flag = 'Y' then

Line 1741: RAISE FND_API.G_EXC_ERROR;

1737: x_return_status,
1738: x_msg_count,
1739: x_msg_data);
1740: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1741: RAISE FND_API.G_EXC_ERROR;
1742: END IF;
1743:
1744: if l_multi_osr_flag = 'Y' then
1745: --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 1767: FND_API.G_FALSE,

1763: l_orig_sys_reference_rec.end_date_active := null;
1764: l_orig_sys_reference_rec.reason_code := p_reason_code;
1765: l_orig_sys_reference_rec.orig_system_ref_id := null;
1766: create_orig_system_reference(
1767: FND_API.G_FALSE,
1768: p_validation_level,
1769: l_orig_sys_reference_rec,
1770: x_return_status,
1771: x_msg_count,

Line 1773: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1769: l_orig_sys_reference_rec,
1770: x_return_status,
1771: x_msg_count,
1772: x_msg_data);
1773: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1774: RAISE FND_API.G_EXC_ERROR;
1775: END IF;
1776: end if;
1777: else --//l_multi_osr_flag = 'N'

Line 1774: RAISE FND_API.G_EXC_ERROR;

1770: x_return_status,
1771: x_msg_count,
1772: x_msg_data);
1773: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1774: RAISE FND_API.G_EXC_ERROR;
1775: END IF;
1776: end if;
1777: else --//l_multi_osr_flag = 'N'
1778: open get_orig_system_new;

Line 1797: FND_API.G_FALSE,

1793: l_orig_sys_reference_rec.end_date_active := null;
1794: l_orig_sys_reference_rec.reason_code := p_reason_code;
1795: l_orig_sys_reference_rec.orig_system_ref_id := null;
1796: create_orig_system_reference(
1797: FND_API.G_FALSE,
1798: p_validation_level,
1799: l_orig_sys_reference_rec,
1800: x_return_status,
1801: x_msg_count,

Line 1803: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1799: l_orig_sys_reference_rec,
1800: x_return_status,
1801: x_msg_count,
1802: x_msg_data);
1803: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1804: RAISE FND_API.G_EXC_ERROR;
1805: END IF;
1806:
1807: end if;

Line 1804: RAISE FND_API.G_EXC_ERROR;

1800: x_return_status,
1801: x_msg_count,
1802: x_msg_data);
1803: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1804: RAISE FND_API.G_EXC_ERROR;
1805: END IF;
1806:
1807: end if;
1808: close get_orig_system_new;

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

1809: end if; --//multi_osr_flag
1810: -- END IF;
1811: end loop;
1812: IF l_party_merge_flag = FALSE THEN /*Bug 3235877*/
1813: if p_validation_level = FND_API.G_VALID_LEVEL_FULL then--YES
1814: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
1815: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
1816: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
1817: FND_MSG_PUB.ADD;

Line 1818: x_return_status := FND_API.G_RET_STS_ERROR;

1814: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_DATA_FOUND');
1815: FND_MESSAGE.SET_TOKEN('COLUMN', 'orig_system+orig_system_reference+owner_table_id');
1816: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYS_REFERENCES');
1817: FND_MSG_PUB.ADD;
1818: x_return_status := FND_API.G_RET_STS_ERROR;
1819: end if;
1820: END IF;
1821: close get_orig_system_csr;
1822: end if;

Line 1824: WHEN FND_API.G_EXC_ERROR THEN

1820: END IF;
1821: close get_orig_system_csr;
1822: end if;
1823: EXCEPTION
1824: WHEN FND_API.G_EXC_ERROR THEN
1825: x_return_status := FND_API.G_RET_STS_ERROR;
1826:
1827: FND_MSG_PUB.Count_And_Get(
1828: p_encoded => FND_API.G_FALSE,

Line 1825: x_return_status := FND_API.G_RET_STS_ERROR;

1821: close get_orig_system_csr;
1822: end if;
1823: EXCEPTION
1824: WHEN FND_API.G_EXC_ERROR THEN
1825: x_return_status := FND_API.G_RET_STS_ERROR;
1826:
1827: FND_MSG_PUB.Count_And_Get(
1828: p_encoded => FND_API.G_FALSE,
1829: p_count => x_msg_count,

Line 1828: p_encoded => FND_API.G_FALSE,

1824: WHEN FND_API.G_EXC_ERROR THEN
1825: x_return_status := FND_API.G_RET_STS_ERROR;
1826:
1827: FND_MSG_PUB.Count_And_Get(
1828: p_encoded => FND_API.G_FALSE,
1829: p_count => x_msg_count,
1830: p_data => x_msg_data );
1831:
1832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1828: p_encoded => FND_API.G_FALSE,
1829: p_count => x_msg_count,
1830: p_data => x_msg_data );
1831:
1832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1834:
1835: FND_MSG_PUB.Count_And_Get(
1836: p_encoded => FND_API.G_FALSE,

Line 1833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1829: p_count => x_msg_count,
1830: p_data => x_msg_data );
1831:
1832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1834:
1835: FND_MSG_PUB.Count_And_Get(
1836: p_encoded => FND_API.G_FALSE,
1837: p_count => x_msg_count,

Line 1836: p_encoded => FND_API.G_FALSE,

1832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1834:
1835: FND_MSG_PUB.Count_And_Get(
1836: p_encoded => FND_API.G_FALSE,
1837: p_count => x_msg_count,
1838: p_data => x_msg_data );
1839:
1840: WHEN OTHERS THEN

Line 1841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1837: p_count => x_msg_count,
1838: p_data => x_msg_data );
1839:
1840: WHEN OTHERS THEN
1841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1842:
1843: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1844: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1845: FND_MSG_PUB.ADD;

Line 1848: p_encoded => FND_API.G_FALSE,

1844: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1845: FND_MSG_PUB.ADD;
1846:
1847: FND_MSG_PUB.Count_And_Get(
1848: p_encoded => FND_API.G_FALSE,
1849: p_count => x_msg_count,
1850: p_data => x_msg_data );
1851:
1852: end;

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

1852: end;
1853:
1854: /* not called anywhere currently */
1855: PROCEDURE create_mosr_for_merge(
1856: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1857: p_owner_table_name IN VARCHAR2,
1858: p_owner_table_id IN NUMBER,
1859: x_return_status OUT NOCOPY VARCHAR2,
1860: x_msg_count OUT NOCOPY NUMBER,

Line 1894: x_return_status := FND_API.G_RET_STS_SUCCESS;

1890:
1891: begin
1892:
1893: --Initialize API return status to success.
1894: x_return_status := FND_API.G_RET_STS_SUCCESS;
1895:
1896: open get_orig_system_csr;
1897: loop
1898: fetch get_orig_system_csr into l_orig_system, l_orig_system_reference,l_created_by_module;

Line 1921: FND_API.G_FALSE,

1917: l_orig_sys_reference_rec.owner_table_id := p_owner_table_id;
1918: l_orig_sys_reference_rec.reason_code := 'MERGED';
1919: l_orig_sys_reference_rec.created_by_module := l_created_by_module;
1920: create_orig_system_reference(
1921: FND_API.G_FALSE,
1922: FND_API.G_VALID_LEVEL_NONE,
1923: l_orig_sys_reference_rec,
1924: x_return_status,
1925: x_msg_count,

Line 1922: FND_API.G_VALID_LEVEL_NONE,

1918: l_orig_sys_reference_rec.reason_code := 'MERGED';
1919: l_orig_sys_reference_rec.created_by_module := l_created_by_module;
1920: create_orig_system_reference(
1921: FND_API.G_FALSE,
1922: FND_API.G_VALID_LEVEL_NONE,
1923: l_orig_sys_reference_rec,
1924: x_return_status,
1925: x_msg_count,
1926: x_msg_data);

Line 1927: IF x_return_status <> fnd_api.g_ret_sts_success THEN

1923: l_orig_sys_reference_rec,
1924: x_return_status,
1925: x_msg_count,
1926: x_msg_data);
1927: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1928: RAISE FND_API.G_EXC_ERROR;
1929: END IF;
1930: end if;
1931: end if;

Line 1928: RAISE FND_API.G_EXC_ERROR;

1924: x_return_status,
1925: x_msg_count,
1926: x_msg_data);
1927: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1928: RAISE FND_API.G_EXC_ERROR;
1929: END IF;
1930: end if;
1931: end if;
1932: end loop;

Line 1934: WHEN FND_API.G_EXC_ERROR THEN

1930: end if;
1931: end if;
1932: end loop;
1933: EXCEPTION
1934: WHEN FND_API.G_EXC_ERROR THEN
1935: x_return_status := FND_API.G_RET_STS_ERROR;
1936:
1937: FND_MSG_PUB.Count_And_Get(
1938: p_encoded => FND_API.G_FALSE,

Line 1935: x_return_status := FND_API.G_RET_STS_ERROR;

1931: end if;
1932: end loop;
1933: EXCEPTION
1934: WHEN FND_API.G_EXC_ERROR THEN
1935: x_return_status := FND_API.G_RET_STS_ERROR;
1936:
1937: FND_MSG_PUB.Count_And_Get(
1938: p_encoded => FND_API.G_FALSE,
1939: p_count => x_msg_count,

Line 1938: p_encoded => FND_API.G_FALSE,

1934: WHEN FND_API.G_EXC_ERROR THEN
1935: x_return_status := FND_API.G_RET_STS_ERROR;
1936:
1937: FND_MSG_PUB.Count_And_Get(
1938: p_encoded => FND_API.G_FALSE,
1939: p_count => x_msg_count,
1940: p_data => x_msg_data );
1941:
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1938: p_encoded => FND_API.G_FALSE,
1939: p_count => x_msg_count,
1940: p_data => x_msg_data );
1941:
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1944:
1945: FND_MSG_PUB.Count_And_Get(
1946: p_encoded => FND_API.G_FALSE,

Line 1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1939: p_count => x_msg_count,
1940: p_data => x_msg_data );
1941:
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1944:
1945: FND_MSG_PUB.Count_And_Get(
1946: p_encoded => FND_API.G_FALSE,
1947: p_count => x_msg_count,

Line 1946: p_encoded => FND_API.G_FALSE,

1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1944:
1945: FND_MSG_PUB.Count_And_Get(
1946: p_encoded => FND_API.G_FALSE,
1947: p_count => x_msg_count,
1948: p_data => x_msg_data );
1949:
1950: WHEN OTHERS THEN

Line 1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1947: p_count => x_msg_count,
1948: p_data => x_msg_data );
1949:
1950: WHEN OTHERS THEN
1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952:
1953: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1954: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1955: FND_MSG_PUB.ADD;

Line 1958: p_encoded => FND_API.G_FALSE,

1954: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1955: FND_MSG_PUB.ADD;
1956:
1957: FND_MSG_PUB.Count_And_Get(
1958: p_encoded => FND_API.G_FALSE,
1959: p_count => x_msg_count,
1960: p_data => x_msg_data );
1961:
1962: end create_mosr_for_merge;

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

2100:
2101:
2102: PROCEDURE do_create_orig_system(
2103: p_orig_sys_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PVT.ORIG_SYS_REC_TYPE,
2104: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2105: x_return_status IN OUT NOCOPY VARCHAR2
2106: ) is
2107: l_entity_name HZ_ENTITY_ATTRIBUTES.ENTITY_NAME%TYPE;
2108: l_attribute_name HZ_ENTITY_ATTRIBUTES.ATTRIBUTE_NAME%TYPE;

Line 2122: x_return_status := FND_API.G_RET_STS_SUCCESS;

2118: FROM HZ_ENTITY_ATTRIBUTES;
2119: begin
2120:
2121: --Initialize API return status to success.
2122: x_return_status := FND_API.G_RET_STS_SUCCESS;
2123:
2124: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
2125: then
2126: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',

Line 2124: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

2120:
2121: --Initialize API return status to success.
2122: x_return_status := FND_API.G_RET_STS_SUCCESS;
2123:
2124: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
2125: then
2126: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',
2127: p_orig_sys_rec,
2128: x_return_status);

Line 2129: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2125: then
2126: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',
2127: p_orig_sys_rec,
2128: x_return_status);
2129: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2130: RAISE FND_API.G_EXC_ERROR;
2131: END IF;
2132: end if;
2133:

Line 2130: RAISE FND_API.G_EXC_ERROR;

2126: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('C',
2127: p_orig_sys_rec,
2128: x_return_status);
2129: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2130: RAISE FND_API.G_EXC_ERROR;
2131: END IF;
2132: end if;
2133:
2134:

Line 2192: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2188: x_return_status => x_return_status,
2189: x_msg_count => x_msg_count,
2190: x_msg_data => x_msg_data);
2191:
2192: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2193: RAISE FND_API.G_EXC_ERROR;
2194: END IF;
2195:
2196: END LOOP;

Line 2193: RAISE FND_API.G_EXC_ERROR;

2189: x_msg_count => x_msg_count,
2190: x_msg_data => x_msg_data);
2191:
2192: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2193: RAISE FND_API.G_EXC_ERROR;
2194: END IF;
2195:
2196: END LOOP;
2197: CLOSE c_data_sources;

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

2201: end do_create_orig_system;
2202:
2203: PROCEDURE do_update_orig_system(
2204: p_orig_sys_rec IN OUT NOCOPY HZ_ORIG_SYSTEM_REF_PVT.ORIG_SYS_REC_TYPE,
2205: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2206: p_object_version_number IN OUT NOCOPY NUMBER,
2207: x_return_status IN OUT NOCOPY VARCHAR2
2208: ) is
2209: l_object_version_number NUMBER;

Line 2228: x_return_status := FND_API.G_RET_STS_SUCCESS;

2224:
2225: begin
2226:
2227: --Initialize API return status to success.
2228: x_return_status := FND_API.G_RET_STS_SUCCESS;
2229:
2230: -- check whether record has been updated by another user. If not, lock it.
2231:
2232: BEGIN

Line 2246: x_return_status := FND_API.G_RET_STS_ERROR;

2242: THEN
2243: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
2244: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYSTEMS_B');
2245: FND_MSG_PUB.ADD;
2246: x_return_status := FND_API.G_RET_STS_ERROR;
2247: RAISE FND_API.G_EXC_ERROR;
2248: END IF;
2249:
2250: p_object_version_number := nvl(l_object_version_number, 1) + 1;

Line 2247: RAISE FND_API.G_EXC_ERROR;

2243: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
2244: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_ORIG_SYSTEMS_B');
2245: FND_MSG_PUB.ADD;
2246: x_return_status := FND_API.G_RET_STS_ERROR;
2247: RAISE FND_API.G_EXC_ERROR;
2248: END IF;
2249:
2250: p_object_version_number := nvl(l_object_version_number, 1) + 1;
2251:

Line 2257: RAISE FND_API.G_EXC_ERROR;

2253: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
2254: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_ORIG_SYSTEMS_B');
2255: FND_MESSAGE.SET_TOKEN('VALUE', p_orig_sys_rec.orig_system_id);
2256: FND_MSG_PUB.ADD;
2257: RAISE FND_API.G_EXC_ERROR;
2258: END;
2259:
2260:
2261: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

Line 2261: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

2257: RAISE FND_API.G_EXC_ERROR;
2258: END;
2259:
2260:
2261: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
2262: then
2263: -- call for validations.
2264: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('U',
2265: p_orig_sys_rec,

Line 2267: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2263: -- call for validations.
2264: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('U',
2265: p_orig_sys_rec,
2266: x_return_status);
2267: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2268: RAISE FND_API.G_EXC_ERROR;
2269: END IF;
2270: end if;
2271:

Line 2268: RAISE FND_API.G_EXC_ERROR;

2264: HZ_MOSR_VALIDATE_PKG.VALIDATE_ORIG_SYSTEM ('U',
2265: p_orig_sys_rec,
2266: x_return_status);
2267: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2268: RAISE FND_API.G_EXC_ERROR;
2269: END IF;
2270: end if;
2271:
2272: -- call table handler

Line 2331: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2327: x_return_status => x_return_status,
2328: x_msg_count => x_msg_count,
2329: x_msg_data => x_msg_data);
2330:
2331: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2332: RAISE FND_API.G_EXC_ERROR;
2333: END IF;
2334:
2335: END LOOP;

Line 2332: RAISE FND_API.G_EXC_ERROR;

2328: x_msg_count => x_msg_count,
2329: x_msg_data => x_msg_data);
2330:
2331: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2332: RAISE FND_API.G_EXC_ERROR;
2333: END IF;
2334:
2335: END LOOP;
2336: CLOSE c_data_sources;

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

2338: END IF;
2339: end do_update_orig_system;
2340:
2341: PROCEDURE create_orig_system(
2342: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2343: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2344: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2345: x_return_status OUT NOCOPY VARCHAR2,
2346: x_msg_count OUT NOCOPY NUMBER,

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

2339: end do_update_orig_system;
2340:
2341: PROCEDURE create_orig_system(
2342: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2343: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2344: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2345: x_return_status OUT NOCOPY VARCHAR2,
2346: x_msg_count OUT NOCOPY NUMBER,
2347: x_msg_data OUT NOCOPY VARCHAR2

Line 2356: IF FND_API.to_Boolean(p_init_msg_list) THEN

2352: -- standard start of API savepoint
2353: SAVEPOINT create_orig_system;
2354:
2355: -- initialize message list if p_init_msg_list is set to TRUE.
2356: IF FND_API.to_Boolean(p_init_msg_list) THEN
2357: FND_MSG_PUB.initialize;
2358: END IF;
2359:
2360: -- initialize API return status to success.

Line 2361: x_return_status := FND_API.G_RET_STS_SUCCESS;

2357: FND_MSG_PUB.initialize;
2358: END IF;
2359:
2360: -- initialize API return status to success.
2361: x_return_status := FND_API.G_RET_STS_SUCCESS;
2362:
2363: -- call to business logic.
2364: do_create_orig_system(
2365: l_orig_sys_rec,

Line 2372: p_encoded => FND_API.G_FALSE,

2368:
2369:
2370: -- standard call to get message count and if count is 1, get message info.
2371: FND_MSG_PUB.Count_And_Get(
2372: p_encoded => FND_API.G_FALSE,
2373: p_count => x_msg_count,
2374: p_data => x_msg_data);
2375:
2376: EXCEPTION

Line 2377: WHEN FND_API.G_EXC_ERROR THEN

2373: p_count => x_msg_count,
2374: p_data => x_msg_data);
2375:
2376: EXCEPTION
2377: WHEN FND_API.G_EXC_ERROR THEN
2378: ROLLBACK TO create_orig_system;
2379: x_return_status := FND_API.G_RET_STS_ERROR;
2380: FND_MSG_PUB.Count_And_Get(
2381: p_encoded => FND_API.G_FALSE,

Line 2379: x_return_status := FND_API.G_RET_STS_ERROR;

2375:
2376: EXCEPTION
2377: WHEN FND_API.G_EXC_ERROR THEN
2378: ROLLBACK TO create_orig_system;
2379: x_return_status := FND_API.G_RET_STS_ERROR;
2380: FND_MSG_PUB.Count_And_Get(
2381: p_encoded => FND_API.G_FALSE,
2382: p_count => x_msg_count,
2383: p_data => x_msg_data);

Line 2381: p_encoded => FND_API.G_FALSE,

2377: WHEN FND_API.G_EXC_ERROR THEN
2378: ROLLBACK TO create_orig_system;
2379: x_return_status := FND_API.G_RET_STS_ERROR;
2380: FND_MSG_PUB.Count_And_Get(
2381: p_encoded => FND_API.G_FALSE,
2382: p_count => x_msg_count,
2383: p_data => x_msg_data);
2384:
2385: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2385: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2381: p_encoded => FND_API.G_FALSE,
2382: p_count => x_msg_count,
2383: p_data => x_msg_data);
2384:
2385: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2386: ROLLBACK TO create_orig_system;
2387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2388: FND_MSG_PUB.Count_And_Get(
2389: p_encoded => FND_API.G_FALSE,

Line 2387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2383: p_data => x_msg_data);
2384:
2385: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2386: ROLLBACK TO create_orig_system;
2387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2388: FND_MSG_PUB.Count_And_Get(
2389: p_encoded => FND_API.G_FALSE,
2390: p_count => x_msg_count,
2391: p_data => x_msg_data);

Line 2389: p_encoded => FND_API.G_FALSE,

2385: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2386: ROLLBACK TO create_orig_system;
2387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2388: FND_MSG_PUB.Count_And_Get(
2389: p_encoded => FND_API.G_FALSE,
2390: p_count => x_msg_count,
2391: p_data => x_msg_data);
2392:
2393: WHEN OTHERS THEN

Line 2395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2391: p_data => x_msg_data);
2392:
2393: WHEN OTHERS THEN
2394: ROLLBACK TO create_orig_system;
2395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2396: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2397: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2398: FND_MSG_PUB.ADD;
2399: FND_MSG_PUB.Count_And_Get(

Line 2400: p_encoded => FND_API.G_FALSE,

2396: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2397: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2398: FND_MSG_PUB.ADD;
2399: FND_MSG_PUB.Count_And_Get(
2400: p_encoded => FND_API.G_FALSE,
2401: p_count => x_msg_count,
2402: p_data => x_msg_data);
2403: end create_orig_system;
2404:

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

2402: p_data => x_msg_data);
2403: end create_orig_system;
2404:
2405: PROCEDURE update_orig_system(
2406: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2407: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2408: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2409: p_object_version_number IN OUT NOCOPY NUMBER,
2410: x_return_status OUT NOCOPY VARCHAR2,

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

2403: end create_orig_system;
2404:
2405: PROCEDURE update_orig_system(
2406: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2407: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2408: p_orig_sys_rec IN ORIG_SYS_REC_TYPE,
2409: p_object_version_number IN OUT NOCOPY NUMBER,
2410: x_return_status OUT NOCOPY VARCHAR2,
2411: x_msg_count OUT NOCOPY NUMBER,

Line 2422: IF FND_API.to_Boolean(p_init_msg_list) THEN

2418: -- standard start of API savepoint
2419: SAVEPOINT update_orig_system;
2420:
2421: -- initialize message list if p_init_msg_list is set to TRUE.
2422: IF FND_API.to_Boolean(p_init_msg_list) THEN
2423: FND_MSG_PUB.initialize;
2424: END IF;
2425:
2426: -- initialize API return status to success.

Line 2427: x_return_status := FND_API.G_RET_STS_SUCCESS;

2423: FND_MSG_PUB.initialize;
2424: END IF;
2425:
2426: -- initialize API return status to success.
2427: x_return_status := FND_API.G_RET_STS_SUCCESS;
2428:
2429: -- call to business logic.
2430: do_update_orig_system(
2431: l_orig_sys_rec,

Line 2439: p_encoded => FND_API.G_FALSE,

2435:
2436:
2437: -- standard call to get message count and if count is 1, get message info.
2438: FND_MSG_PUB.Count_And_Get(
2439: p_encoded => FND_API.G_FALSE,
2440: p_count => x_msg_count,
2441: p_data => x_msg_data);
2442:
2443: EXCEPTION

Line 2444: WHEN FND_API.G_EXC_ERROR THEN

2440: p_count => x_msg_count,
2441: p_data => x_msg_data);
2442:
2443: EXCEPTION
2444: WHEN FND_API.G_EXC_ERROR THEN
2445: ROLLBACK TO update_orig_system;
2446: x_return_status := FND_API.G_RET_STS_ERROR;
2447: FND_MSG_PUB.Count_And_Get(
2448: p_encoded => FND_API.G_FALSE,

Line 2446: x_return_status := FND_API.G_RET_STS_ERROR;

2442:
2443: EXCEPTION
2444: WHEN FND_API.G_EXC_ERROR THEN
2445: ROLLBACK TO update_orig_system;
2446: x_return_status := FND_API.G_RET_STS_ERROR;
2447: FND_MSG_PUB.Count_And_Get(
2448: p_encoded => FND_API.G_FALSE,
2449: p_count => x_msg_count,
2450: p_data => x_msg_data);

Line 2448: p_encoded => FND_API.G_FALSE,

2444: WHEN FND_API.G_EXC_ERROR THEN
2445: ROLLBACK TO update_orig_system;
2446: x_return_status := FND_API.G_RET_STS_ERROR;
2447: FND_MSG_PUB.Count_And_Get(
2448: p_encoded => FND_API.G_FALSE,
2449: p_count => x_msg_count,
2450: p_data => x_msg_data);
2451:
2452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2448: p_encoded => FND_API.G_FALSE,
2449: p_count => x_msg_count,
2450: p_data => x_msg_data);
2451:
2452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2453: ROLLBACK TO update_orig_system;
2454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2455: FND_MSG_PUB.Count_And_Get(
2456: p_encoded => FND_API.G_FALSE,

Line 2454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2450: p_data => x_msg_data);
2451:
2452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2453: ROLLBACK TO update_orig_system;
2454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2455: FND_MSG_PUB.Count_And_Get(
2456: p_encoded => FND_API.G_FALSE,
2457: p_count => x_msg_count,
2458: p_data => x_msg_data);

Line 2456: p_encoded => FND_API.G_FALSE,

2452: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2453: ROLLBACK TO update_orig_system;
2454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2455: FND_MSG_PUB.Count_And_Get(
2456: p_encoded => FND_API.G_FALSE,
2457: p_count => x_msg_count,
2458: p_data => x_msg_data);
2459:
2460: WHEN OTHERS THEN

Line 2462: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2458: p_data => x_msg_data);
2459:
2460: WHEN OTHERS THEN
2461: ROLLBACK TO update_orig_system;
2462: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2463: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2464: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2465: FND_MSG_PUB.ADD;
2466: FND_MSG_PUB.Count_And_Get(

Line 2467: p_encoded => FND_API.G_FALSE,

2463: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2464: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2465: FND_MSG_PUB.ADD;
2466: FND_MSG_PUB.Count_And_Get(
2467: p_encoded => FND_API.G_FALSE,
2468: p_count => x_msg_count,
2469: p_data => x_msg_data);
2470: end update_orig_system;
2471: