Data Conversion

I have a datafield {artrans.invdte} thats is a string lenght of 8 formated “MM/DD/YY” trying to check this date against ToText(currentdate, “MM/DD/YY”) to select records {artrans.invdte} = ToText (CurrentDate, “MM/DD/YY”)in Record selection
not working .

Tried a Formula field @date
StringVar DT := {artrans.invdte};
NumberVar YR := Val (Split (DT , ‘/’)[3]);
if YR < 50 then YR := YR + 2000 else if YR < 1000 then YR := YR + 1900; Date ( YR, Val (Split (DT , '/') [1]), Val (Split (DT , '/') [2]) ) {@Date} = CurrentDate in record selection. didn't work