// Скрипт импорта сумм, проведенных по дисконтной системе в аптеках

// DirName должно быть определено одним из следующих способов
 const DirName = 'c:\temp\1\'; // на случай жесткого запуска по таймеру
//var DirName :string; // Имя базового каталога, в котором происходит поиск, если настроено через сканирование каталогов

var FCount :integer;
begin
  FCount :=ImportDiscountPercentsSummaryFromDir(DirName,true);
  CreateHIntI('Импорт отчетов по дисконтной программе: '+ inttostr(FCount)+' файлов.');
end.