bytecoded

A "из-за разного порядка записи наборов записей регистров на

Dec 12th, 2019
294
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.99 KB | None | 0 0
  1. Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 Регистратор ИЗ РегистрНакопления.Остаточный");
  2. Выборка = Запрос.Выполнить().Выбрать();
  3.  
  4. Выборка.Следующий();
  5.  
  6. НачатьТранзакцию();
  7.  
  8. Набор1 = РегистрыНакопления.Остаточный.СоздатьНаборЗаписей();
  9. Набор1.Отбор.Регистратор.Установить(Выборка.Регистратор);
  10.  
  11. Набор1.Записать();
  12.  
  13. Предупреждение("Записан набор 1");
  14.  
  15. Набор2 = РегистрыНакопления.Остаточный1.СоздатьНаборЗаписей();
  16. Набор2.Отбор.Регистратор.Установить(Выборка.Регистратор);
  17.  
  18. Набор2.Записать();
  19.  
  20. Предупреждение("Записан набор 2");
  21.  
  22. ОтменитьТранзакцию();
Add Comment
Please, Sign In to add comment