Печать требования

"Проблема в следующем. При выписке требования-накладной на передачу материала в производство программа не дает печатать требование, если оно не проведено(т.к. при проведении считается цена материала). Однако теперь требуется, чтобы требования выписывали не те, кто получает материалы, а работники склада. Но, поскольку фин.директор может и не подписать требование, то возникла необходимость печати требования БЕЗ его предварительного проведения, чтобы не делать лищнюю работу по отмене проведения.<br><br>Я попытался решить проблеиу следующим образом. Если требование непроведено, то я в начле процедуры печати его провожу, а затем (после того, как выполнил все нужные действия) снова делаю его непроведенным.<br><br>Но... Провестись требование проводится, а отмена проведения не проходит.<br><br>ПОЧЕМУ???<br><br><br><br>Вот, собственно, сама процедура. Подскажите, что в ней не так.<br><br><br><br>Процедура Печать()<br><br> Рез = 0;<br><br> Если Проведен() = 0 Тогда<br><br> Рез = Вопрос("Вы ДЕЙСТВИТЕЛЬНО хотите напечатать НЕпроведенный документ?",4);<br><br>//!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<br><br> Если Рез = 6 Тогда<br><br> Провести();//!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<br><br> Иначе<br><br> Возврат;<br><br> КонецЕсли; <br><br> КонецЕсли;<br><br> Таб = СоздатьОбъект("Таблица");<br><br> Таб.ВывестиСекцию("Шапка");<br><br> Оп = Операция;<br><br> Оп.ВыбратьПроводки();<br><br> Ном = 1;<br><br> Пока Оп.ПолучитьПроводку() = 1 Цикл<br><br> Если оп.кредит.счет = СчетПоКоду("Мат") тогда<br><br> Ном = Ном + 1;<br><br> _материал = Оп.Кредит.Материалы;<br><br> _количество = Оп.Количество;<br><br> Сумма = Оп.Сумма;<br><br> Цена = ?(Количество=0,0,Окр(Сумма/Количество,2));<br><br> Таб.ВывестиСекцию("Строка");<br><br> КонецЕсли;<br><br> КонецЦикла;             <br><br>//!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<br><br> Если Рез = 6 Тогда<br><br> Сделатьнепроведенным();//!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<br><br> КонецЕсли; <br><br> Таб.ВывестиСекцию("Подвал");<br><br> Таб.Опции(0,0,0,0,"ОпцииПечатиТр");<br><br> Таб.Показать("Требование");<br><br>КонецПроцедуры<br><br>"

"Сделатьнепроведенным();//<br><br>Метод может применяться ТОЛЬКО для объектов,созданных функцией<br><br>СоздатьОбъект()."