FOR i = 0 TO NoOfRows('Loop')-1;

LET vToday= PEEK('Dates',$(i),'Loop');
LET vTodayFormat = date(date#(PEEK('Dates',$(i),'Loop'),'YYYY-MM-DD'),'YYYYMMDD');