Имя: Пароль:
1C
1C 7.7
v7: Увеличить кол-во ценников на листе в ТиС
0 alexdomovoi
 
02.06.17
22:10
Добрый вечер. Подскажите плиз как что изменить в форме Printcen.ert что бы на листе А4 в одну строку умещалось 3 ценника, стандартно умещается 2, я убавил в размерах ценник не прокатило, куда копнуть дальше?
1 HawkEye
 
02.06.17
22:29
(0) исключительно в код....
2 Tarlich
 
02.06.17
22:33
там же все просто 2 шт и 3 разрыв страницы
3 Tarlich
 
02.06.17
22:34
разберись тут -))
Процедура ДобавитьЦенник(Таб, ПечФирма, ПечНаименование, ПечЕдиница, ПечРозн, Столбик, Ряд)
        
    Столбик    = ?(Столбик = 0, 1      , 0  );
    Ряд        = ?(Столбик = 0, Ряд + 1, Ряд);

    Если Ряд > 3 Тогда
        Таб.НоваяСтраница();
        Ряд = 1;
    КонецЕсли;
    
    Если Столбик = 0 Тогда
        Таб.ВывестиСекцию("Товар|Ценник");
    Иначе
        Таб.ПрисоединитьСекцию("Товар|Ценник");
    КонецЕсли;

КонецПроцедуры // ДобавитьЦенник()
4 alexdomovoi
 
04.06.17
08:00
надеюсь кому то поможет, что бы не задавали вопросов.
Процедура ДобавитьЦенник(Таб, Фирма, ПечНаименование, ПечЕдиница, ПечРозн, Столбик, Ряд) Экспорт
        
    Столбик    = ?(Столбик = 2, 0, Столбик+1);
    Ряд        = ?(Столбик = 0, Ряд + 1, Ряд);

    Если Ряд > 3 Тогда
        Таб.НоваяСтраница();
        Ряд = 1;
    КонецЕсли;
    
    Если Столбик = 0 Тогда
        Таб.ВывестиСекцию("Товар|Ценник");
    Иначе
        Таб.ПрисоединитьСекцию("Товар|Ценник");
    КонецЕсли;

КонецПроцедуры // ДобавитьЦенник()

и изменил

    Таб = СоздатьОбъект("Таблица");
    Таб.ИсходнаяТаблица("Таблица");
    
    ПечФирма = СокрЛП(Докум.Фирма.ЮрЛицо.ПолнНаименование);
    
    Столбик = 2;
    Ряд     = 0;

В итоге делает 3 ценника в ряд на листе, мне большего и не надо.
5 AliAksA
 
05.06.17
14:06
(0) ну я бы с автомасштабом в параметрах страницы бы ещё погулялся
6 HawkEye
 
05.06.17
14:09
(5) и чем бы это помогло исправить код? ))
7 AliAksA
 
05.06.17
14:14
(6) ну ориент на слово "умещается" делал - мало-ли за пределы страницы улетала секция
8 HawkEye
 
05.06.17
14:15
(7) "одну строку умещалось 3 ценника, стандартно умещается 2"
9 AliAksA
 
05.06.17
14:16
+(7) а ну ... и столбик в коде профукал - отвлекли)
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.