Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 05:37

Заполнение макета перед печатью

Автор КолесниковаТ, 22 июн 2014, 15:01

0 Пользователей и 1 гость просматривают эту тему.

КолесниковаТ

Помогите пожалуйста с построением конструкций (две проблемы в одном документе):
1.
В формеДокумента две табличные части. Как сделать так, что бы по устанавливаемому крыжу в строке Первой табличной части, происходили изменения в связанной строке Второй табличной части ?
Процедура ОсновныеДействияФормыПечатныеФормы(Кнопка)

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

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

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск