>Thanks Çetin,
>i think to create 12 table for each month and fieldnames can be day1...day31 .
>only important things here year must match the real year also day names too .
>how is your comment
>
>TIA

12 tables for 12 months !!!
Why not 1 only with extra fields like year and month.
Probably I'd do something like :

*index on bintoc(nYear)+bintoc(nMonth) tag yrmon
set key to bintoc(tnDesiredYear)+bintoc(tnDesiredMonth)
with thisform.myGrid
 ldFday = date(tnDesiredYear,tnDesiredMonth,1)
 .Columncount = day(gomonth(ldFday,1)-1)
 for each oCol in .Columns
   ldDate = date(tnDesiredYear,tnDesiredMonth,;
     val(substr(justext(.controlsource),2)))
   ...
 endfor
endwith

Cetin