local t_mes={
"отправлена серверу",
"получена на сервер QUIK от клиента",
"ошибка при передаче транзакции в торговую систему. Так как отсутствует подключение шлюза Московской Биржи",
"выполнена",
"не выполнена торговой системой. Более подробное описание ошибки отражается в поле «Сообщение»",
"не прошла проверку сервера QUIK по каким-либо критериям. Например, проверку на наличие прав у пользователя на отправку транзакции данного типа",
"не прошла проверку лимитов сервера QUIK",
"не поддерживается торговой системой",
"не прошла проверку правильности электронной цифровой подписи",
"не удалось дождаться ответа на транзакцию, т.к. истек таймаут ожидания",
"отвергнута, так как ее выполнение могло привести к кросс-сделке",
"не прошла контроль дополнительных ограничений, установленных брокером",
"принята после нарушения дополнительных ограничений, установленных брокером",
"отменена пользователем в ходе проверки дополнительных ограничений, установленных брокером" }

function OnTransReply(t)
   local x=t.status
   if Log then Log:write("status="..x..": транзакция "..t_mes[x+1]..">"..msg.."\n"); Log:flush();end
   if x==3 or 2>x or x==15 then return end
   ---удаляем ошибочные транзакции сделок
   local _id=t.trans_id; local e,j,M;
   for n=1,2 do
      e=tor[n]; j=0; M=#e; while M>j do j=j+1; u=e[j];
         if u[1]==id_ then if M>j then e[j]=e[M]; end  e[M]=nil; e[0]=e[0]-1
         if Log then Log:write("transReply "..",e[0]="..e[0]..",#e="..#e.."\n");Log:flush(); end
         return; end  --отменяем выставление заявки
         if #u==3 and u[3]==id_ then u[3]=nil ;e[0]=e[0]-1
         if Log then Log:write("transReply "..",e[0]="..e[0]..",#e="..#e.."\n");Log:flush(); end
         return; end  -- отменяем удаление
      end
   end
end