1: PACKAGE BODY BOM_CSTRUSIW_XMLP_PKG AS
2: /* $Header: CSTRUSIWB.pls 120.0 2007/12/24 10:21:36 dwkrishn noship $ */
3: FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4: BEGIN
5: DECLARE
170: ,'FND FLEXSQL(GL#) >X')*/NULL;
171: RAISE;
172: END;
173: /*SRW.MESSAGE(0
174: ,'BOM_CSTRUSIW_XMLP_PKG << ' || TO_CHAR(SYSDATE
175: ,'Dy Mon FmDD HH24:MI:SS YYYY'))*/NULL;
176: EXCEPTION
177: WHEN OTHERS THEN
178: /*SRW.MESSAGE(999
177: WHEN OTHERS THEN
178: /*SRW.MESSAGE(999
179: ,SQLERRM)*/NULL;
180: /*SRW.MESSAGE(999
181: ,'BOM_CSTRUSIW_XMLP_PKG >X ' || TO_CHAR(SYSDATE
182: ,'Dy Mon FmDD HH24:MI:SS YYYY'))*/NULL;
183: /*RAISE SRW.PROGRAM_ABORT*/RAISE_APPLICATION_ERROR(-20101,null);
184: END;
185:
331: return(false);
332: end if;
333: END dummy4;
334:
335: END BOM_CSTRUSIW_XMLP_PKG;
336: