My dear Professor

Your codes has solved my problem. But I could not understand them.
If possible pleaes write some details about them specially about this select statment

Set Ansi On
Select Date,VOU_TYPE,Cnt(Distinct VOU_NO) As cntVouNo ;
  FROM VOUCHERS ;
  WHERE Date # {} And VOU_TYPE In ;
  ('CP', 'CR', 'JV', 'PR', 'PS', 'SL', 'SS', 'SO', 'SD', 'SC') ;
  Group By Date, VOU_TYPE ;
  order By Date ;
  INTO Cursor v1
Set ansi off

Please help again