
Numeric Date to True Date:
This formula is for converting dates stored in the 8-digit numeric format, YYYYMMDD, (e.g. Macola Accounting) into true date values.
Local NumberVar y := {Table.NumericDate};
Local StringVar z := Totext (y, 0,"");
z := Picture (z, 'xxxx-xx-xx');
If IsDate (z)
then DateValue(z)
Local NumberVar y := {Table.NumericDate};
Local StringVar z := Totext (y, 0,"");
z := Picture (z, 'xx-xx-xx');
If IsDate (z)
then DateValue(z)