Обсуждение:Востановление document.dbt по operlog

• Обсуждение:Востановление document.dbt по operlog ( Обсуждение примера  08.11.2017 23:15 )
  Оценка:5(1)

  Развалился document.dbt, восстановить не смогли. В журнале операций отфильтровали все записи по условию (текущий день, с утра и до сбоя, и document.dbt), заменили дистрибутивный макрос на макрос из вложения и нажали Печать (F7). Получили восстановленный document.dbt, правда имя у него doc16.dbt и надо его туда пустым положить еще перед всем этим....
  а, еще Post_Sun не востанавливается, т.к. почему то в журнале этого нету...
  надо типа такого потом ...
  
  tbfDoc0 = TBFile("coracdoc.dbt", "r", 4, "coracdoc.dbt", "bank.def");
  tbfDoc = TBFile("document.dbt", "w", 0, "document.dbt", "bank.def");
  
  while (tbfDoc.Next())
  
  tbfDoc0.rec.iApplicationKind = tbfDoc.rec.iApplicationKind;
  tbfDoc0.rec.ApplicationKey = tbfDoc.rec.ApplicationKey ;
  
  if (tbfDoc0.GetEQ())
  tbfDoc.rec.Post_Sun = 1;
  if (tbfDoc.Update())
  println("Update OK");
  else
  println("Update Error");
  end;
  end;
  end;
  
  Посмотреть пример
  >> Ответить