Имя: Пароль:
1C
1С v8
Внешняя обработка:Заполнение ТЧ в Управляемых формах
0 Lelic
 
27.11.12
17:17
Первый опыт работы с Уф. Надо заполнить внешней обработкой ТЧ. Взяла готовую у старших товарищей из интернета:) В УНФ(1.4.1.17) все работает и форма прекрасно обновляется, а в УНФ(1.4.3.10) никак не получается обновить форму. Загадочным для меня образом обновляется только тогда, когда вылетает по ошибке. Подскажите куда смотреть, моя фантазия иссякла. ВТорой день маюсь...
&НаСервере
Процедура ЗаполнитьНаСервере(Док, ОбъектФорма)
   
   НаборЗаписей = РегистрыСведений.ШтрихкодыНоменклатуры.СоздатьНаборЗаписей();
   Партии = Справочники.ПартииНоменклатуры;
   ПустаяПартия = Партии.ПустаяСсылка();
   ПустаяХарактеристика = Справочники.ХарактеристикиНоменклатуры.ПустаяСсылка();
   ПустаяЕдиница = Справочники.ЕдиницыИзмерения.ПустаяСсылка();
   
   СтруктураЗаписи = Новый Структура;    
   ТаблПолей = ОбъектФорма.Запасы.Выгрузить();

   Для Каждого эл из ТаблПолей цикл
       // вот тут менняем наши данные
   Конеццикла;
   ОбъектФорма.Запасы.Загрузить(ТаблПолей);

КонецПроцедуры


&НаКлиенте
Процедура ВыполнитьКоманду(ИдентификаторКоманды, ОбъектыНазначения)   Экспорт
   Режим = РежимДиалогаВопрос.ДаНет;
   Текст = "Текущие данные документа будут заменены новыми без возможности восстановления.
   |Продолжить?";
   Ответ = Вопрос(Текст, Режим, 0);
   Если Ответ = КодВозвратаДиалога.Да Тогда
       Для каждого Элемент из ОбъектыНазначения Цикл
           КлючПоиска = Новый Структура("Ключ", Элемент);
           Окна = ПолучитьОкна();
           Для каждого Окно из Окна Цикл
               Если НЕ Окно.Основное   И Найти(Окно.Заголовок, Элемент) Тогда
                   Форма = ОткрытьФорму("Документ.ПриходныйОрдер.Форма.ФормаДокумента",КлючПоиска,,,Окно);
                   НовыйОбъект = Форма.Объект;
                   ЗаполнитьНаСервере(Элемент,НовыйОбъект);
                   КопироватьДанныеФормы(НовыйОбъект, Форма.Объект);
               Конецесли;
           Конеццикла;
       Конеццикла;
   Конецесли;    
КонецПроцедуры
1 samozvanec
 
27.11.12
17:47
в каком месте вылетает?
2 Lelic
 
27.11.12
18:03
Вылетает она только с моей помощью. Например, после "КопироватьДанныеФормы" я поставлю Форма.Обновить()
3 Lelic
 
28.11.12
15:21
Подниму, вдруг кто-то новый появился. А у нас наконец-то снег пошел!
4 Lelic
 
29.11.12
22:05
Наконец-то мои мучения закончились!!! Оказывается надо было после КопироватьДанныеФормы добавить строчку Форма.Записать().
И ради этого я перерыла весь интернет!
Может кому пригодится.
5 zulu_mix
 
29.11.12
22:08
обработка кал. надо переписывать по феншую.
зы
я всегда думал что Лёлик это мальчик и друг Болека.
6 Lelic
 
29.11.12
22:25
С феншуем на УФ пока плоховато. Пока хоть у народа потырить. Пока УФ "шайтан техника". Где-то в голове картинка еще не сложилась. А "Лёлик" мне слово с детства нравилось, что-то весёленькое и бодренькое, ну и меня так иногда называли. А мультик по-моему какой-то отстойный был, видимо для мальчиков.
НО к феншую будем стремиться
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший