Hi! Thanks for response. Please analize my file, because it was make with old xHarbour. http://www.4shared.com/file/139644752/e204a705/encomenda.html
proc main() local inicio, fim set date to brit use encomenda new alias 'pd' dbgotop() inicio := ctod('20/08/09') fim := ctod('28/08/09') while !eof() If pd->data_compr >= inicio .and. pd->data_compr <= fim ? recno(), pd->data_compr endif dbskip() enddo ? set filter to pd->data_compr >= inicio .and. pd->data_compr <= fim dbgotop() while !eof() ? recno(), pd->data_compr dbskip() enddo return Very strange for me results. Best regards, Itamar M. Lins Jr. _______________________________________________ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour