1: PACKAGE BODY OE_Header_Scredit_Security AS
2: /* $Header: OEXXHSCB.pls 115.22 2004/06/22 18:34:04 jvicenti ship $ */
3:
4:
5: -- Global constant holding the package name
3:
4:
5: -- Global constant holding the package name
6:
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Header_Scredit_Security';
8:
9: g_header_id NUMBER := FND_API.G_MISS_NUM;
10:
11: -- LOCAL PROCEDURES
730: --
731: BEGIN
732:
733: IF l_debug_level > 0 THEN
734: oe_debug_pub.add( 'ENTER OE_HEADER_SCREDIT_SECURITY.ENTITY' , 1 ) ;
735: END IF;
736:
737: -- Initializing return status to SUCCESS
738: x_return_status := FND_API.G_RET_STS_SUCCESS;
754: (p_HEADER_SCREDIT_rec,
755: l_rowtype_rec);
756:
757: -- Initialize security global record
758: OE_Header_Scredit_SECURITY.g_record := l_rowtype_rec;
759:
760: x_result := Is_OP_constrained
761: (p_operation => l_operation
762: ,p_record => l_rowtype_rec
763: ,x_on_operation_action => l_on_operation_action
764: );
765:
766: IF l_debug_level > 0 THEN
767: oe_debug_pub.add( 'EXIT OE_HEADER_SCREDIT_SECURITY.ENTITY' , 1 ) ;
768: END IF;
769:
770: EXCEPTION
771: WHEN OTHERS THEN
798: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
799: --
800: BEGIN
801: IF l_debug_level > 0 THEN
802: oe_debug_pub.add( 'ENTER OE_HEADER_SCREDIT_SECURITY.ATTRIBUTES' , 1 ) ;
803: END IF;
804:
805: -- Initializing return status to SUCCESS
806: x_return_status := FND_API.G_RET_STS_SUCCESS;
839: (p_HEADER_SCREDIT_rec,
840: l_rowtype_rec);
841:
842: -- Initialize security global record
843: OE_Header_Scredit_SECURITY.g_record := l_rowtype_rec;
844:
845: -- Compare the new and old entity records and
846: -- check constraints for all the changed attributes.
847:
1208: -- NOTE: Please add constraints check for new attributes before the
1209: -- descriptive flexfield attributes check.
1210:
1211: IF l_debug_level > 0 THEN
1212: oe_debug_pub.add( 'EXIT OE_HEADER_SCREDIT_SECURITY.ATTRIBUTES' , 1 ) ;
1213: END IF;
1214:
1215: EXCEPTION
1216: WHEN FND_API.G_EXC_ERROR THEN
1225: END IF;
1226:
1227: END Attributes;
1228:
1229: END OE_Header_Scredit_Security;