731: END C_APPROVE_FLAGFORMULA;
732:
733: FUNCTION CF_CUT_DATEFORMULA RETURN CHAR IS
734: BEGIN
735: RETURN (FND_DATE.DATE_TO_CHARDATE(P_CUT_DATE));
736: END CF_CUT_DATEFORMULA;
737:
738: FUNCTION CF_SYSDATEFORMULA RETURN CHAR IS
739: BEGIN
736: END CF_CUT_DATEFORMULA;
737:
738: FUNCTION CF_SYSDATEFORMULA RETURN CHAR IS
739: BEGIN
740: RETURN (FND_DATE.DATE_TO_CHARDT(SYSDATE));
741: END CF_SYSDATEFORMULA;
742:
743: FUNCTION CF_C_INV_DISCOUNT_DATEFORMULA(C_INV_DISCOUNT_DATE IN DATE) RETURN CHAR IS
744: BEGIN
741: END CF_SYSDATEFORMULA;
742:
743: FUNCTION CF_C_INV_DISCOUNT_DATEFORMULA(C_INV_DISCOUNT_DATE IN DATE) RETURN CHAR IS
744: BEGIN
745: RETURN (FND_DATE.DATE_TO_CHARDATE(C_INV_DISCOUNT_DATE));
746: END CF_C_INV_DISCOUNT_DATEFORMULA;
747:
748: FUNCTION CF_INV_CHECK_GL_DATEFORMULA(C_INV_CHECK_GL_DATE IN DATE) RETURN CHAR IS
749: BEGIN
747:
748: FUNCTION CF_INV_CHECK_GL_DATEFORMULA(C_INV_CHECK_GL_DATE IN DATE) RETURN CHAR IS
749: BEGIN
750: IF NVL(C_INV_CHECK_GL_DATE,TO_DATE('1952/01/01','YYYY/MM/DD')) < NVL(CP_INVPP_GL_DATE,TO_DATE('1952/01/01','YYYY/MM/DD')) THEN
751: RETURN (FND_DATE.DATE_TO_CHARDATE(CP_INVPP_GL_DATE));
752: ELSE
753: RETURN (FND_DATE.DATE_TO_CHARDATE(C_INV_CHECK_GL_DATE));
754: END IF;
755: END CF_INV_CHECK_GL_DATEFORMULA;
749: BEGIN
750: IF NVL(C_INV_CHECK_GL_DATE,TO_DATE('1952/01/01','YYYY/MM/DD')) < NVL(CP_INVPP_GL_DATE,TO_DATE('1952/01/01','YYYY/MM/DD')) THEN
751: RETURN (FND_DATE.DATE_TO_CHARDATE(CP_INVPP_GL_DATE));
752: ELSE
753: RETURN (FND_DATE.DATE_TO_CHARDATE(C_INV_CHECK_GL_DATE));
754: END IF;
755: END CF_INV_CHECK_GL_DATEFORMULA;
756:
757: FUNCTION C_SCH_OPEN_AMOUNTFORMULA(GROSS_AMOUNT IN NUMBER