ivan.pie

редактировать метку

13 лет 3 мес. 13 дней

12 февраля 2018 в 13:36:21(6 лет 41 неделя 6 часов 7 минут назад)

Яндекс-директ

Активность на сайте

Последние сообщения пользователя

Сообщение на форуме
17 августа 2011 в 20:46:05

Спасибо, все работает. Всего - навсего забыл Прочитать НаборЗаписей. Ох уж эти методы))
Сообщение на форуме
16 августа 2011 в 21:17:55

Собственно имеется 1с 8.2 Бухгалтерия 2.0 Пытаюсь написать обработку , чтобы программно изменить СУбконтоКт (После переноса из 7.7 в некоторых местах встало пустое значение)
(Код выше)
Все бы хорошо, но на этапе НаборЗаписей = ПолучДок.Движения.Хозрасчетный; этот самый НаборЗаписей оказывается пустым... Ну и дальше по цепочке, стираются проводки операции и все такое. Так вот вопрос, почему НаборЗаписей тупой? или как по другому программно изменить субконто в ОперацииБух, ибо таких операций изменять много, и бедная бухгалтер замучается вручную все забивать.

Все оформил. извините) Недавно тут..

Сообщение на форуме

16 августа 2011 в 21:16:25

ВыбДок = Документы.ОперацияБух.Выбрать(,Выбдата,,);
Пока ВыбДок.Следующий() Цикл
 
 ПолучДок=ВыбДок.ПолучитьОбъект();
 НаборЗаписей = ПолучДок.Движения.Хозрасчетный;
 //НаборПроводок = НаборЗаписей.Выгрузить();
 Для каждого Проводка из НаборЗаписей Цикл

  Если Проводка.СчетКт = ПланыСчетов.Хозрасчетный.ТоварыНаСкладах тогда
   БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетКт,Проводка.СубконтоКт,2,ВыбСклад);
  КонецЕсли;
 КонецЦикла;	
 НаборЗаписей.Записать();
// ПолучДок.РучнаяКорректировка = истина;
 ПолучДок.Записать();
КонецЦикла;

простите, код не так вставил

Сообщение на форуме
16 августа 2011 в 21:15:46

Собственно имеется 1с 8.2 Бухгалтерия 2.0 Пытаюсь написать обработку , чтобы программно изменить СУбконтоКт (После переноса из 7.7 в некоторых местах встало пустое значение) Вот кусок Кода ВыбДок = Документы.ОперацияБух.Выбрать(,Выбдата,,); Пока ВыбДок.Следующий() Цикл ПолучДок=ВыбДок.ПолучитьОбъект(); НаборЗаписей = ПолучДок.Движения.Хозрасчетный; //НаборПроводок = НаборЗаписей.Выгрузить(); Для каждого Проводка из НаборЗаписей Цикл Если Проводка.СчетКт = ПланыСчетов.Хозрасчетный.ТоварыНаСкладах тогда БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетКт,Проводка.СубконтоКт,2,ВыбСклад); КонецЕсли; КонецЦикла; НаборЗаписей.Записать(); // ПолучДок.РучнаяКорректировка = истина; ПолучДок.Записать(); КонецЦикла; Все бы хорошо, но на этапе НаборЗаписей = ПолучДок.Движения.Хозрасчетный; этот самый НаборЗаписей оказывается пустым... Ну и дальше по цепочке, стираются проводки операции и все такое. Так вот вопрос, почему НаборЗаписей тупой? или как по другому программно изменить субконто в ОперацииБух, ибо таких операций изменять много, и бедная бухгалтер замучается вручную все забивать.

На главную страницу заданий 1с