// передача остатков складов в  другие базы

const LogFileName ='exportstoragegoods.log';

var ResultStr :string;
begin

  ResultStr := ExportStorageGoods;

  StringToFile(extractfilepath(application.exename)+LogFileName,ResultStr);


end.