Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Печать 2-х экз.на одной странице
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики
LenaS
1С:Бухгалтерия для Украины (Предприятие - 8.2.16.368, релиз 1.2.7.4)
Я не программист, поэтому прошу это учесть в ответах, но терминологию уже немного изучила.
Создала внешнюю печатную форму акта выполненных работ. Необходимо было убрать шапку с "Утверждаю" (учет по ФОП и в ней смысла нет) и представителя организации в тексте акта.
Все получилось, работает благополучно.
Но вторую задачу выполнить пока не получается - два экземпляра должны печататься на одной странице ф.А4.
Как можно решить это во внешней печатной форме, не затрагивая общие модули 1с?
MATEVI
Например как в налоговой
 Для Страница = 1 По 2 Цикл
//...тут выводите свои данные
Если Страница <> 2 Тогда
    ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
КонецЦикла;
Ardi
В шаблоне выделить мышкой кусок и вставить справа ещё раз.
LenaS
Цитата(MATEVI @ 11.11.12, 22:54) необходимо зарегистрироваться для просмотра ссылки
Например как в налоговой
 Для Страница = 1 По 2 Цикл
//...тут выводите свои данные
Если Страница <> 2 Тогда
    ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
КонецЦикла;

//...тут выводите свои данные
Данные документа?
Прописать это и в функции (модуле), и в процедуре (форме)?
Vofka
Цитата(LenaS @ 12.11.12, 9:29) необходимо зарегистрироваться для просмотра ссылки
//...тут выводите свои данные

Там должен быть код печати, который сейчас выводит документ на печать.

Цитата(LenaS @ 12.11.12, 9:29) необходимо зарегистрироваться для просмотра ссылки
Прописать это и в функции (модуле), и в процедуре (форме)?

Прописать это надо в конце функции Печать (или как она у вас называется).
LenaS
Цитата(Ardi @ 12.11.12, 1:02) необходимо зарегистрироваться для просмотра ссылки
В шаблоне выделить мышкой кусок и вставить справа ещё раз.

Пробовала скопировать, но внизу - ничего не получилось. Попробую еще и справа.
Спасибо.
Vofka
Цитата(LenaS @ 12.11.12, 9:36) необходимо зарегистрироваться для просмотра ссылки
Пробовала скопировать, но внизу - ничего не получилось. Попробую еще и справа.

Зачем? Сделайте как написал Matevi.
MATEVI
Закиньте свою обработку. Или код хотя бы.
Meest
    Для  Страница=1 по  2 Цикл        
        Если не Страница/ 2 = Цел(Страница/2) Тогда
            ТабДок.Вывести(Область);
            СЧ = СЧ+1;
        Иначе
            ТабДок.Присоединить(Область,2);
            СЧ = СЧ+1;
        КонецЕсли;
        Если СЧ = 2 Тогда
            ТабДок.ВывестиВертикальныйРазделительСтраниц();
            ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
            СЧ = 0;
        КонецЕсли;
LenaS
Цитата(MATEVI @ 11.11.12, 22:54) необходимо зарегистрироваться для просмотра ссылки
Например как в налоговой
 Для Страница = 1 По 2 Цикл
//...тут выводите свои данные
Если Страница <> 2 Тогда
    ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
КонецЦикла;

По Вашей рекомендации все получилось (еще раз спасибо), но не до конца.
После формирования акта, вижу два экземпляра, расположенные горизонтально один под другим с разделителем.
НО! Предварительный просмотр перед печатью показывает и затем печатает каждый лист отдельно.
Лишь в случае выбора в настройках принтера печати двух экземпляров на одной странице, печатает допустимо - документ разворачивает на 90 градусов и оба экземпляра печатаются на одном листе.
Ardi
Файл\параметры страницы\Экземпляров на страницу\2
LenaS
Цитата(Ardi @ 12.11.12, 20:17) необходимо зарегистрироваться для просмотра ссылки
Файл\параметры страницы\Экземпляров на страницу\2

Не очень хорошо. При таком варианте не делается автоматическое сжатие текста (и поворот), если строк номенклатуры будет более двух, то на одной странице 2 не поместится. Даже, если убрать все колонтитулы и поля.
Ardi
Файл\параметры страницы\Экземпляров на страницу\Авто
LenaS
Цитата(Ardi @ 12.11.12, 22:43) необходимо зарегистрироваться для просмотра ссылки
Файл\параметры страницы\Экземпляров на страницу\Авто

Уже пробовала разные варианты, в том числе и этот. Результат = 0
Meest
Цитата(LenaS @ 13.11.12, 8:13) необходимо зарегистрироваться для просмотра ссылки
Уже пробовала разные варианты, в том числе и этот. Результат = 0

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