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

Хранилище

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

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



> Как позиционировать текущую строку ...?          
cobra77777 Подменю пользователя
сообщение 22.09.15, 16:14
Сообщение #1

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

Есть код (см.внизу).
Собственно хочу вывести отчёт Только текущую строку (одну) (а не всё сразу как в моём примере (цикле)) ?


Процедура ПечатьЭтикетки(ТабДок, Ссылка) Экспорт
    //{{_КОНСТРУКТОР_ПЕЧАТИ(Акт)
    Макет = Документы.АктОтправкиТехникиВРемонт.ПолучитьМакет("ПечатьЭтикетки");
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |        АктОтправкиТехникиВРемонт.ТабличнаяЧасть.(
    |       Принтер,
    |        ИнвентарныйНомер,
    |        ЗаводскойНомер,
    |       Причина  
    |    )
    |ИЗ
    |    Документ.АктОтправкиТехникиВРемонт КАК АктОтправкиТехникиВРемонт
    |ГДЕ
    |    АктОтправкиТехникиВРемонт.Ссылка В (&Ссылка)";
    Запрос.Параметры.Вставить("Ссылка", Ссылка);
    Выборка = Запрос.Выполнить().Выбрать();

    ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    Шапка = Макет.ПолучитьОбласть("Шапка");
    ОбластьТабличнаяЧастьШапка = Макет.ПолучитьОбласть("ТабличнаяЧастьШапка");
    ОбластьТабличнаяЧасть = Макет.ПолучитьОбласть("ТабличнаяЧасть");
    Подвал = Макет.ПолучитьОбласть("Подвал");

    ТабДок.Очистить();

    ВставлятьРазделительСтраниц = Ложь;
    Пока Выборка.Следующий() Цикл
        Если ВставлятьРазделительСтраниц Тогда
            ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
        КонецЕсли;

        ТабДок.Вывести(ОбластьЗаголовок);
        
        Шапка.Параметры.Заполнить(Выборка);
        ТабДок.Вывести(Шапка, Выборка.Уровень());


        ТабДок.Вывести(ОбластьТабличнаяЧастьШапка);
        ВыборкаТабличнаяЧасть = Выборка.ТабличнаяЧасть.Выбрать();
        Пока ВыборкаТабличнаяЧасть.Следующий() Цикл
            ОбластьТабличнаяЧасть.Параметры.Заполнить(ВыборкаТабличнаяЧасть);
             ТабДок.Вывести(ОбластьТабличнаяЧасть, ВыборкаТабличнаяЧасть.Уровень());
        КонецЦикла;
        
        Подвал.Параметры.Заполнить(Выборка);
        ТабДок.Вывести(Подвал);
        ТабДок.АвтоМасштаб = Истина;
        ТабДок.ПолеСлева = 7;
        ТабДок.ПолеСправа=10;
        ТабДок.ПолеСверху=10;
        ТабДок.ПолеСнизу=10;
        ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
           ВставлятьРазделительСтраниц = Истина;
        
         КонецЦикла;
    //}}
КонецПроцедуры



 ! 

Выделяйте код!
 


Сообщение отредактировал Vofka - 22.09.15, 16:42

VikingKosmo Подменю пользователя
сообщение 22.09.15, 16:17
Сообщение #2

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

Если этот код находится в модуле менеджера, то никак. Текущая строка доступна только в модуле формы. Что вообще требуется, сформировать некий ТабличныйДокумент в который попадут данные только из текущей строки табличной части, что ли?

cobra77777 Подменю пользователя
сообщение 22.09.15, 16:28
Сообщение #3

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

Цитата(VikingKosmo @ 22.09.15, 17:17) *
Если этот код находится в модуле менеджера, то никак. Текущая строка доступна только в модуле формы. Что вообще требуется, сформировать некий ТабличныйДокумент в который попадут данные только из текущей строки табличной части, что ли?

Да собственно нужно из Табличной Части (далее ТЧ) по ОДНОЙ СТРОКЕ выводилась на Печать этикетка. Т.е. куда установил курсор в ТЧ то и распечатывалось.

Vofka Подменю пользователя
сообщение 22.09.15, 16:43
Сообщение #4

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

Цитата(cobra77777 @ 22.09.15, 17:28) *
Да собственно нужно из Табличной Части (далее ТЧ) по ОДНОЙ СТРОКЕ выводилась на Печать этикетка. Т.е. куда установил курсор в ТЧ то и распечатывалось.

Тогда нужно в процедуру печати передавать данные текущей строки, которые, как написали выше, можно получить только в модуле формы.

cobra77777 Подменю пользователя
сообщение 22.09.15, 17:05
Сообщение #5

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

Цитата(Vofka @ 22.09.15, 17:43) *
Тогда нужно в процедуру печати передавать данные текущей строки, которые, как написали выше, можно получить только в модуле формы.

На форме создал Кнопку прописал две директивы &Клиент &На сервере, а далее... ?

Vofka Подменю пользователя
сообщение 22.09.15, 19:34
Сообщение #6

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

Это вы документ напечатать хотите? Создайте параметризуемую команду с типом ссылка на ваш документ. В обработчике команды будет ссылка на него. Там же можно вставить серверную функцию, которая вернет Табличный документ (либо запросит его у какой-то другой процедуры). А саму команду в виде кнопки сможете вынести практически везде, куда надо.

cobra77777 Подменю пользователя
сообщение 23.09.15, 12:23
Сообщение #7

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

Цитата(Vofka @ 22.09.15, 20:34) *
Это вы документ напечатать хотите? Создайте параметризуемую команду с типом ссылка на ваш документ. В обработчике команды будет ссылка на него. Там же можно вставить серверную функцию, которая вернет Табличный документ (либо запросит его у какой-то другой процедуры). А саму команду в виде кнопки сможете вынести практически везде, куда надо.

Собственно хочу из табл.части распечатывать (по одной шт.) этикетки. Это я имею ввиду.

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

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

Так у вас в функции печати есть ссылка на документ. Поэтому я предполагаю, что ваша строка - это конкретный документ.

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


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

 

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