Можно ли присоединить область к области при печати? / 1С

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / 1С [игнор отключен] [закрыт для гостей] / Можно ли присоединить область к области при печати?

18 сообщений из 18, страница 1 из 1

Можно ли присоединить область к области при печати?

#37521760

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

Привет всем. Не могу понять шо за фигня. Есть код:

Код: plaintext

1.
2.
3.
4.

ОбластьМакета = Макет.ПолучитьОбласть("Строка|Колонка");
ОбластьШтрихКода = Макет.ПолучитьОбласть("СтрокаШтрихКод|Колонка");

ОбластьМакета.Присоединить(ОбластьШтрихКода);

Последняя строка кода не присоеденяет, а выводит. Т.е. две команды дают одинаковый результат:
ОбластьМакета.Присоединить(ОбластьШтрихКода);
и
ОбластьМакета.Вывести(ОбластьШтрихКода);

Куда копать?

Для ограничения типов значений характеристики типами конкретного выбранного вида характеристики у ресурса ЗначениеХарактеристики в качестве значения свойства Связь по типу выбрано измерение регистра ВидХарактеристики . (Е. Ю. Хрусталева)

...

Рейтинг:

0 / 0

11.11.2011, 12:37

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37521945

Программист 1с

Участник

Откуда: Москва

Сообщения: 4 426

Рейтинг: 0 / 0

Так шо молодые москали пугают. Бачут надо сначало Вывести а уж потом Присоединять. А вы никак сразу присоединяете

...

Рейтинг:

0 / 0

11.11.2011, 13:28

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522040

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

Программист 1с,

Мне нужно возле названия места хранения выводить штрихкод этого места. Но где штрихкод будет выводиться нужно выбирать (над названием, под названием, слева, справа). Вот я и хотел к области с названием присоединить или вывести область со шрихкодом, а потом это всё дело выводить в табличный документ.

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

...

Рейтинг:

0 / 0

11.11.2011, 13:49

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522156

Программист 1с

Участник

Откуда: Москва

Сообщения: 4 426

Рейтинг: 0 / 0

ОбластьМакета.Вывести(ОбластьШтрихКода);
ОбластьМакета.Присоединить(ОбластьШтрихКода);

Вот так Выводит 2 в 1 строку?

У Вас Вывести есть перед присоединить? А размеры областей которые в вывести и присоединить совпадают? Если все да - но не работает. Кидайте текст и картинки.

...

Рейтинг:

0 / 0

11.11.2011, 14:17

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522359

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

Вывести (Put)
Описание:

Выводит табличный документ в результирующий табличный документ, добавляя его со следующей строки вслед за самой нижней выведенной строкой, начиная с первой колонки.

Присоединить (Join)
Описание:

Присоединяет табличный документ к результирующему табличному документу, помещая его в следующей колонке правее самой правой выведенной колонки, начиная со строки, с которой выводился предыдущий табличный документ.

...

Рейтинг:

0 / 0

11.11.2011, 15:15

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522381

Программист 1с

Участник

Откуда: Москва

Сообщения: 4 426

Рейтинг: 0 / 0

Код покажите.

Хелп и так знаю.

...

Рейтинг:

0 / 0

11.11.2011, 15:22

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522390

sWinTyz

Участник

Откуда: Москва

Сообщения: 652

Рейтинг: 0 / 0

он хочет область мышкой буксировать
не мучте человека
пусть творит

...

Рейтинг:

0 / 0

11.11.2011, 15:25

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522452

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

Долго объяснять но...
Конфигурация УТ для Украины. Для справочника МестоХранения добавлено текстовое поле "Штрихкод".
Предварительный код (идет отладка):

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.

	Запрос = Новый Запрос;
	Запрос.УстановитьПараметр("Родитель", МестоХранения.Ссылка);
	Запрос.Текст = "ВЫБРАТЬ
	               |	ЕСТЬNULL(МестаХранения.Родитель.Родитель.Родитель.НаименованиеКраткое + "":"", """") + ЕСТЬNULL(МестаХранения.Родитель.Родитель.НаименованиеКраткое + ""-"", """") + ЕСТЬNULL(МестаХранения.Родитель.НаименованиеКраткое + ""/"", """") + ЕСТЬNULL(МестаХранения.НаименованиеКраткое, """") КАК КодировкаМестаХранения,
	               |	МестаХранения.ШтрихКод
	               |ИЗ
	               |	Справочник.МестаХранения КАК МестаХранения
	               |ГДЕ
	               |	МестаХранения.Родитель В ИЕРАРХИИ(&Родитель)
	               |	И МестаХранения.ЭтоГруппа = ЛОЖЬ
	               |
	               |УПОРЯДОЧИТЬ ПО
	               |	МестаХранения.Ссылка ИЕРАРХИЯ";
	
	РезультатЗапроса = Запрос.Выполнить().Выгрузить();
	
	//Если пустой запрос
	Если РезультатЗапроса.Количество()= 0  Тогда
		Возврат;
	КонецЕсли;
	
	ТабДокумент = Новый ТабличныйДокумент;
	Макет = Справочники.МестаХранения.ПолучитьМакет("Наклейки");
	ОбластьКодаМеста = Макет.ПолучитьОбласть("Строка|Колонка");
	ОбластьШтрихКода = Макет.ПолучитьОбласть("Строка|КолонкаШтрихКод");
	
	Колонка =  1 ;
	Для Каждого Строка из РезультатЗапроса Цикл
		
		ШтрихкодИКодМеста = Новый ТабличныйДокумент;
		ШтрихкодИКодМеста.Вывести(ОбластьШтрихКода);
		ОбластьКодаМеста.Параметры.Заполнить(Строка);
		ШтрихкодИКодМеста.Присоединить(ОбластьКодаМеста);
	
		Если Колонка > КоличествоКолонок Тогда
			Колонка =  1 ;
		КонецЕсли;
        		
		Если Колонка =  1  Тогда
			ТабДокумент.Вывести(ШтрихкодИКодМеста);
		Иначе
			ТабДокумент.Присоединить(ШтрихкодИКодМеста);
		КонецЕсли;
		
		Колонка = Колонка+ 1 ;
		
	КонецЦикла;
	
	//Выведем на экран наклейки
	ТабДокумент.АвтоМасштаб = Истина;
	ТабДокумент.Показать();

где
КоличествоКолонок - в сколько колонок нужно выводить наклейки.

Макет Наклейки :

...

Рейтинг:

0 / 0

11.11.2011, 15:49

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522523

sWinTyz

Участник

Откуда: Москва

Сообщения: 652

Рейтинг: 0 / 0

а получается чего ?
вперемешку все скачет?

...

Рейтинг:

0 / 0

11.11.2011, 16:14

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522535

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

sWinTyz,

Нет, но не так как нужно.

...

Рейтинг:

0 / 0

11.11.2011, 16:17

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522542

sWinTyz

Участник

Откуда: Москва

Сообщения: 652

Рейтинг: 0 / 0

так а что получается
а то написано в коде не то что бы я написал

...

Рейтинг:

0 / 0

11.11.2011, 16:19

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522554

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

Я уже вроде вкурил в чем проблема. Если не разберусь отпишусь.

...

Рейтинг:

0 / 0

11.11.2011, 16:24

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522557

sWinTyz

Участник

Откуда: Москва

Сообщения: 652

Рейтинг: 0 / 0

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.

ШтрихкодИКодМеста = Новый ТабличныйДокумент;

Для Каждого Строка из РезультатЗапроса Цикл
		
	ОбластьКодаМеста.Параметры.Заполнить(Строка);
             ОбластьШтрихКода.Параметры.Заполнить(Строка);

            ТабДокумент.Вывести(ШтрихкодИКодМеста);
            ТабДокумент.Присоединить(ОбластьШтрихКода);

КонецЦикла;
ТабДокумент.АвтоМасштаб = Истина;
ТабДокумент.Показать();

...

Рейтинг:

0 / 0

11.11.2011, 16:26

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522597

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

У меня пользователь при печати указывает сколько наклеек по ширине на листе должно помещаться и где на наклейке размещается штрихкод (внизу, вверху, по бокам). Поэтому 1С код значительно усложняется.

...

Рейтинг:

0 / 0

11.11.2011, 16:41

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522620

sWinTyz

Участник

Откуда: Москва

Сообщения: 652

Рейтинг: 0 / 0

та же ерунда
ничего не усложняется

...

Рейтинг:

0 / 0

11.11.2011, 16:51

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522627

sWinTyz

Участник

Откуда: Москва

Сообщения: 652

Рейтинг: 0 / 0

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.

Ширина= 5 ;
ШтрихкодИКодМеста = Новый ТабличныйДокумент;
Номер= 1 ;
Для Каждого Строка из РезультатЗапроса Цикл
	ОбластьКодаМеста.Параметры.Заполнить(Строка);
             ОбластьШтрихКода.Параметры.Заполнить(Строка);
             Если Номер>Ширина Тогда
                 ТабДокумент.Присоединить(ШтрихкодИКодМеста);
                 Номер= 1 ;
             Иначе
                 ТабДокумент.Вывести(ШтрихкодИКодМеста);
                 Номер=Номер+ 1 ;
            КоенцЕсли;            
            ТабДокумент.Присоединить(ОбластьШтрихКода);
КонецЦикла;
ТабДокумент.АвтоМасштаб = Истина;
ТабДокумент.Показать();

...

Рейтинг:

0 / 0

11.11.2011, 16:56

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522680

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

Всё сделал. Нашел где я ошибался. Спасибо всем за помощь.

...

Рейтинг:

0 / 0

11.11.2011, 17:15

| Ответить | Цитировать | Написать

Можно ли присоединить область к области при печати?

#37522696

Юрец

Участник

Откуда: Киев

Сообщения: 1 554

Рейтинг: 0 / 0

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.

ГотовыйДокумент = Новый ТабличныйДокумент;
	
	Макет = Справочники.МестаХранения.ПолучитьМакет("Наклейки");
	ОбластьКодаМеста = Макет.ПолучитьОбласть("Строка|Колонка");
	ОбластьШтрихКода = Макет.ПолучитьОбласть("Строка|КолонкаШтрихКод");
	
	//Обнулим необходимые переменные 
	Колонка =  1 ;
	СтрокаНаклеек = Новый ТабличныйДокумент;
	
	Для Каждого СтрокаРезультата из РезультатЗапроса Цикл
		
		//Заполняем кодировку места хранения
		ОбластьКодаМеста.Параметры.Заполнить(СтрокаРезультата);
		
		//Заполняем штрихкод
		Если ЗначениеЗаполнено(Строка.Штрихкод) Тогда
			ОбластьШтрихКода.Рисунки.Штрихкод.Объект.ТипКода =  1 ;
			ОбластьШтрихКода.Рисунки.Штрихкод.Объект.Сообщение = Строка.ШтрихКод;
			ОбластьШтрихКода.Рисунки.Штрихкод.ВыводитьНаПечать = Истина;
		Иначе
			ОбластьШтрихКода.Рисунки.Штрихкод.ВыводитьНаПечать = Ложь;
			ОбластьШтрихКода.Рисунки.Штрихкод.Объект.Сообщение = Строка.ШтрихКод;
		КонецЕсли;

		//Если штрихкод нужно выводить 
		Если ПечататьШтрихКод Тогда
			
			//Размещение штрихкода на наклейке
			Если РазмещениеШтрихкода = "Верх" Тогда
				Наклейка.Вывести(ОбластьШтрихКода);
				Наклейка.Вывести(ОбластьКодаМеста);
			ИначеЕсли РазмещениеШтрихкода = "Низ" Тогда
				Наклейка.Вывести(ОбластьКодаМеста);
				Наклейка.Вывести(ОбластьШтрихКода);
			ИначеЕсли РазмещениеШтрихкода = "Лево" Тогда
				Наклейка.Присоединить(ОбластьШтрихКода);
				Наклейка.Присоединить(ОбластьКодаМеста);
			ИначеЕсли РазмещениеШтрихкода = "Право" Тогда
				Наклейка.Присоединить(ОбластьКодаМеста);
				Наклейка.Присоединить(ОбластьШтрихКода);
			КонецЕсли;
			
		//Если выводим без штрихкода
		Иначе
			Наклейка.Вывести(ОбластьКодаМеста);
		КонецЕсли;
		
		Если Колонка = КоличествоКолонок Тогда
			СтрокаНаклеек.Присоединить(Наклейка);
			ГотовыйДокумент.Вывести(СтрокаНаклеек);
			Колонка =  1 ;
			СтрокаНаклеек = Новый ТабличныйДокумент;
		Иначе
			СтрокаНаклеек.Присоединить(Наклейка);
			Колонка = Колонка+ 1 ;
		КонецЕсли;
			
	КонецЦикла;
	
	//Выводим последнюю строку наклеек которая была сформирована но не выведена в цикле
	ГотовыйДокумент.Вывести(СтрокаНаклеек);
	
	//Выведем на экран наклейки
	ГотовыйДокумент.АвтоМасштаб = Истина;
	ГотовыйДокумент.Показать();

Спасибо всем за помощь.

...

Рейтинг:

0 / 0

11.11.2011, 17:19

| Ответить | Цитировать | Написать

18 сообщений из 18, страница 1 из 1

Форумы / 1С [игнор отключен] [закрыт для гостей] / Можно ли присоединить область к области при печати?

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=28&msg=37522542&tid=1520864]:	0ms
get settings:	11ms
get forum list:	21ms
check forum access:	4ms
check topic access:	4ms
track hit:	107ms
get topic data:	15ms
get forum data:	4ms
get page messages:	76ms
get tp. blocked users:	1ms
others:	252ms

total:	495ms