Имя: Пароль:
1C
1С v8
Как вывести такую таблицу в печатную форму?
,
0 Механик
 
15.04.22
12:47
Нужно печатать такую печатную форму: https://radikalfoto.ru/ib/2oEkLnQtNz
К одному товару может быть разное количество заказов, следовательно, в колонке "Заказы" может быть разное количество строк.
То есть сначала я вывожу с товаром (Таб.ВывестиСекцию(Товар)), а потом как сделать, чтобы была одна секция с товаром, высотой в несколько строк, а справа было присоединено несколько строк с номерами заказов?
1 mikecool
 
15.04.22
12:57
а с радикала что то подсовывает, касперский послал, ищи другую площадку
2 PR
 
15.04.22
12:58
(0) Сначала выводишь, после вывода объединяешь
3 nodrama
 
15.04.22
13:01
Взята с дургого форума..

Программно можно объеденить и разбить ячейки и линии нарисовать. так как тебе надо


Процедура КнопкаСформироватьНажатие(Кнопка)
  
   ТабДок = ЭлементыФормы.ОтчетРезультат;
  
   Область = ТабДок.Область("R22C9:R22C10");
   Область.Объединить();
  
   Линия = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная);
   Область.Обвести(Линия, Линия, Линия, Линия);
   ТабДок.ВставитьОбласть(Область, , ТипСмещенияТабличногоДокумента.ПоВертикали);
  
   Область0 = ТабДок.Область("R23C9:R23C10");
   Область0.Разъединить();
  
   Область2 = ТабДок.Область("R23C9");
   Область2.Обвести(Линия, Линия, Линия, Линия);
   Область3 = ТабДок.Область("R23C10");
   Область3.Обвести(Линия, Линия, Линия, Линия);
  
   Область.Текст = "Область";
   Область2.Текст = "Область2";
   Область3.Текст = "Область3";
  
КонецПроцедуры
4 lEvGl
 
гуру
15.04.22
15:02
если к товару еще штрих код понадобится, то будет чуть веселее и интереснее
5 Лирик
 
15.04.22
15:32
(4) Вообще фигня вопрос:                    

НовыйРисунок = ТабДок.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
НовыйРисунок.Картинка = КартинкаТовара;
НовыйРисунок.РазмерКартинки = РазмерКартинки.Пропорционально;

ОбластьКартинки = ТабДок.Область(ПерваяСтрокаНоменклатуры, НомерКолонкиДляРисунка , ПоследняяСтрокаНоменклатуры, НомерКолонкиДляРисунка);
    
НовыйРисунок.Расположить(ОбластьКартинки);
6 lEvGl
 
гуру
15.04.22
15:46
(5) текст не закроет?
7 lEvGl
 
гуру
15.04.22
15:54
ну и + у ТС 77
8 Лирик
 
15.04.22
15:55
(6) Отдельную опциональную колонку под штрихкод и нечего закрывать, с высотой только поиграть надо, но тоже решаемо.
9 Лирик
 
15.04.22
15:56
(7) А за 77 это я моргнул (
10 lEvGl
 
гуру
15.04.22
16:01
поиграть надо да, по центру в области расположить, иначе выглядит уныло и непрактично, картинки вплотную друг к другу будут
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.