|   |   | 
| 
 | Заполнить ТЧ документа на основании. 1с УПП | ☑ | ||
|---|---|---|---|---|
| 0
    
        deadpuma 02.10.12✎ 11:10 | 
        Нужно заполнить ТЧ "Материалы" одного документа на основе другого документа. Табличные части обоих документов одинаковые. 
  что не так делаю? Пишет ошибку при вызове метода ПолучитьФормуВыбора() помогите плиз &НаКлиенте Процедура ЗаполнитьПоМатНеВклВПЛ(Команда) Если Объект.Материалы.Количество() > 0 Тогда Ответ = Вопрос(НСтр("ru = 'Табличная часть будет очищена! Продолжить выполнение операции?'"), РежимДиалогаВопрос.ДаНет, 0); Если Ответ <> КодВозвратаДиалога.Да Тогда Возврат; КонецЕсли; КонецЕсли; ЗаполнитьПоМатериаламНеВклВПЛ("Материалы", "Заполнить"); КонецПроцедуры &НаСервере Процедура ЗаполнитьПоМатериаламНеВклВПЛ(ИмяТабЧасти, Режим, Основание = Неопределено, ИмяТабЧастиИсточника = Неопределено) Если Основание = Неопределено Тогда Форма = Документы.ЗаявкаНаНестандартныеМатериалы.ПолучитьФормуВыбора(); Форма.Заголовок = "Выберите документ для заполнения"; Форма.РежимВыбора = Истина; ДокумМатерНеВклВПЛ = Форма.ОткрытьМодально(); Иначе ДокумМатерНеВклВПЛ = Основание; КонецЕсли; Если НЕ ЗначениеЗаполнено(ДокумМатерНеВклВПЛ) Тогда Возврат; КонецЕсли; Запрос = Новый Запрос; Запрос.УстановитьПараметр("ДокумМатерНеВклВПЛ", ДокумМатерНеВклВПЛ); Запрос.Текст = "ВЫБРАТЬ | ЗаявкаНаНестандартныеМатериалы.Материалы.( | РазделПЛ, | Группа, | ННомер, | Номенклатура, | ЕдиницаИзмерения, | Количество, | УчЦена, | Цена, | Категория, | КоличествоДПВесьЗаказ, | ССДП, | СТДП, | КоличествоТПВесьЗаказ, | ССТП, | СТТП, | Закрыто | ) |ИЗ | Документ.ЗаявкаНаНестандартныеМатериалы КАК ЗаявкаНаНестандартныеМатериалы |ГДЕ | ЗаявкаНаНестандартныеМатериалы.Ссылка = &ДокумМатерНеВклВПЛ"; Объект.Материалы.Загрузить(Запрос.Выполнить().Выгрузить()); КонецПроцедуры | |||
| 1
    
        shuhard 02.10.12✎ 11:12 | 
        (0) открыть форму на сервере модально     | |||
| 2
    
        deadpuma 02.10.12✎ 11:25 | 
        (1) ошибка возникает выше вот в этом месте 
  Форма = Документы.ЗаявкаНаНестандартныеМатериалы.ПолучитьФормуВыбора(); | |||
| 3
    
        Aleks73 02.10.12✎ 11:29 | 
        Отладчик тебе в помощь...если вообще dead что-то поможет.     | |||
| 4
    
        ДенисЧ 02.10.12✎ 11:30 | 
        &НаСервере
  Форма = Документы.ЗаявкаНаНестандартныеМатериалы.ПолучитьФормуВыбора(); тут ошибка. | |||
| 5
    
        KabanDeGreat 02.10.12✎ 11:30 | 
        Доступность: 
  Толстый клиент. | |||
| 6
    
        deadpuma 02.10.12✎ 11:36 | 
        (4) поменял на теперь не компилируется. пишет процедура не определена 
  Форма=ПолучитьФорму("Документы.ЗаявкаНаНестандартныеМатериалы..ФормаВыбора"); | |||
| 7
    
        DrShad 02.10.12✎ 11:39 | 
        на сервере нет форм     | |||
| 8
    
        deadpuma 02.10.12✎ 11:40 | 
        чуть-чуть подкорректировал все равно ошибка осталась
  &НаКлиенте Процедура ЗаполнитьПоМатНеВклВПЛ(Команда) Если Объект.Материалы.Количество() > 0 Тогда Ответ = Вопрос(НСтр("ru = 'Табличная часть будет очищена! Продолжить выполнение операции?'"), РежимДиалогаВопрос.ДаНет, 0); Если Ответ <> КодВозвратаДиалога.Да Тогда Возврат; КонецЕсли; КонецЕсли; ФормаЗаполнения = ПолучитьФорму("Документы.ЗаявкаНаНестандартныеМатериалы.ФормаВыбора"); ФормаЗаполнения.Заголовок = "Выберите документ для заполнения"; ФормаЗаполнения.РежимВыбора = Истина; ДокумМатерНеВклВПЛ = ФормаЗаполнения.ОткрытьМодально(); ЗаполнитьПоМатериаламНеВклВПЛ(ДокумМатерНеВклВПЛ); КонецПроцедуры &НаСервере Процедура ЗаполнитьПоМатериаламНеВклВПЛ(ДокумМатерНеВклВПЛ) Запрос = Новый Запрос; Запрос.УстановитьПараметр("ДокумМатерНеВклВПЛ", ДокумМатерНеВклВПЛ); Запрос.Текст = "ВЫБРАТЬ | ЗаявкаНаНестандартныеМатериалы.Материалы.( | РазделПЛ, | Группа, | ННомер, | Номенклатура, | ЕдиницаИзмерения, | Количество, | УчЦена, | Цена, | Категория, | КоличествоДПВесьЗаказ, | ССДП, | СТДП, | КоличествоТПВесьЗаказ, | ССТП, | СТТП, | Закрыто | ) |ИЗ | Документ.ЗаявкаНаНестандартныеМатериалы КАК ЗаявкаНаНестандартныеМатериалы |ГДЕ | ЗаявкаНаНестандартныеМатериалы.Ссылка = &ДокумМатерНеВклВПЛ"; Объект.Материалы.Загрузить(Запрос.Выполнить().Выгрузить()); КонецПроцедуры | |||
| 9
    
        ДенисЧ 02.10.12✎ 11:41 | 
        ФормаЗаполнения = ПолучитьФорму("Документы.ЗаявкаНаНестандартныеМатериалы.ФормаВыбора.Форма");  ?     | |||
| 10
    
        KabanDeGreat 02.10.12✎ 11:42 | 
        "Справочник.Контрагенты.Форма.ФормаОбъекта",
  ТЕБЕ синтаксис помошник на что | |||
| 11
    
        KabanDeGreat 02.10.12✎ 11:42 | 
        тебе следовательно документ, а не документЫ     | |||
| 12
    
        deadpuma 02.10.12✎ 11:49 | 
        (9) спасибо ошибка прошла, но табличная часть ничего не заполняет? в чем может быть ошибка?     | |||
| 13
    
        deadpuma 02.10.12✎ 11:51 | 
        (11) да забыл букву Ы убрать     | |||
| 14
    
        Darky 02.10.12✎ 11:54 | 
        Запрос не выбирает из ТЧ документа     | |||
| 15
    
        hhhh 02.10.12✎ 11:57 | 
        (12) |ИЗ
  | Документ.ЗаявкаНаНестандартныеМатериалы.МАТЕРИАЛЫ КАК ЗаявкаНаНестандартныеМатериалы | |||
| 16
    
        deadpuma 02.10.12✎ 12:04 | 
        (15) (14) спасибо получилось!     | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |