Вы не авторизованы

Вы можете читать сообщения. Если вы хотите создать новую тему или присоединиться к обсуждению, пройдите процедуру регистрации или авторизуйтесь.

RSS
Отправка факса с печатной формы документа (Управляемые формы)
 
Добрый день.
Наша конфигурация:
Askozia 4.0.1 MIKO Edition
УНФ 1.5.4.34
Панель телефонии 1.4.25.4  (Управляемые формы)

Есть ли инструкция по доработке/настройке конфигурации для отправки факса из печатной формы документов (счета, акты, накладные)?
 
Необходимо добавить команду в печатную форму, примерный код команды:
Код
&НаКлиенте
Процедура ОтправитьФакс(Команда)
   
   Если сфпФормаТелефон = Неопределено Тогда
      Возврат;
   КонецЕсли;
   
   сфпФормаТелефон.ОтправитьФайлПоФаксу(,ПечатнаяФормаОбразец);
   
КонецПроцедуры
"ПечатнаяФормаОбразец" - реквизит формы с типом табличный документ.
 
Спасибо. А в самой обработке нужно добавлять команду?
 
Более "правильный" код команды в модуле общей формы "ПечатьДокументов":
Код
&НаКлиенте
Процедура МИКО_ОтправитьКакФакс()
   Если сфпФормаТелефон = Неопределено Тогда
       Возврат;
   КонецЕсли;
   
   ТабличныеДокументы = Новый СписокЗначений;
   Для Каждого НастройкаПечатнойФормы Из НастройкиПечатныхФорм Цикл
      Если Элементы[НастройкаПечатнойФормы.ИмяРеквизита].Вывод = ИспользованиеВывода.Разрешить И НастройкаПечатнойФормы.Печатать Тогда
         ТабличныеДокументы.Добавить(ЭтотОбъект[НастройкаПечатнойФормы.ИмяРеквизита], НастройкаПечатнойФормы.Представление);
      КонецЕсли;
   КонецЦикла;

   Если ТабличныеДокументы.Количество()=0 Тогда
      Возврат;
   Иначе
      ТабДок = ТабличныеДокументы[0].Значение;
   КонецЕсли; 
   // отсылаем факс
   сфпФормаТелефон.ОтправитьФайлПоФаксу(,ТабДок);   
КонецПроцедуры // МИКО_ОтправитьКакФакс()
В самой обработке эта процедура уже есть.
 
Цитата
Мальцев Иван написал:
Более "правильный" код команды в модуле общей формы "ПечатьДокументов"
Здравствуйте. Сейчас актуален этот код?
У нас Аскози - 4.0.5 ME, Версия панели 1.4.26.15

ПС: И в итоге будет все работать как на видео ниже?
https://www.youtube.com/watch?v=5ZuclVUtOuk&feature=youtu.be
Изменено: Биматов Михаил - 27.10.2016 08:02:24 (дополнена информация)
 
И еще вопрос - чтобы работало все как на этом видео, надо ли где-то ввести внутр.номер виртуального факса, с которого будет происходить отсылка?
 
Вообще в 1С-Панели есть кнопка ОтправитьФакс, но она у нас не видима, потомучто переменная РаботаСФаксамиВозможна = Ложь.
Что сделать, чтобы эта переменная была равна Истина?
Может быть это от того, что в Аскози для дополнительного диска не стояла галочка на Хранение архива факсов ?
 
Михаил, в какую конфигурацию 1С встроена панель телефонии?
 
Цитата
Мальцев Иван написал:
Михаил, в какую конфигурацию 1С встроена панель телефонии?
Бухгалтерия 3.0
Правда, Панель работает под толстым клиентом. По-моему это не должно влиять на факсы.
 
ПС: Если быть точным, то конфигурация Инталева - "Корпоративный менеджмент, редакция 7.2 (7.2.1.1) и Бухгалтерия предприятия, редакция 3.0 (3.0.43.263)", но основа тут - БП 3.0
 
Цитата
Биматов Михаил написал:
Здравствуйте. Сейчас актуален этот код?
Проверил на БП редакции 3.0.42.37, панели 1.4.26.15, код актуален.

Цитата
Биматов Михаил написал:
ПС: И в итоге будет все работать как на видео ниже?
Должно работать как на видео.
Цитата
Биматов Михаил написал:
И еще вопрос - чтобы работало все как на этом видео, надо ли где-то ввести внутр.номер виртуального факса, с которого будет происходить отсылка?
Виртуальный факс в этом случае не нужен.

Цитата
Биматов Михаил написал:
Что сделать, чтобы эта переменная была равна Истина?
Переменная устанавливается при получении настроек от Аскозии, событие userevent "AsteriskSettings". C Аскозией переменная должна принимать значение Истина. Участок кода из панели:
Код
ИначеЕсли Событие = "AsteriskSettings" Тогда   
      ПолучилиAsteriskSettings = Истина;
      ПроверкаПолученияUserEvent();
      
      DefaultContext    = соотвXMLУзел.Получить("defaultcontext");
      СлужебнаяИнформация.ВерсияДиалплана = соотвXMLУзел.Получить("dialplanver");
      НомерПрямойПарковки = соотвXMLУзел.Получить("autoanswernumber");
      // ФАКСЫ + 
      faxsendurl                   = соотвXMLУзел.Получить("faxsendurl");
      РаботаСФаксамиВозможна          = (faxsendurl<>"NO");
 
Большое спасибо за ответы!

У меня появилась эта кнопка, переменная РаботаСФаксамиВозможна стала равна Истина :)
Толи "эффект присутствия", вы же отписались на форуме :) , или из-за "отладки" - я поставил точку останова в какое-то из мест кода, где используется эта переменная, и она уже стала Истина.
Изменено: Биматов Михаил - 28.10.2016 11:09:51 (дополнена информация)
 
Далее при отправке факса появилась ошибка "Ajam", я спросил про нее в ветке https://telefon.miko.ru/forum/forum18/topic1253/messages/messages/
Читают тему (гостей: 1)