VAQ FORMAT DATE (158)    FUNCTION (.5)

Name Value
NAME VAQ FORMAT DATE
MUMPS CODE Q:'$D(X) Q:(X="") S X=$E(X,4,5)_"-"_$E(X,6,7)_"-"_(+$E(X,1,3)+1700)
EXPLANATION Converts a FileMan date to MM-DD-YYYY
DATE-VALUED NO