Помогите новичку (1с v.7.7 Бюджет)

"В форме документа получаю ВыбраннаяФирма, но как мне эту выбранную фирму <br>передать в процедуру Сформировать - не знаю<br><br><br>Процедура ПриИзмененииФирмы()<br> СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br> СпрФирмы.НайтиЭлемент(ВыбраннаяФирма);<br>КонецПроцедуры<br>//*******************************************<br>Процедура Сформировать()<br> СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br> СпрОС=СоздатьОбъект("Справочник.ОсновныеСредства");<br> СпрФирмы.НайтиПоНаименованию(ВыбраннаяФирма);<br> СпрОС.ИспользоватьВладельца(СпрФирмы.ТекущийЭлемент());<br> СпрОС.ВыбратьЭлементы();<br> Пока СпрОС.ПолучитьЭлемент()=1 Цикл<br> СпрОС.ПолнНаимен=СпрОС.Наименование;<br> Сообщить(СпрОС.ПолнНаимен);<br> СпрОС.Записать();<br> КонецЦикла;<br>КонецПроцедуры<br>"

"Процедура Сформировать(ВыбраннаяФирма="""")<br> Если ВыбраннаяФирма.Выбран()=0 Тогда<br> сообщить("Не верно передали параметр или выбранная фирма пустое значение");<br> возврат;<br> КонецЕсли;<br> СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br> СпрОС=СоздатьОбъект("Справочник.ОсновныеСредства");<br> Если СпрФирмы.НайтиЭлемент(ВыбраннаяФирма)=0 Тогда<br> сообщить(" не нашли переданную фирму");<br> возврат;<br> КонецЕсли;<br> //Дальше делаем что хотим<br>"

А что здесь обозначает (ВыбраннаяФирма=")

"Это означает, что в процедуру вы передаете параметр с выбранной фирмой.<br>есть 2 способа вызова процедуры Сформировать :<br>1. Сформировать();<br> - ВыбраннаяФирма = Пустоезначение<br>2. Сформировать(СпрФирмы.ТекущийЭлементь());<br> - ВыбраннаяФирма = СпрФирмы.ТекущийЭлемент()"

"Пишу код:<br>Процедура Сформировать(ВыбраннаяФирма="""")<br> Если ВыбраннаяФирма.Выбран()=0 Тогда<br> сообщить("Не верно передали параметр или выбранная фирма пустое значение");<br> возврат;<br> КонецЕсли;<br> СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br> СпрОС=СоздатьОбъект("Справочник.ОсновныеСредства");<br><br>В ответ:<br>Если ВыбраннаяФирма.Выбран()=0 Тогда<br>{C:\ОС.ERT(29)}: Значение не представляет агрегатный объект (Выбран)"

Откуда вызываете Сформировать()?<br>Весь код напишите!

"Процедура ПриИзмененииФирмы()<br>СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br>СпрФирмы.НайтиЭлемент(ВыбраннаяФирма);<br>КонецПроцедуры<br>//*******************************************<br><br>Процедура Сформировать(ВыбраннаяФирма="""")<br> Если ВыбраннаяФирма.Выбран()=0 Тогда<br> сообщить("Не верно передали параметр или выбранная фирма пустое значение");<br> возврат;<br> КонецЕсли;<br> СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br> СпрОС=СоздатьОбъект("Справочник.ОсновныеСредства");<br> Если СпрФирмы.НайтиЭлемент(ВыбраннаяФирма)=0 Тогда<br> сообщить(" не нашли переданную фирму");<br> возврат;<br>КонецЕсли; <br> Счетчик=0;<br> СпрФирмы.НайтиЭлемент(ВыбраннаяФирма);<br> Сообщить(СпрФирмы.ТекущийЭлемент());<br> СпрОС.ИспользоватьВладельца(СпрФирмы.ТекущийЭлемент());<br> СпрОС.ВыбратьЭлементы();<br> Пока СпрОС.ПолучитьЭлемент()=1 Цикл<br> Сообщить(СпрОС.ПолнНаимен);<br> СпрОС.ПолнНаимен=СпрОС.Наименование;<br> Счетчик=Счетчик+1;<br> Сообщить(СпрОС.ПолнНаимен);<br> СпрОС.Записать();<br> КонецЦикла;<br> Сообщить("Обработано "+Счетчик+" элементов")<br>КонецПроцедуры"

"При описании действий кнопки, надо описать вызов процедуры ПриИзменеииФирмы(),<br>цитировать Процедура ПриИзмененииФирмы()<br>СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br> //здесь откуда береться ВыбраннаяФирма? <br> СпрФирмы.НайтиЭлемент(ВыбраннаяФирма);<br> Сформировать(СпрФирмы.ТекущийЭлемент());<br>КонецПроцедуры<br>"

> В форме документа получаю ВыбраннаяФирма, но как мне эту выбранную фирму <br>> передать в процедуру Сформировать - не знаю<br><br>Я конечно не знаю КАКОЙ ВЫ используете документ, но в типовой конфигурации "Бюджетной бухгалтерии ред. 6" реквизит "ВыбраннаяФирма" - является ОБЩИМ РЕКВИЗИТОМ, поэтому:<br>1. Если документ типовой конфигурации, то значение этого реквизита (по умолчанию) будет зависеть от настроек: справочника "Пользователи", константы - Балансодержатель по умолчанию или просто берется первая запись из справочника "Фирмы".<br>2. Если добавили новый документ в конфигурацию, то возьмите любой документ типовой конфигурации и посмотрите код процедур "Ввод нового()", "ПриВыбореФирмы()" ну и т.д..

"Получилось!<br>Процедура ПриИзмененииФирмы()<br>СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br>СпрФирмы.НайтиЭлемент(ВыбраннаяФирма);<br>Сообщить(СпрФирмы.ТекущийЭлемент());<br>КонецПроцедуры<br>//*******************************************<br>Процедура Сформировать()<br> Если ВыбраннаяФирма.Выбран()=0 Тогда<br> сообщить("Выберите учреждение");<br> возврат;<br> КонецЕсли;<br> СпрФирмы=СоздатьОбъект("Справочник.Фирмы");<br> СпрОС=СоздатьОбъект("Справочник.ОсновныеСредства");<br> Счетчик=0;<br> СпрФирмы.НайтиЭлемент(ВыбраннаяФирма);<br> Сообщить(СпрФирмы.ТекущийЭлемент());<br> СпрОС.ИспользоватьВладельца(СпрФирмы.ТекущийЭлемент());<br> СпрОС.ВыбратьЭлементы();<br> Пока СпрОС.ПолучитьЭлемент()=1 Цикл<br> Сообщить(СпрОС.ПолнНаимен);<br> СпрОС.ПолнНаимен=СпрОС.Наименование;<br> Счетчик=Счетчик+1;<br> Сообщить(СпрОС.ПолнНаимен);<br> СпрОС.Записать();<br> КонецЦикла;<br> Сообщить("Обработано "+Счетчик+" элементов")<br>КонецПроцедуры"