Имя: Пароль:
1C
1С v8
Вызвать экспортную функцию из модуля формы
0 _stay true_
 
05.07.13
11:50
В УТ11 есть общая форма "ПечатьДокументов", в её модуле я создал функцию. Как мне теперь вызвать эту функцию из модуля формы документа?
1 Maxus43
 
05.07.13
11:53
получить форму, вызвать функцию. Незнаю как на УФ это пройдёт конечно
2 _stay true_
 
05.07.13
11:59
А подробнее?
3 mikecool
 
05.07.13
11:59
(2) создать класс формы, вызвать ее публик функцию
4 Ork
 
05.07.13
12:03
(3) Не учите товарисЧа плохому. Путь вынесет свою СуперПуперМегаФункцию в отдельный общий модуль и не делает людЯм моск на этом форуме.
5 _stay true_
 
05.07.13
12:54
Вопрос: в модуле объекта документа поместил функцию "Отправить2"

&НаКлиенте
Функция Отправить2()   Экспорт
   
   ПараметрыОткрытия = Новый Структура;
   ИмяОткрываемойФормы = "ОбщаяФорма.ВыборФорматаВложений";
   Если ПолучателейБольшеОдного(ПараметрыВывода.ПараметрыОтправки.Получатель) Тогда
       ПараметрыОткрытия.Вставить("Получатели", ПараметрыВывода.ПараметрыОтправки.Получатель);
       ИмяОткрываемойФормы = "ОбщаяФорма.ПодготовкаНовогоПисьма";
   КонецЕсли;
   
   НастройкиСохранения = ОткрытьФормуМодально(ИмяОткрываемойФормы, ПараметрыОткрытия);
   Если НастройкиСохранения <> Неопределено И НастройкиСохранения <> КодВозвратаДиалога.Отмена Тогда
       СписокВложений = ПоместитьТабличныеДокументыВоВременноеХранилище(НастройкиСохранения);
       ПараметрыОтправки = ПараметрыВывода.ПараметрыОтправки;
       Получатели = ПараметрыОтправки.Получатель;
       Если НастройкиСохранения.Свойство("Получатели") Тогда
           Получатели = НастройкиСохранения.Получатели;
       КонецЕсли;
       РаботаСПочтовымиСообщениямиКлиент.ОткрытьФормуОтправкиПочтовогоСообщения( , Получатели, ПараметрыОтправки.Тема, ПараметрыОтправки.Текст, СписокВложений, Истина);
   КонецЕсли;
   
КонецФункции





Создал на форме документа команду "отправить". При попытке вызова этой процедуры выдаёт "метод объекта не обнаруже(отправить2)"


В модуле формы делаю так:



&НаСервере
Процедура ОтправитьСервер();
  ОбъектНаСервере = РеквизитФормыВЗначение("Объект");
  ОбъектНаСервере.Отправить2();
  ЗначениеВРеквизитФормы(ОбъектНаСервере, "Объект");

       
КонецПроцедуры // ОтправитьСервер()




&НаКлиенте
Процедура Отправить(Команда)
   
ОтправитьСервер();    
   
КонецПроцедуры



Помогите разобраться
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.