446: p_pk2_value in varchar2 default null,
447: p_pk3_value in varchar2 default null,
448: p_pk4_value in varchar2 default null,
449: p_pk5_value in varchar2 default null,
450: p_commit in varchar2 := fnd_api.G_FALSE,
451: x_attachment_count out nocopy number,
452:
453: x_return_status out nocopy varchar2,
454:
476: oe_debug_pub.add( 'ENTER OE_FND_ATTACHMENTS_PVT.ADD_ATTACHMENTS_AUTOMATIC' , 1 ) ;
477: END IF;
478:
479: -- Initialize API return status to success
480: x_return_status := FND_API.G_RET_STS_SUCCESS;
481:
482: -- Standard call to check for call compatibility
483:
484: IF NOT FND_API.Compatible_API_Call
480: x_return_status := FND_API.G_RET_STS_SUCCESS;
481:
482: -- Standard call to check for call compatibility
483:
484: IF NOT FND_API.Compatible_API_Call
485: ( l_api_version_number
486: , p_api_version
487: , l_api_name
488: , G_PKG_NAME
487: , l_api_name
488: , G_PKG_NAME
489: )
490: THEN
491: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
492: END IF;
493:
494: x_attachment_count := 0;
495:
623: x_msg_count => x_msg_count,
624: x_msg_data => x_msg_data
625: );
626:
627: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
628: RAISE FND_API.G_EXC_ERROR;
629: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
631: END IF;
624: x_msg_data => x_msg_data
625: );
626:
627: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
628: RAISE FND_API.G_EXC_ERROR;
629: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
631: END IF;
632:
625: );
626:
627: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
628: RAISE FND_API.G_EXC_ERROR;
629: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
631: END IF;
632:
633: i := l_documentTbl.next(i);
626:
627: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
628: RAISE FND_API.G_EXC_ERROR;
629: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
630: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
631: END IF;
632:
633: i := l_documentTbl.next(i);
634:
634:
635: end loop;
636:
637: x_attachment_count := l_documentTbl.COUNT;
638: x_return_status := FND_API.G_RET_STS_SUCCESS;
639:
640: OE_MSG_PUB.Count_And_Get
641: ( p_count => x_msg_count
642: , p_data => x_msg_data
648: oe_debug_pub.add( 'EXIT OE_FND_ATTACHMENTS_PVT.ADD_ATTACHMENTS_AUTOMATIC' , 1 ) ;
649: END IF;
650:
651: EXCEPTION
652: WHEN FND_API.G_EXC_ERROR THEN
653: x_return_status := FND_API.G_RET_STS_ERROR;
654: OE_MSG_PUB.Count_And_Get
655: ( p_count => x_msg_count
656: , p_data => x_msg_data
649: END IF;
650:
651: EXCEPTION
652: WHEN FND_API.G_EXC_ERROR THEN
653: x_return_status := FND_API.G_RET_STS_ERROR;
654: OE_MSG_PUB.Count_And_Get
655: ( p_count => x_msg_count
656: , p_data => x_msg_data
657: );
654: OE_MSG_PUB.Count_And_Get
655: ( p_count => x_msg_count
656: , p_data => x_msg_data
657: );
658: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
660: OE_MSG_PUB.Count_And_Get
661: ( p_count => x_msg_count
662: , p_data => x_msg_data
655: ( p_count => x_msg_count
656: , p_data => x_msg_data
657: );
658: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
660: OE_MSG_PUB.Count_And_Get
661: ( p_count => x_msg_count
662: , p_data => x_msg_data
663: );
667: END IF;
668: IF l_debug_level > 0 THEN
669: oe_debug_pub.add( 'ERROR: '||SUBSTR ( SQLERRM , 1 , 250 ) , 1 ) ;
670: END IF;
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
672: IF OE_MSG_PUB.Check_Msg_Level
673: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
674: THEN
675: OE_MSG_PUB.Add_Exc_Msg
744: --
745: BEGIN
746:
747: -- Initialize API return status to success
748: x_return_status := FND_API.G_RET_STS_SUCCESS;
749:
750: -- Standard call to check for call compatibility
751:
752: IF NOT FND_API.Compatible_API_Call
748: x_return_status := FND_API.G_RET_STS_SUCCESS;
749:
750: -- Standard call to check for call compatibility
751:
752: IF NOT FND_API.Compatible_API_Call
753: ( l_api_version_number
754: , p_api_version
755: , l_api_name
756: , G_PKG_NAME
755: , l_api_name
756: , G_PKG_NAME
757: )
758: THEN
759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
760: END IF;
761:
762: if ( p_validate_flag = 'Y') then
763:
768: -- invalid document id!
769: close C_DOC;
770: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_DOCUMENT_ID');
771: OE_MSG_PUB.ADD;
772: x_return_status := FND_API.G_RET_STS_ERROR;
773: end if;
774: close C_DOC;
775:
776: end if;
786: EXCEPTION
787: WHEN no_data_found THEN
788: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_DOCUMENT_ENTITY');
789: OE_MSG_PUB.ADD;
790: RAISE FND_API.G_EXC_ERROR;
791: END;
792: */
793:
794: -- calculate the sequence number for the document and
890: , p_data => x_msg_data
891: );
892:
893: EXCEPTION
894: WHEN FND_API.G_EXC_ERROR THEN
895: x_return_status := FND_API.G_RET_STS_ERROR;
896: OE_MSG_PUB.Count_And_Get
897: ( p_count => x_msg_count
898: , p_data => x_msg_data
891: );
892:
893: EXCEPTION
894: WHEN FND_API.G_EXC_ERROR THEN
895: x_return_status := FND_API.G_RET_STS_ERROR;
896: OE_MSG_PUB.Count_And_Get
897: ( p_count => x_msg_count
898: , p_data => x_msg_data
899: );
896: OE_MSG_PUB.Count_And_Get
897: ( p_count => x_msg_count
898: , p_data => x_msg_data
899: );
900: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
901: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
902: OE_MSG_PUB.Count_And_Get
903: ( p_count => x_msg_count
904: , p_data => x_msg_data
897: ( p_count => x_msg_count
898: , p_data => x_msg_data
899: );
900: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
901: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
902: OE_MSG_PUB.Count_And_Get
903: ( p_count => x_msg_count
904: , p_data => x_msg_data
905: );
903: ( p_count => x_msg_count
904: , p_data => x_msg_data
905: );
906: WHEN OTHERS THEN
907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
908: IF OE_MSG_PUB.Check_Msg_Level
909: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
910: THEN
911: OE_MSG_PUB.Add_Exc_Msg
956: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
957: --
958: BEGIN
959:
960: x_return_status := FND_API.G_RET_STS_SUCCESS;
961:
962: FND_ATTACHED_DOCUMENTS2_PKG.Delete_Attachments
963: (x_entity_name => p_entity_name
964: ,x_pk1_value => p_pk1_value
969: );
970:
971: EXCEPTION
972: WHEN OTHERS THEN
973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
974: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
975: THEN
976: OE_MSG_PUB.Add_Exc_Msg
977: ( G_PKG_NAME