>> >>FieldValue = {^2008/01/01} >> >>DO CASE >> CASE FormatFieldValue = 'CCYYMMDD' && Should be "20080101" >> NewFieldValue = EVALUATE("ALLTRIM(TRANSFORM(DTOS(FieldValue), '@R " + REPLICATE('!',FieldLength) + "'))") >> CASE FormatFieldValue = 'MMDDCCYY' && Should be "01012008" >> NewFieldValue = EVALUATE("ALLTRIM(TRANSFORM(DTOS(FieldValue), '@R " + REPLICATE('!',FieldLength) + "'))") >> OTHERWISE && Leave it alone other than converting to text >> NewFieldValue = EVALUATE("ALLTRIM(TRANSFORM(DTOS(FieldValue), '@R " + REPLICATE('!',FieldLength) + "'))") >>ENDCASE >>