Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2, свеженьких 1
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Печать 2-х экз.на одной странице , Внешняя печатная форма акта в.р. Необходима печать 2 экз на 1 странице          
LenaS Подменю пользователя
сообщение 11.11.12, 20:56
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 42
Из: Львов
Спасибо сказали: 7 раз
Рейтинг: 0

1С:Бухгалтерия для Украины (Предприятие - 8.2.16.368, релиз 1.2.7.4)
Я не программист, поэтому прошу это учесть в ответах, но терминологию уже немного изучила.
Создала внешнюю печатную форму акта выполненных работ. Необходимо было убрать шапку с "Утверждаю" (учет по ФОП и в ней смысла нет) и представителя организации в тексте акта.
Все получилось, работает благополучно.
Но вторую задачу выполнить пока не получается - два экземпляра должны печататься на одной странице ф.А4.
Как можно решить это во внешней печатной форме, не затрагивая общие модули 1с?

MATEVI Подменю пользователя
сообщение 11.11.12, 22:54
Сообщение #2

Отдыхающий
Иконка группы
Ветеран троянской войныМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 2201
Из: Одесса
Спасибо сказали: 956 раз
Рейтинг: 0

Например как в налоговой
 Для Страница = 1 По 2 Цикл
//...тут выводите свои данные
Если Страница <> 2 Тогда
    ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
КонецЦикла;

Спасибо сказали: LenaS,

Ardi Подменю пользователя
сообщение 12.11.12, 1:02
Сообщение #3

Живет на форуме
***********
Гений телепатии и социального моделирования
Группа: Пользователи
Сообщений: 4121
Из: Киев
Спасибо сказали: 957 раз
Рейтинг: 0

В шаблоне выделить мышкой кусок и вставить справа ещё раз.


Signature
Услуги 1С программиста 8.2, 7.7 (Плохо, дорого, очередь). Киев.

Спасибо сказали: LenaS,

LenaS Подменю пользователя
сообщение 12.11.12, 9:29
Сообщение #4

Общительный
**
Группа: Пользователи
Сообщений: 42
Из: Львов
Спасибо сказали: 7 раз
Рейтинг: 0

Цитата(MATEVI @ 11.11.12, 22:54) *
Например как в налоговой
 Для Страница = 1 По 2 Цикл
//...тут выводите свои данные
Если Страница <> 2 Тогда
    ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
КонецЦикла;

//...тут выводите свои данные
Данные документа?
Прописать это и в функции (модуле), и в процедуре (форме)?

Vofka Подменю пользователя
сообщение 12.11.12, 9:31
Сообщение #5

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4519 раз
Рейтинг: 3641.2

Цитата(LenaS @ 12.11.12, 9:29) *
//...тут выводите свои данные

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

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

Прописать это надо в конце функции Печать (или как она у вас называется).

Спасибо сказали: LenaS,

LenaS Подменю пользователя
сообщение 12.11.12, 9:36
Сообщение #6

Общительный
**
Группа: Пользователи
Сообщений: 42
Из: Львов
Спасибо сказали: 7 раз
Рейтинг: 0

Цитата(Ardi @ 12.11.12, 1:02) *
В шаблоне выделить мышкой кусок и вставить справа ещё раз.

Пробовала скопировать, но внизу - ничего не получилось. Попробую еще и справа.
Спасибо.

Vofka Подменю пользователя
сообщение 12.11.12, 9:44
Сообщение #7

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4519 раз
Рейтинг: 3641.2

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

Зачем? Сделайте как написал Matevi.

Спасибо сказали: LenaS,

MATEVI Подменю пользователя
сообщение 12.11.12, 12:13
Сообщение #8

Отдыхающий
Иконка группы
Ветеран троянской войныМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 2201
Из: Одесса
Спасибо сказали: 956 раз
Рейтинг: 0

Закиньте свою обработку. Или код хотя бы.

Спасибо сказали: LenaS,

Meest Подменю пользователя
сообщение 12.11.12, 13:17
Сообщение #9

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 170
Из: Украина
Спасибо сказали: 32 раз
Рейтинг: 0

    Для  Страница=1 по  2 Цикл        
        Если не Страница/ 2 = Цел(Страница/2) Тогда
            ТабДок.Вывести(Область);
            СЧ = СЧ+1;
        Иначе
            ТабДок.Присоединить(Область,2);
            СЧ = СЧ+1;
        КонецЕсли;
        Если СЧ = 2 Тогда
            ТабДок.ВывестиВертикальныйРазделительСтраниц();
            ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
            СЧ = 0;
        КонецЕсли;


Сообщение отредактировал Meest - 12.11.12, 13:18

LenaS Подменю пользователя
сообщение 12.11.12, 19:59
Сообщение #10

Общительный
**
Группа: Пользователи
Сообщений: 42
Из: Львов
Спасибо сказали: 7 раз
Рейтинг: 0

Цитата(MATEVI @ 11.11.12, 22:54) *
Например как в налоговой
 Для Страница = 1 По 2 Цикл
//...тут выводите свои данные
Если Страница <> 2 Тогда
    ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
КонецЦикла;

По Вашей рекомендации все получилось (еще раз спасибо), но не до конца.
После формирования акта, вижу два экземпляра, расположенные горизонтально один под другим с разделителем.
НО! Предварительный просмотр перед печатью показывает и затем печатает каждый лист отдельно.
Лишь в случае выбора в настройках принтера печати двух экземпляров на одной странице, печатает допустимо - документ разворачивает на 90 градусов и оба экземпляра печатаются на одном листе.

Ardi Подменю пользователя
сообщение 12.11.12, 20:17
Сообщение #11

Живет на форуме
***********
Гений телепатии и социального моделирования
Группа: Пользователи
Сообщений: 4121
Из: Киев
Спасибо сказали: 957 раз
Рейтинг: 0

Файл\параметры страницы\Экземпляров на страницу\2


Signature
Услуги 1С программиста 8.2, 7.7 (Плохо, дорого, очередь). Киев.

LenaS Подменю пользователя
сообщение 12.11.12, 21:15
Сообщение #12

Общительный
**
Группа: Пользователи
Сообщений: 42
Из: Львов
Спасибо сказали: 7 раз
Рейтинг: 0

Цитата(Ardi @ 12.11.12, 20:17) *
Файл\параметры страницы\Экземпляров на страницу\2

Не очень хорошо. При таком варианте не делается автоматическое сжатие текста (и поворот), если строк номенклатуры будет более двух, то на одной странице 2 не поместится. Даже, если убрать все колонтитулы и поля.

Ardi Подменю пользователя
сообщение 12.11.12, 22:43
Сообщение #13

Живет на форуме
***********
Гений телепатии и социального моделирования
Группа: Пользователи
Сообщений: 4121
Из: Киев
Спасибо сказали: 957 раз
Рейтинг: 0

Файл\параметры страницы\Экземпляров на страницу\Авто


Signature
Услуги 1С программиста 8.2, 7.7 (Плохо, дорого, очередь). Киев.

Спасибо сказали: LenaS,

LenaS Подменю пользователя
сообщение 13.11.12, 8:13
Сообщение #14

Общительный
**
Группа: Пользователи
Сообщений: 42
Из: Львов
Спасибо сказали: 7 раз
Рейтинг: 0

Цитата(Ardi @ 12.11.12, 22:43) *
Файл\параметры страницы\Экземпляров на страницу\Авто

Уже пробовала разные варианты, в том числе и этот. Результат = 0

Meest Подменю пользователя
сообщение 13.11.12, 8:41
Сообщение #15

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 170
Из: Украина
Спасибо сказали: 32 раз
Рейтинг: 0

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

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

Спасибо сказали: LenaS,

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 20.04.24, 1:40
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!