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

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

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

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

Зюзюка
читатель
офлайн
Дата регистрации: 21.04.2010
Сообщений: 5
Пост №1
 
06.05.2010 17:07

создаю внешнюю печатную форму ведомости МБ-7, <br>скопировал макет и модуль объекта из документа передача материалов в эксплуатацию<br>при вызове ВПФ ведомости МБ - 7 пишет:<br> не удалось сформировать ВПФ<br> Недостаточно фактических параметров<br><br>Помогите люди добрые

zak555 (398843952)
читатель
офлайн
Дата регистрации: 27.03.2008
Сообщений: 4656
Пост №2
 
06.05.2010 19:58

1. номер версии 1с<br>2. а где код

Зюзюка
читатель
офлайн
Дата регистрации: 21.04.2010
Сообщений: 5
Пост №3
 
07.05.2010 09:36

"версия 8.1<br>релиз 1.6.24.7<br><br><br>Код:<br>// Функция формирует печатную форму документа МБ-7<br>//<br>Функция ПечатьМБ7()Экспорт<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> | ВЫРАЗИТЬ(Спецодежда.Номенклатура.НаименованиеПолное КАК СТРОКА(1000)) КАК ТоварНаименование,<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> ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПередачаМатериаловВЭксплуатацию_МБ7";<br> <br> // Вывод заголовка<br> Макет = ПолучитьМакет("МБ7");<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>КонецФункции // ПечатьМБ7()<br><br><br><br><br><br>// Процедура осуществляет печать документа. Можно направить печать на <br>// экран или принтер, а также распечатать необходмое количество копий.<br>//<br>// Название макета печати передается в качестве параметра,<br>// по переданному названию находим имя макета в соответствии.<br>//<br>// Параметры:<br>// НазваниеМакета - строка, название макета.<br>//<br>Функция Печать(ИмяМакета, КоличествоЭкземпляров = 1, НаПринтер = Ложь, НепосредственнаяПечать = Ложь) Экспорт<br> <br> // Получить экземпляр документа на печать<br> Если      ИмяМакета = "МБ7" Тогда<br> ТабДокумент = ПечатьМБ7();<br> ИначеЕсли ИмяМакета = "М11" Тогда<br> ТабДокумент = ПечатьМ11();<br> <br> КонецЕсли;<br> <br> УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, КоличествоЭкземпляров, НаПринтер, ОбщегоНазначения.СформироватьЗаголовокДокумента(СсылкаНаОбъект.Ссылка), НепосредственнаяПечать);<br> <br>КонецФункции // Печать()<br>"

ВРедная
читатель
офлайн
Дата регистрации: 03.02.2007
Сообщений: 954
Пост №4
 
07.05.2010 13:28

Почитайте справку с внешним печатным формам, в частности:<br><br><br>Требования к подключению внешних обработок:<br><...><br>Внешняя печатная форма.<br>Внешняя обработка содержащая:<br><...><br>Функция «Печать()» - без параметров, возвращающая табличный документ.

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

Читают тему:

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