С праздником Уважаемое сообщество. Возникли некоторые проблемы с проводкой документов. Но о бо всем по порядку. У меня самописная конфигурация 1с77. В реализации задачи, в модуле документа А создал документ Б для того что бы провести документ А необходимо провести документ Б. Приведу кусок модуля из документа А:
Док=создатьобъект("Документ.УПереробку");
НачатьТранзакцию();
//Создаем новый документ
Док.Новый();
//Док.Оператор=глОператор;
Док.КонтрАгент=КонтрАгент;
Док.Сировина=Сировина;
ТЗ.ВыбратьСтроки();
Пока ТЗ.ПолучитьСтроку()=1 Цикл
Если ТЗ.КількістьНаПереробку>0 Тогда
Док.НоваяСтрока();
Док.ТМЦ=ТЗ.ТМЦ;
Док.Ф14=ТЗ.Док;
Док.Кількість=ТЗ.КількістьНаПереробку;
Док.Дата=ТЗ.Док.ДатаДок;
КонецЕсли;
КонецЦикла;
ддд=Док.ТекущийДокумент();
Док.Записать();
Док.Провести();
НабірГотовоїПродукції=ддд;
Посмотрите Отладчиком 4 строку снизу.
Не думаю, что "текущийДокумент" сработает.
ЗЫ. А вообще, сама идея ущербная... ох и гемору будет.
Если так не сработает:
НабірГотовоїПродукції=Док;
ддд=создатьобъект("Документ.УПереробку");
Если ддд.НайтиДокумент(Док)=1 Тогда
НабірГотовоїПродукції=ддд.ТекущийДокумент();
КонецЕсли;
Если провести с последними строками менипуляции таким образом:
Док.Записать();
ддд=Док.ТекущийДокумент();
//Док.Провести();
НабірГотовоїПродукції=ддд;
а проверьте тип значения реквизита НабірГотовоїПродукції,
может там не Документ.УПереробку?
Acid @ Сегодня, 9:04 ,
Спасибо... Я болван... Вся проблема в транзакции... Ваш свежий взгляд расставил все на свои места...
транзакцию убрали?
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua