<% showQuery=[select distinct ALMARA from (']+(dbclocation+[itemmast])+; [') where len(alltrim(ALMARA))>0 order by ALMARA into cursor gotrecords] &showQuery Classes=[All Classes No Classes] do while not eof() if not empty(ALMARA) Classes=Classes+chr(13)+[]+allt(ALMARA)+[] endif skip enddo thisday=day(date()) thismonth=month(date()) thisyear=year(date()) fromdate=allt(transform(thisyear))+[-]+padl(allt(transform(thismonth)),2,[0])+[-]+allt(transform(1)) todate=allt(transform(thisyear))+[/]+allt(transform(thismonth))+[/]+allt(transform(thisday)) %>
Receipt

Classes | Counter