1: PACKAGE BODY OE_Validate_Header_PAttr AS
2: /* $Header: OEXLHPAB.pls 120.1.12000000.3 2007/04/27 05:50:56 jisingh ship $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: OEXLHPAB.pls 120.1.12000000.3 2007/04/27 05:50:56 jisingh ship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Validate_Header_Pattr';
7:
8: -- Procedure Entity
9:
10: PROCEDURE Entity
21: --
22: BEGIN
23:
24: IF l_debug_level > 0 THEN
25: oe_debug_pub.add( 'ENTERING OE_VALIDATE_HEADER_PATTR.ENTITY' , 1 ) ;
26: END IF;
27:
28: -- Check required attributes.
29:
70:
71: x_return_status := l_return_status;
72:
73: IF l_debug_level > 0 THEN
74: oe_debug_pub.add( 'EXITING OE_VALIDATE_HEADER_PATTR.ENTITY' , 1 ) ;
75: END IF;
76: EXCEPTION
77:
78: WHEN FND_API.G_EXC_ERROR THEN
113: --
114: BEGIN
115:
116: IF l_debug_level > 0 THEN
117: oe_debug_pub.add( 'ENTERING OE_VALIDATE_HEADER_PATTR.ATTRIBUTES' , 1 ) ;
118: END IF;
119: x_return_status := FND_API.G_RET_STS_SUCCESS;
120:
121: -- Validate Line_Pricing_PAttr attributes
271: x_return_status := FND_API.G_RET_STS_ERROR;
272: END IF;
273: END IF;
274: if OE_GLOBALS.g_validate_desc_flex ='Y' then --4343612
275: oe_debug_pub.add('Validation of desc flex is set to Y in OE_Validate_Header_PAttr.attributes ',1);
276: IF (p_Header_Price_Attr_rec.attribute1 IS NOT NULL AND
277: ( p_Header_Price_Attr_rec.attribute1 <>
278: p_old_Header_Price_Attr_rec.attribute1 OR
279: p_old_Header_Price_Attr_rec.attribute1 IS NULL ))
1253: end if; -- bug4343612
1254: -- Done validating attributes
1255:
1256: IF l_debug_level > 0 THEN
1257: oe_debug_pub.add( 'EXITING OE_VALIDATE_HEADER_PATTR.ATTRIBUTES' , 1 ) ;
1258: END IF;
1259: EXCEPTION
1260:
1261: WHEN FND_API.G_EXC_ERROR THEN
1325: END IF;
1326:
1327: END Entity_Delete;
1328:
1329: END OE_Validate_Header_PAttr;