When using a for each iteration with a collection, Date-type values get changed to Time-type as shown in the example below !!!

LOCAL loColl, oColl, lnI
STORE 0 TO lnI
STORE null TO oColl, loColl

loColl = NEWOBJECT("Collection")

FOR lnI = 1 TO 10
loColl.Add(DATE()-lnI)
ENDFOR

FOR EACH oColl IN loColl
? VARTYPE(oColl) &&& == Time Type !!!
ENDFOR

FOR lnI = 1 TO 10
? VARTYPE(loColl.item[lni]) &&& == Date Type which is correct !!!
ENDFOR