17:
18:
19: PROCEDURE UPLOAD_ITEM
20: (p_api_version IN NUMBER := 1.0,
21: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
22: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
23: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
24: x_return_status OUT NOCOPY VARCHAR2 ,
25: x_msg_count OUT NOCOPY NUMBER ,
18:
19: PROCEDURE UPLOAD_ITEM
20: (p_api_version IN NUMBER := 1.0,
21: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
22: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
23: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
24: x_return_status OUT NOCOPY VARCHAR2 ,
25: x_msg_count OUT NOCOPY NUMBER ,
26: x_msg_data OUT NOCOPY VARCHAR2,
19: PROCEDURE UPLOAD_ITEM
20: (p_api_version IN NUMBER := 1.0,
21: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
22: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
23: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
24: x_return_status OUT NOCOPY VARCHAR2 ,
25: x_msg_count OUT NOCOPY NUMBER ,
26: x_msg_data OUT NOCOPY VARCHAR2,
27: p_x_ahl_fileupload_rec IN OUT NOCOPY ahl_fileupload_rec
31:
32:
33: l_api_name CONSTANT VARCHAR2(30) := 'UPLOAD_ITEM';
34: l_api_version CONSTANT NUMBER := 1.0;
35: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
36: l_msg_count NUMBER;
37: l_msg_data VARCHAR2(2000);
38: l_return_status VARCHAR2(1);
39: l_rowid VARCHAR2(30);
77: END IF;
78:
79:
80: -- Standard call to check for call compatibility.
81: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
82: p_api_version,
83: l_api_name,G_PKG_NAME)
84: THEN
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
81: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
82: p_api_version,
83: l_api_name,G_PKG_NAME)
84: THEN
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_boolean(l_init_msg_list)
89: THEN
84: THEN
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_boolean(l_init_msg_list)
89: THEN
90: FND_MSG_PUB.initialize;
91: END IF;
92:
90: FND_MSG_PUB.initialize;
91: END IF;
92:
93: -- Initialize API return status to success
94: x_return_status := FND_API.G_RET_STS_SUCCESS;
95:
96: --Start of API body
97:
98: --Validations
114: AHL_DEBUG_PUB.debug( 'ERROR: AHL_DI_DOC REV ID:'||p_x_ahl_fileupload_rec.p_revision_id||': invalid');
115:
116:
117: END IF;
118: x_return_status := FND_API.G_RET_STS_ERROR;
119: WHEN OTHERS THEN
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
121: RAISE;
122: END;
116:
117: END IF;
118: x_return_status := FND_API.G_RET_STS_ERROR;
119: WHEN OTHERS THEN
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
121: RAISE;
122: END;
123: ELSE
124: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_REV_ID_NULL');
126: IF G_DEBUG='Y' THEN
127: AHL_DEBUG_PUB.debug( 'ERROR: AHL_DI_DOC REV null');
128:
129: END IF;
130: x_return_status := FND_API.G_RET_STS_ERROR;
131: END IF;
132:
133:
134:
145: WHEN no_data_found THEN
146: IF G_DEBUG='Y' THEN
147: AHL_DEBUG_PUB.debug( 'ERROR: AHL_DI_ATTACH_FILE_NOT_EXISTS');
148: END IF;
149: x_return_status := FND_API.G_RET_STS_ERROR;
150: WHEN OTHERS THEN
151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
152: RAISE;
153: END;
147: AHL_DEBUG_PUB.debug( 'ERROR: AHL_DI_ATTACH_FILE_NOT_EXISTS');
148: END IF;
149: x_return_status := FND_API.G_RET_STS_ERROR;
150: WHEN OTHERS THEN
151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
152: RAISE;
153: END;
154: ELSE
155: IF G_DEBUG='Y' THEN
154: ELSE
155: IF G_DEBUG='Y' THEN
156: AHL_DEBUG_PUB.debug( 'ERROR: AHL_DI_ATTACH_FILE IS Null');
157: END IF;
158: x_return_status := FND_API.G_RET_STS_ERROR;
159: END IF;
160:
161:
162: -- check if association exists
182: then
183: DELETE_ITEM
184: (
185: p_api_version => 1.0,
186: p_init_msg_list => FND_API.G_FALSE,
187: p_commit => FND_API.G_FALSE,
188: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
189: x_return_status => l_return_status,
190: x_msg_count => l_msg_count,
183: DELETE_ITEM
184: (
185: p_api_version => 1.0,
186: p_init_msg_list => FND_API.G_FALSE,
187: p_commit => FND_API.G_FALSE,
188: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
189: x_return_status => l_return_status,
190: x_msg_count => l_msg_count,
191: x_msg_data => l_msg_data,
184: (
185: p_api_version => 1.0,
186: p_init_msg_list => FND_API.G_FALSE,
187: p_commit => FND_API.G_FALSE,
188: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
189: x_return_status => l_return_status,
190: x_msg_count => l_msg_count,
191: x_msg_data => l_msg_data,
192: p_x_ahl_fileupload_rec => p_x_ahl_fileupload_rec
245:
246:
247:
248: --Standard check for commit
249: IF FND_API.TO_BOOLEAN(p_commit) THEN
250: COMMIT;
251: END IF;
252: -- Debug info
253: IF G_DEBUG='Y' THEN
261:
262: END IF;
263:
264: EXCEPTION
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO UPLOAD_ITEM;
267: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
268: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
269: p_count => x_msg_count,
263:
264: EXCEPTION
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO UPLOAD_ITEM;
267: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
268: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
269: p_count => x_msg_count,
270: p_data => x_msg_data);
271: IF G_DEBUG='Y' THEN
264: EXCEPTION
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO UPLOAD_ITEM;
267: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
268: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
269: p_count => x_msg_count,
270: p_data => x_msg_data);
271: IF G_DEBUG='Y' THEN
272: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );
276: AHL_DEBUG_PUB.disable_debug;
277:
278: END IF;
279:
280: WHEN FND_API.G_EXC_ERROR THEN
281: ROLLBACK TO UPLOAD_ITEM;
282: X_return_status := FND_API.G_RET_STS_ERROR;
283: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
284: p_count => x_msg_count,
278: END IF;
279:
280: WHEN FND_API.G_EXC_ERROR THEN
281: ROLLBACK TO UPLOAD_ITEM;
282: X_return_status := FND_API.G_RET_STS_ERROR;
283: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
284: p_count => x_msg_count,
285: p_data => X_msg_data);
286: -- Debug info.
279:
280: WHEN FND_API.G_EXC_ERROR THEN
281: ROLLBACK TO UPLOAD_ITEM;
282: X_return_status := FND_API.G_RET_STS_ERROR;
283: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
284: p_count => x_msg_count,
285: p_data => X_msg_data);
286: -- Debug info.
287: IF G_DEBUG='Y' THEN
294: END IF;
295:
296: WHEN OTHERS THEN
297: ROLLBACK TO UPLOAD_ITEM;
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
300: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
301: p_procedure_name => l_api_name,
302: p_error_text => SUBSTR(SQLERRM,1,240));
300: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
301: p_procedure_name => l_api_name,
302: p_error_text => SUBSTR(SQLERRM,1,240));
303: END IF;
304: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
305: p_count => x_msg_count,
306: p_data => x_msg_data);
307:
308: -- Debug info.
320:
321: PROCEDURE DELETE_ITEM
322: (
323: p_api_version IN NUMBER := 1.0 ,
324: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
325: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
326: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
327: x_return_status OUT NOCOPY VARCHAR2,
328: x_msg_count OUT NOCOPY NUMBER,
321: PROCEDURE DELETE_ITEM
322: (
323: p_api_version IN NUMBER := 1.0 ,
324: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
325: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
326: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
327: x_return_status OUT NOCOPY VARCHAR2,
328: x_msg_count OUT NOCOPY NUMBER,
329: x_msg_data OUT NOCOPY VARCHAR2,
322: (
323: p_api_version IN NUMBER := 1.0 ,
324: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
325: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
326: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
327: x_return_status OUT NOCOPY VARCHAR2,
328: x_msg_count OUT NOCOPY NUMBER,
329: x_msg_data OUT NOCOPY VARCHAR2,
330: p_x_ahl_fileupload_rec IN ahl_fileupload_rec
333: IS
334:
335: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_ITEM';
336: l_api_version CONSTANT NUMBER := 1.0;
337: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
338: l_msg_count NUMBER;
339: l_msg_data VARCHAR2(2000);
340: l_return_status VARCHAR2(1);
341:
363: END IF;
364:
365:
366: -- Standard call to check for call compatibility.
367: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
368: p_api_version,
369: l_api_name,G_PKG_NAME) THEN
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: END IF;
366: -- Standard call to check for call compatibility.
367: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
368: p_api_version,
369: l_api_name,G_PKG_NAME) THEN
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: END IF;
372: -- Initialize message list if p_init_msg_list is set to TRUE.
373: IF FND_API.to_boolean(l_init_msg_list) THEN
374: FND_MSG_PUB.initialize;
369: l_api_name,G_PKG_NAME) THEN
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: END IF;
372: -- Initialize message list if p_init_msg_list is set to TRUE.
373: IF FND_API.to_boolean(l_init_msg_list) THEN
374: FND_MSG_PUB.initialize;
375: END IF;
376:
377: -- Initialize API return status to success
374: FND_MSG_PUB.initialize;
375: END IF;
376:
377: -- Initialize API return status to success
378: x_return_status := FND_API.G_RET_STS_SUCCESS;
379:
380: --Start of API body
381:
382: --Validations
403:
404: END IF;
405: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_REV_ID_INVALID');
406: FND_MSG_PUB.ADD;
407: x_return_status := FND_API.G_RET_STS_ERROR;
408: WHEN OTHERS THEN
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
410: RAISE;
411: END;
405: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_REV_ID_INVALID');
406: FND_MSG_PUB.ADD;
407: x_return_status := FND_API.G_RET_STS_ERROR;
408: WHEN OTHERS THEN
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
410: RAISE;
411: END;
412: ELSE
413: IF G_DEBUG='Y' THEN
416:
417: END IF;
418: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_REV_ID_INVALID');
419: FND_MSG_PUB.ADD;
420: x_return_status := FND_API.G_RET_STS_ERROR;
421: END IF;
422:
423:
424: --Validate if file exists in FND_LOBS
435: AHL_DEBUG_PUB.debug( 'ERROR: AHL_DI_ATTACH_FILE_NOT_EXISTS');
436:
437:
438: END IF;
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: WHEN OTHERS THEN
441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
442: RAISE;
443: END;
437:
438: END IF;
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: WHEN OTHERS THEN
441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
442: RAISE;
443: END;
444: ELSE
445: IF G_DEBUG='Y' THEN
446: AHL_DEBUG_PUB.debug( 'ERROR: AHL_DI_ATTACH_FILE IS Null');
447:
448:
449: END IF;
450: x_return_status := FND_API.G_RET_STS_ERROR;
451: END IF;
452:
453:
454: -- Validate if association exists and retrieve the association id to be deleted.
472: IF(l_assoc_id = 0)THEN
473:
474: FND_MESSAGE.SET_NAME('AHL','AHL_DI_DOC_FILE_ASSOC_INVALID');
475: FND_MSG_PUB.ADD;
476: x_return_status := FND_API.G_RET_STS_ERROR;
477:
478: IF G_DEBUG='Y' THEN
479: AHL_DEBUG_PUB.debug( 'ERROR: the file association to be deleted is not found ');
480: END IF;
492:
493: );
494:
495:
496: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
493: );
494:
495:
496: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
494:
495:
496: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
502: IF FND_API.TO_BOOLEAN(p_commit) THEN
495:
496: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
502: IF FND_API.TO_BOOLEAN(p_commit) THEN
503: COMMIT;
498: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
502: IF FND_API.TO_BOOLEAN(p_commit) THEN
503: COMMIT;
504: END IF;
505:
506: -- Debug info.
508: AHL_DEBUG_PUB.debug( 'exit private AHL_DI_FILEUPLOAD_PVT.DELETE_ITEM');
509: END IF;
510:
511: EXCEPTION
512: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
513: ROLLBACK TO Delete_Item;
514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
515: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
516: p_count => x_msg_count,
510:
511: EXCEPTION
512: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
513: ROLLBACK TO Delete_Item;
514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
515: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
516: p_count => x_msg_count,
517: p_data => x_msg_data);
518: IF G_DEBUG='Y' THEN
511: EXCEPTION
512: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
513: ROLLBACK TO Delete_Item;
514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
515: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
516: p_count => x_msg_count,
517: p_data => x_msg_data);
518: IF G_DEBUG='Y' THEN
519: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );
524: AHL_DEBUG_PUB.disable_debug;
525:
526: END IF;
527:
528: WHEN FND_API.G_EXC_ERROR THEN
529: ROLLBACK TO Delete_Item;
530: X_return_status := FND_API.G_RET_STS_ERROR;
531: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
532: p_count => x_msg_count,
526: END IF;
527:
528: WHEN FND_API.G_EXC_ERROR THEN
529: ROLLBACK TO Delete_Item;
530: X_return_status := FND_API.G_RET_STS_ERROR;
531: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
532: p_count => x_msg_count,
533: p_data => X_msg_data);
534: -- Debug info.
527:
528: WHEN FND_API.G_EXC_ERROR THEN
529: ROLLBACK TO Delete_Item;
530: X_return_status := FND_API.G_RET_STS_ERROR;
531: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
532: p_count => x_msg_count,
533: p_data => X_msg_data);
534: -- Debug info.
535: IF G_DEBUG='Y' THEN
543: END IF;
544:
545: WHEN OTHERS THEN
546: ROLLBACK TO Delete_Item;
547: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
548: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
549: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
550: p_procedure_name => l_api_name,
551: p_error_text => SUBSTR(SQLERRM,1,240));
549: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
550: p_procedure_name => l_api_name,
551: p_error_text => SUBSTR(SQLERRM,1,240));
552: END IF;
553: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
554: p_count => x_msg_count,
555: p_data => x_msg_data);
556:
557: -- Debug info.
570:
571:
572: PROCEDURE PROCESS_ITEM
573: (p_api_version IN NUMBER DEFAULT 1.0,
574: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
575: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
576: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
577: x_return_status OUT NOCOPY VARCHAR2 ,
578: x_msg_count OUT NOCOPY NUMBER ,
571:
572: PROCEDURE PROCESS_ITEM
573: (p_api_version IN NUMBER DEFAULT 1.0,
574: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
575: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
576: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
577: x_return_status OUT NOCOPY VARCHAR2 ,
578: x_msg_count OUT NOCOPY NUMBER ,
579: x_msg_data OUT NOCOPY VARCHAR2,
572: PROCEDURE PROCESS_ITEM
573: (p_api_version IN NUMBER DEFAULT 1.0,
574: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_TRUE,
575: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
576: p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL,
577: x_return_status OUT NOCOPY VARCHAR2 ,
578: x_msg_count OUT NOCOPY NUMBER ,
579: x_msg_data OUT NOCOPY VARCHAR2,
580: p_x_ahl_fileupload_rec IN OUT NOCOPY ahl_fileupload_rec,
585:
586: l_ahl_fileupload_rec ahl_fileupload_rec;
587: l_api_name CONSTANT VARCHAR2(30) := 'PROCESS_ITEM';
588: l_api_version CONSTANT NUMBER := 1.0;
589: l_init_msg_list VARCHAR2(10) := FND_API.G_TRUE;
590:
591: BEGIN
592: -- Standard Start of API savepoint
593: SAVEPOINT process_item;
603: END IF;
604:
605:
606: -- Standard call to check for call compatibility.
607: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
608: p_api_version,
609: l_api_name,G_PKG_NAME)
610: THEN
611: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
607: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
608: p_api_version,
609: l_api_name,G_PKG_NAME)
610: THEN
611: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
612: END IF;
613: -- Initialize message list if p_init_msg_list is set to TRUE.
614: IF FND_API.to_boolean(l_init_msg_list)
615: THEN
610: THEN
611: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
612: END IF;
613: -- Initialize message list if p_init_msg_list is set to TRUE.
614: IF FND_API.to_boolean(l_init_msg_list)
615: THEN
616: FND_MSG_PUB.initialize;
617: END IF;
618:
616: FND_MSG_PUB.initialize;
617: END IF;
618:
619: -- Initialize API return status to success
620: x_return_status := FND_API.G_RET_STS_SUCCESS;
621:
622: --Start of API body
623:
624: IF ( p_delete_flag ='Y') THEN
625:
626: DELETE_ITEM
627: (
628: p_api_version => 1.0,
629: p_init_msg_list => FND_API.G_FALSE,
630: p_commit => FND_API.G_FALSE,
631: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
632: x_return_status => x_return_status,
633: x_msg_count => x_msg_count,
626: DELETE_ITEM
627: (
628: p_api_version => 1.0,
629: p_init_msg_list => FND_API.G_FALSE,
630: p_commit => FND_API.G_FALSE,
631: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
632: x_return_status => x_return_status,
633: x_msg_count => x_msg_count,
634: x_msg_data => x_msg_data,
627: (
628: p_api_version => 1.0,
629: p_init_msg_list => FND_API.G_FALSE,
630: p_commit => FND_API.G_FALSE,
631: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
632: x_return_status => x_return_status,
633: x_msg_count => x_msg_count,
634: x_msg_data => x_msg_data,
635: p_x_ahl_fileupload_rec => p_x_ahl_fileupload_rec
638: ELSIF ( p_delete_flag = 'N') THEN
639: UPLOAD_ITEM
640: (
641: p_api_version => 1.0,
642: p_init_msg_list => FND_API.G_TRUE,
643: p_commit => FND_API.G_FALSE,
644: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
645: x_return_status => x_return_status,
646: x_msg_count => x_msg_count,
639: UPLOAD_ITEM
640: (
641: p_api_version => 1.0,
642: p_init_msg_list => FND_API.G_TRUE,
643: p_commit => FND_API.G_FALSE,
644: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
645: x_return_status => x_return_status,
646: x_msg_count => x_msg_count,
647: x_msg_data => x_msg_data,
640: (
641: p_api_version => 1.0,
642: p_init_msg_list => FND_API.G_TRUE,
643: p_commit => FND_API.G_FALSE,
644: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
645: x_return_status => x_return_status,
646: x_msg_count => x_msg_count,
647: x_msg_data => x_msg_data,
648: p_x_ahl_fileupload_rec => p_x_ahl_fileupload_rec
648: p_x_ahl_fileupload_rec => p_x_ahl_fileupload_rec
649: );
650:
651: ELSE
652: RAISE FND_API.G_EXC_ERROR;
653: END IF;
654:
655: IF G_DEBUG='Y' THEN
656: AHL_DEBUG_PUB.debug( 'exit private AHL_DI_FILEUPLOAD_PVT.PROCESS_ITEM');
655: IF G_DEBUG='Y' THEN
656: AHL_DEBUG_PUB.debug( 'exit private AHL_DI_FILEUPLOAD_PVT.PROCESS_ITEM');
657: END IF;
658: EXCEPTION
659: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
660: ROLLBACK TO process_item;
661: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
662: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
663: p_count => x_msg_count,
657: END IF;
658: EXCEPTION
659: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
660: ROLLBACK TO process_item;
661: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
662: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
663: p_count => x_msg_count,
664: p_data => x_msg_data);
665: IF G_DEBUG='Y' THEN
658: EXCEPTION
659: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
660: ROLLBACK TO process_item;
661: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
662: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
663: p_count => x_msg_count,
664: p_data => x_msg_data);
665: IF G_DEBUG='Y' THEN
666: AHL_DEBUG_PUB.log_app_messages (x_msg_count, x_msg_data, 'ERROR' );
671: AHL_DEBUG_PUB.disable_debug;
672:
673: END IF;
674:
675: WHEN FND_API.G_EXC_ERROR THEN
676: ROLLBACK TO process_item;
677: X_return_status := FND_API.G_RET_STS_ERROR;
678: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
679: p_count => x_msg_count,
673: END IF;
674:
675: WHEN FND_API.G_EXC_ERROR THEN
676: ROLLBACK TO process_item;
677: X_return_status := FND_API.G_RET_STS_ERROR;
678: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
679: p_count => x_msg_count,
680: p_data => X_msg_data);
681: -- Debug info.
674:
675: WHEN FND_API.G_EXC_ERROR THEN
676: ROLLBACK TO process_item;
677: X_return_status := FND_API.G_RET_STS_ERROR;
678: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
679: p_count => x_msg_count,
680: p_data => X_msg_data);
681: -- Debug info.
682: IF G_DEBUG='Y' THEN
690: END IF;
691:
692: WHEN OTHERS THEN
693: ROLLBACK TO process_item;
694: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
695: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
696: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
697: p_procedure_name => l_api_name,
698: p_error_text => SUBSTR(SQLERRM,1,240));
696: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
697: p_procedure_name => l_api_name,
698: p_error_text => SUBSTR(SQLERRM,1,240));
699: END IF;
700: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
701: p_count => x_msg_count,
702: p_data => x_msg_data);
703:
704: -- Debug info.