Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Внешняя печатная форма

Лянка
читатель
офлайн
Дата регистрации: 05.08.2010
Сообщений: 124
Пост №1
 
24.03.2011 11:22

"Добрый день! Создаю внешнюю печатную форму Заявка на расходование средств.<br>Проверяю модуль на синтаксические ошибки говорит что нет ошибок<br><br>Функция ПечатьЗаявка() Экспорт<br> <br> <br> СсылкаНаОбъект.РасчетыСКонтрагентами = СсылкаНаОбъект.ВидОперации;<br> СсылкаНаОбъект.РасчетыСПодотчетником = СсылкаНаОбъект.ВидОперации;<br> <br> ТабДокумент = Новый ТабличныйДокумент;<br> ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ЗаявкаНаРасходованиеСредств";<br> <br> Макет = ПолучитьМакет("Заявка");<br> Обл = Макет.ПолучитьОбласть("Шапка");<br> Обл.Параметры.ЗаголовокЗаявки=""""+ЭтотОбъект+СсылкаНаОбъект.Символы.ПС+СсылкаНаОбъект.ВидОперации;<br><br> Обл.Параметры.Заполнить(СсылкаНаОбъект);<br> ТабДокумент.Вывести(Обл);<br><br> <br> Если СсылкаНаОбъект.РасчетыСПодотчетником тогда<br> ОбластьСтрока = Макет.ПолучитьОбласть("ТаблицаПодотчетник");<br> ОбластьСтрока.Параметры.ДолгПодотчетника =СсылкаНаОбъект.Ссылка;<br> Иначе<br> ОбластьСтрока = Макет.ПолучитьОбласть("ТаблицаКонтрагент");<br> КонецЕсли;<br> ОбластьСтрока.Параметры.Заполнить(ЭтотОбъект);<br> <br> <br> <br><br> ТабДокумент.Вывести(ОбластьСтрока);<br> <br> <br> Обл = Макет.ПолучитьОбласть("Подвал");<br> Обл.Параметры.Заполнить(СсылкаНаОбъект);<br> Обл.Параметры.РуководительЦФО = СсылкаНаОбъект.РуководительЦФО;<br> <br> Запрос = Новый Запрос;<br> Запрос.Текст = "ВЫБРАТЬ<br> | ОтветственныеЛицаОрганизацииСрезПоследних.ОтветственноеЛицо,<br> | ОтветственныеЛицаОрганизацииСрезПоследних.ФизическоеЛицо<br> |ИЗ<br> | РегистрСведений.ОтветственныеЛицаОрганизации.СрезПоследних(&Дата, СтруктурнаяЕдиница = &Организация) КАК ОтветственныеЛицаОрганизацииСрезПоследних";<br> Запрос.УстановитьПараметр("Дата", СсылкаНаОбъект);<br> Запрос.УстановитьПараметр("Организация",СсылкаНаОбъект);<br> Выборка = Запрос.Выполнить().Выбрать();<br> Пока Выборка.Следующий()Цикл<br> Если Выборка.ОтветственноеЛицо = СсылкаНаОбъект.ОтветственныеЛицаОрганизации.ГлавныйБухгалтер Тогда<br> Обл.Параметры.ГлБухгалтер = СсылкаНаОбъект.Выборка.ФизическоеЛицо;<br> ИначеЕсли Выборка.ОтветственноеЛицо = СсылкаНаОбъект.ОтветственныеЛицаОрганизации.БюджетныйКонтролер Тогда<br> Обл.Параметры.БюджетныйКонтролер = СсылкаНаОбъект.Выборка.ФизическоеЛицо;<br> ИначеЕсли Выборка.ОтветственноеЛицо = СсылкаНаОбъект.ОтветственныеЛицаОрганизации.ФинДиректор Тогда<br> Обл.Параметры.ФинДиректор =СсылкаНаОбъект.Выборка.ФизическоеЛицо;<br> КонецЕсли;<br> КонецЦикла;<br> <br> <br> ТабДокумент.Вывести(Обл);<br> <br> Возврат ТабДокумент;<br>КонецФункции<br><br><br>но когда тестирую выдает ошибку<br> <br>Ошибка при вызове метода контекста (ПолучитьФорму): Недопустимое значение параметра (параметр номер '1')<br>Что я не так делаю?"

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №2
 
24.03.2011 12:06

А Функция Печать () все-таки присутствует?

Лянка
читатель
офлайн
Дата регистрации: 05.08.2010
Сообщений: 124
Пост №3
 
24.03.2011 12:10

"Да!<br>Функция Печать() Экспорт<br> <br>ТабДокумент = ПечатьЗаявка();<br> <br>Возврат ТабДокумент;<br> <br>КонецФункции"

Thorvardr
читатель
офлайн
Дата регистрации: 25.02.2005
Сообщений: 3082
Пост №4
 
24.03.2011 12:19

"А я так делал, в этом случае оно вписывается в задуманную концепцию внешних печатных форм типовой конфигурации (в моем случае было Управление торговлей, редакция 11.0 (11.0.5.4)):<br> <br><pre>Функция СведенияОВнешнейОбработке() Экспорт ПараметрыРегистрации = Новый Структура; МассивНазначений = Новый Массив; ПараметрыРегистрации.Вставить("Вид", "ПечатнаяФорма"); МассивНазначений.Добавить("Документ.ЗаказКлиента"); ПараметрыРегистрации.Вставить("Назначение", МассивНазначений); ПараметрыРегистрации.Вставить("Наименование", "Заказ клиента с выводом итога по таблице товаров с учетом НДС при ситуации 'Цена без НДС'"); ПараметрыРегистрации.Вставить("Версия", "1.0"); ПараметрыРегистрации.Вставить("БезопасныйРежим", Истина); ПараметрыРегистрации.Вставить("Информация", "Версия от 11.02.2011 г."); ТаблицаКоманд = ПолучитьТаблицуКоманд(); ДобавитьКоманду(ТаблицаКоманд, "Заказ клиента с итогом по таблице при 'Цена без НДС'", "СчетЗаказ", "ВызовСерверногоМетода", Истина, "ПечатьMXL"); ПараметрыРегистрации.Вставить("Команды", ТаблицаКоманд); Возврат ПараметрыРегистрации;КонецФункции<br>Функция ПолучитьТаблицуКоманд() Команды = Новый ТаблицаЗначений; Команды.Колонки.Добавить("Представление", Новый ОписаниеТипов("Строка")); Команды.Колонки.Добавить("Идентификатор", Новый ОписаниеТипов("Строка")); Команды.Колонки.Добавить("Использование", Новый ОписаниеТипов("Строка")); Команды.Колонки.Добавить("ПоказыватьОповещение", Новый ОписаниеТипов("Булево")); Команды.Колонки.Добавить("Модификатор", Новый ОписаниеТипов("Строка")); Возврат Команды;КонецФункции<br>Процедура ДобавитьКоманду(ТаблицаКоманд, Представление, Идентификатор, Использование, ПоказыватьОповещение = Ложь, Модификатор = """") НоваяКоманда = ТаблицаКоманд.Добавить(); НоваяКоманда.Представление = Представление; НоваяКоманда.Идентификатор = Идентификатор; НоваяКоманда.Использование = Использование; НоваяКоманда.ПоказыватьОповещение = ПоказыватьОповещение; НоваяКоманда.Модификатор = Модификатор;КонецПроцедуры// Сформировать печатные формы объектов//// ВХОДЯЩИЕ:// ИменаМакетов - Строка - Имена макетов, перечисленные через запятую// МассивОбъектов - Массив - Массив ссылок на объекты которые нужно распечатать// ПараметрыПечати - Структура - Структура дополнительных параметров печати//// ИСХОДЯЩИЕ:// КоллекцияПечатныхФорм - Таблица значений - Сформированные табличные документы// ПараметрыВывода       - Структура       - Параметры сформированных табличных документов//Процедура Печать(МассивОбъектов, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт Если УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "СчетЗаказ") Тогда УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "СчетЗаказ", "Заказ клиента", СформироватьПечатнуюФорму(МассивОбъектов, ОбъектыПечати)); КонецЕсли; КонецПроцедуры // Печать() Функция СформироватьПечатнуюФорму(МассивОбъектов, ОбъектыПечати) УстановитьПривилегированныйРежим(Истина); ТабличныйДокумент = Новый ТабличныйДокумент;.... ТабличныйДокумент.АвтоМасштаб = Истина; Если ПривилегированныйРежим() Тогда УстановитьПривилегированныйРежим(Ложь); КонецЕсли; Возврат ТабличныйДокумент; КонецФункции // ПечатнаяФорма() </pre>"

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №5
 
24.03.2011 12:22

А что подразумевалось под<br>> но когда тестирую<br>Вы подключили в сервис-дополнительные внешние отчеты...-Печатные формы, а потом из документа нажали печать и получили ошибку?

Лянка
читатель
офлайн
Дата регистрации: 05.08.2010
Сообщений: 124
Пост №6
 
24.03.2011 12:23

но у меня не типовая :( У меня УПП проф 1.2. (.1.2.36.1).<br>Думайте подойдет?

Лянка
читатель
офлайн
Дата регистрации: 05.08.2010
Сообщений: 124
Пост №7
 
24.03.2011 12:24

> А что подразумевалось под<br>> > но когда тестирую<br>> Вы подключили в сервис-дополнительные внешние отчеты...-Печатные формы, а потом из документа нажали печать и получили ошибку?<br>Да!

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №8
 
24.03.2011 12:27

Приведите полный текст ошибки - там еще должна быть ссылка на строку, где произошла ошибка.<br>У вас Клиент-Серверный вариант?<br>Включите в конфигураторе (в режиме отладки) остановку по ошибке и посмотрите что за строка вызывает ошибку, и что за параметр передается.

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №9
 
24.03.2011 12:28

Ничего себе не типовая :)<br>С изменениями наверно, но внешние формы работают на ура.

Лянка
читатель
офлайн
Дата регистрации: 05.08.2010
Сообщений: 124
Пост №10
 
24.03.2011 13:37

> Приведите полный текст ошибки - там еще должна быть ссылка на строку, где произошла ошибка.<br>> У вас Клиент-Серверный вариант?<br>> Включите в конфигураторе (в режиме отладки) остановку по ошибке и посмотрите что за строка вызывает ошибку, и что за параметр передается.<br> <br> Вот именно нет не какой строки. Если была бы можно было понять что я не так делаю. А он только и пишет<br>"Не удалось сформировать внешнюю печатную форму<br>Ошибка при вызове метода контекста (ПолучитьФорму): Недопустимое значение параметра (параметр номер '1')"

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация