Имя: Пароль:
1C
1С v8
При вызове функции сбиваются строки
0 abbas
 
28.04.12
09:57
То есть, выбираю Транспортные услуги вызывается функция, но при ее вызове, все сбивается и как будто ничего и не выбирал, как сделать так чтобы ничего не сбивалось, подскажите плс

   Для каждого Строка Из ЭтаФорма.Объект.СписаниеСредств Цикл
       Результат = ДобавлениеПоля(Строка.Движение);
       Если Результат = 1 Тогда
            Элементы.СписаниеСредствАвтомобили.Видимость = Истина;    
       КонецЕсли;    
   КонецЦикла;

Функция ДобавлениеПоля(Движение)
   Движение = Строка(Движение);
   Запрос = Новый Запрос("ВЫБРАТЬ
                         |    ВидыДвиженияДенежныхСредств.Себестоимость,
                         |    ВидыДвиженияДенежныхСредств.Наименование
                         |ИЗ
                         |    Справочник.ВидыДвиженияДенежныхСредств КАК ВидыДвиженияДенежныхСредств
                         |ГДЕ
                         |    ВидыДвиженияДенежныхСредств.Наименование = &Движение");
   Запрос.УстановитьПараметр("Движение",Движение);                      
   Результат = Запрос.Выполнить().Выбрать();
   Пока Результат.Следующий() Цикл
           Себестоимость = Результат.Себестоимость;
   КонецЦикла;
   Возврат Себестоимость;
КонецФункции // ДобавлениеПоля()