Имя: Пароль:
1C
1С v8
Заполнение макета перед печатью
0 kolesnTanya
 
22.06.14
15:21
Помогите пожалуйста с построением конструкций (две проблемы в одном документе):
1.
В формеДокумента две табличные части. Как сделать так, что бы по устанавливаемому крыжу в строке Первой табличной части, происходили изменения в связанной строке Второй табличной части ?
<>
Процедура ОсновныеДействияФормыПечатныеФормы(Кнопка)

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

Как видно из примера, в левой табличной части, в каждой строке можно выставить отметку (крыж). Каждая строка первой и второй таблиц связаны. ПО нажатию на кнопку выводятся данные в макет и на печать.
КАК сделать так что бы в Этой процедуре (вывода на печать), при проверке - СТОИТ или не стоит крыж, данные уходящие в макет - занулялись например, и в макет (см.пример ОбластьСтр ) ничего не падала.
???
1 Wobland
 
22.06.14
15:23
можно я ничего не понял, и без фото не взлетит?
2 Ярус
 
22.06.14
15:36
если крыж есть то Табдок.вывести(...) если нет то не ненадо
3 kolesnTanya
 
23.06.14
10:12
Все просто. конфа самодельная, нетиповая. платформа 8.1.     в форме есть табличные части.  в процедуре - посредством цикла опрашивается каждая строка табличных частей, собирая данные для передачи в макет , для последующей печати.
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой