почему проверитьвывод() не срабатывает

Функция ОткрытиеОтчета(Док)

ДокОбъект=Док.ПолучитьОбъект();

Макет_Печать = ДокОбъект.ПолучитьМакет("Печать1");

ОбластьШапкаГлДокумента = Макет_Печать.ПолучитьОбласть("ШапкаГлДокумента");
ОбластьПодвалГлДокумента= Макет_Печать.ПолучитьОбласть("ПодвалГлДокумента");

ОбластьШапка_Материалы = Макет_Печать.ПолучитьОбласть("Шапка_Материалы");
ОбластьМатериалы=Макет_Печать.ПолучитьОбласть("Материалы");
ОбластьШапкаОперации = Макет_Печать.ПолучитьОбласть("ШапкаОперации");
ОбластьОперации= Макет_Печать.ПолучитьОбласть("Операции");
//ОбластьОперации_пустая= Макет_Печать.ПолучитьОбласть("Операции_пустая");
ОбластьПодвалКаждСтр =Макет_Печать.ПолучитьОбласть("ПодвалКаждСтр");
ОбластьШапкаКажСтр=Макет_Печать.ПолучитьОбласть("ШапкаКажСтр");

СтрокаСПодвалГлДокументаМатер=Новый Массив;
СтрокаСПодвалГлДокументаМатер.Добавить(ОбластьМатериалы);
СтрокаСПодвалГлДокументаМатер.Добавить(ОбластьПодвалГлДокумента);
/////////////////////////////////////////
СтрокаСПодвалКаждСтрМатер=Новый Массив;
СтрокаСПодвалКаждСтрМатер.Добавить(ОбластьМатериалы);
СтрокаСПодвалКаждСтрМатер.Добавить(ОбластьПодвалКаждСтр);
////////////////////////////////////////
СтрокаСПодвалГлДокументаОпер=Новый Массив;
СтрокаСПодвалГлДокументаОпер.Добавить(ОбластьОперации);
СтрокаСПодвалГлДокументаОпер.Добавить(ОбластьПодвалГлДокумента);
/////////////////////////////////////////
СтрокаСПодвалКаждСтрОпер=Новый Массив;
СтрокаСПодвалКаждСтрОпер.Добавить(ОбластьОперации);
СтрокаСПодвалКаждСтрОпер.Добавить(ОбластьПодвалКаждСтр);
/////////////////////////////////////////
МеждуВыводами=Новый Массив;
МеждуВыводами.Добавить(ОбластьШапка_Материалы);
МеждуВыводами.Добавить(ОбластьМатериалы);
МеждуВыводами.Добавить(ОбластьПодвалКаждСтр);

МеждуВыводамиГл=Новый Массив;
МеждуВыводамиГл.Добавить(ОбластьШапка_Материалы);
МеждуВыводамиГл.Добавить(ОбластьМатериалы);
МеждуВыводамиГл.Добавить(ОбластьПодвалГлДокумента);
////////////////////////////////

///////////////////////////////
НомерСтраницы=0;

//********************************************************************************
ТабДок = Новый ТабличныйДокумент;
ТабДок.АвтоМасштаб=Истина;
ТабДок.РазмерСтраницы="A4";
ТабДок.ВысотаСтраницы=297;
ТабДок.ШиринаСтраницы=210;
ТабДок.ОриентацияСтраницы=ОриентацияСтраницы.Ландшафт;
ТабДок.ПолеСверху=5;
ТабДок.ПолеСлева=7;
ТабДок.ПолеСправа=7;
ТабДок.ПолеСнизу=8;

ОбластьШапкаГлДокумента.Параметры.Код_тех=СокрЛП(ДокОбъект.КГАДСЕ.Код);
ОбластьШапкаГлДокумента.Параметры.Наименование_тех=СокрЛП(ДокОбъект.КГАДСЕ.Наименование);
ОбластьШапкаКажСтр.Параметры.Код_тех=СокрЛП(ДокОбъект.КГАДСЕ.Код);
//**********************************************************************************

///вывели главную шапку
если СокрЛП(ДокОбъект.Литера.Порядок)="6" тогда
ОбластьШапкаГлДокумента.Параметры.L6=СокрЛП(ДокОбъект.Литера.Наименование);

иначеесли СокрЛП(ДокОбъект.Литера.Порядок)="3" тогда
ОбластьШапкаГлДокумента.Параметры.L3=СокрЛП(ДокОбъект.Литера.Наименование);
конецесли;
ОбластьШапкаГлДокумента.Параметры.Название=" Маршрутная карта"+Символы.ПС+Символы.Таб+"Операции";
ТабДок.Вывести(ОбластьШапкаГлДокумента);
///////////////////////////////////////////////////********************
//выводим операции

//*********************************************************************************
ТаблЗначенийДляСортировкиОперЛокал=СортировкаВетвиОперацииВДереве(ДокОбъект);
Линия1="";
СтрокаОпераций=0;
Для Эл=1 По (ТабДок.Область("R10C4:R11C9").Право-ТабДок.Область("R10C4:R11C9").Лево)*6 цикл
Линия1=Линия1+"_";
конеццикла;
Для каждого Эл из ТаблЗначенийДляСортировкиОперЛокал Цикл
//если материалов не было то проверяем на вместимость с главным подвалом а если не первая страница то с подвалом для операций
если НомерСтраницы=0 тогда
МассивВывода=СтрокаСПодвалГлДокументаОпер;
иначе
МассивВывода=СтрокаСПодвалКаждСтрОпер;
конецесли;
////////////////////////////////////////////////////////
ОбластьОперации.Параметры.Наим=Эл.КГАВидОперации.Наименование;
ОбластьОперации.Параметры.Опер=ТехноПроцессОбщийМодуль.ПририсовкаНулейКНомеруОперации(Эл.НомерОперации);
ОбластьОперации.Параметры.Участок=Лев(СокрЛП(Эл.КГАРабочийЦентр),2);
ОбластьОперации.Параметры.Раб_место1=Прав(СокрЛП(Эл.КГАРабочийЦентр),4);
//ОбластьОперации.Параметры.Оборуд=Эл.КГАВидОборудования;
ОбластьОперации.Параметры.КодПроф=Эл.КГАКодПрофессии;
ОбластьОперации.Параметры.Кол_раб=Эл.Кол_раб;
ОбластьОперации.Параметры.КодТарифнойСетки=Эл.КодТарифнойСетки;
ОбластьОперации.Параметры.Разряд=Эл.Разряд;
ОбластьОперации.Параметры.КодВидаНормы=Эл.КодВидаНормы;
ОбластьОперации.Параметры.Содержание=Эл.Содержание;
ОбластьОперации.Параметры.симв=символы.ПС+символы.ВК;
// Закинем все оборудование на операцию
СтрокаОборудования="";
Для каждого ЭлОборуд из ДокОбъект.Оборудование Цикл
если СокрЛП(Строка(Эл.НомерОперации))=СокрЛП(ЭлОборуд.Операция.НомерОперации) тогда
СтрокаОборудования=?(СтрокаОборудования<>"",СтрокаОборудования+" , "+ЭлОборуд.Оборудование.Наименование,ЭлОборуд.Оборудование.Наименование);
конецесли;
конеццикла;
ОбластьОперации.Параметры.Оборуд=СтрокаОборудования;
//
ВремСтрока="";

Для каждого ЭлДок из ДокОбъект.Документы_1 цикл
если СокрЛП(Строка(Эл.НомерОперации))=СокрЛП(ЭлДок.Операция.НомерОперации) тогда
ВремСтрока=?(ВремСтрока<>"",ВремСтрока+" , "+ЭлДок.Документ.Обозначение,ЭлДок.Документ.Обозначение);
конецесли;
КонецЦикла;
ОбластьОперации.Параметры.ОбознДок=ВремСтрока;

если ПустаяСтрока(Эл.Содержание)=Ложь тогда
ОбластьОперации.Параметры.Линия1=" "+Линия1;
иначе
ОбластьОперации.Параметры.Линия1="";
конецесли;
/////////////////////////////////////////////////////////
ЕстьМестоНаСтраницеДляЗаполнения=Истина;
если ТабДок.ПроверитьВывод(МассивВывода)= Истина тогда
если СтрокаОпераций=0 тогда
ТабДок.Вывести(ОбластьШапкаОперации);
конецесли;
ТабДок.Вывести(ОбластьОперации);
СтрокаОпераций=СтрокаОпераций+1;
ЕстьМестоНаСтраницеДляЗаполнения=Истина;
иначе
ЕстьМестоНаСтраницеДляЗаполнения=Ложь;
НомерСтраницы=НомерСтраницы+1;

если НомерСтраницы=1 тогда
ОбластьПодвалГлДокумента.Параметры.НомерСтраницы=НомерСтраницы;
ОбластьПодвалГлДокумента.Параметры.КолСтрок="КолСтрокОпер";
ОбластьПодвалГлДокумента.Параметры.ДатаОтчета="ДатаОтчетаОпер";
ОбластьПодвалГлДокумента.Параметры.РазработалМК=ДокОбъект.РазработалМК.Наименование;
ОбластьПодвалГлДокумента.Параметры.ПроверилМК=ДокОбъект.ПроверилМК.Наименование;
ОбластьПодвалГлДокумента.Параметры.НормирМК=ДокОбъект.НормировалМК.Наименование;
ОбластьПодвалГлДокумента.Параметры.УтвердилМК=ДокОбъект.УтвердилМК.Наименование;
ТабДок.Вывести(ОбластьПодвалГлДокумента);
иначе
ОбластьПодвалКаждСтр.Параметры.НомерСтраницы=НомерСтраницы;
ТабДок.Вывести(ОбластьПодвалКаждСтр);
конецесли;

если СтрокаОпераций<ТаблЗначенийДляСортировкиОперЛокал.Количество() тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
ТабДок.Вывести(ОбластьШапкаКажСтр);
ТабДок.Вывести(ОбластьШапкаОперации);
ТабДок.Вывести(ОбластьОперации);
СтрокаОпераций=СтрокаОпераций+1;
ЕстьМестоНаСтраницеДляЗаполнения=Истина;
конецесли;
конецесли;

Конеццикла;
////////////////////////////достройка до конца страницы - операции

если (ДокОбъект.Операции.Количество()<>0) и (ЕстьМестоНаСтраницеДляЗаполнения=Истина) тогда
если НомерСтраницы=0 тогда
МассивВывода=СтрокаСПодвалГлДокументаОпер;
иначе
МассивВывода=СтрокаСПодвалКаждСтрОпер;
конецесли;
ОбластьОперации.Параметры.Наим="";
ОбластьОперации.Параметры.Опер="";
ОбластьОперации.Параметры.Участок="";
ОбластьОперации.Параметры.Оборуд="";
ОбластьОперации.Параметры.КодПроф="";
ОбластьОперации.Параметры.Раб_место1="";
ОбластьОперации.Параметры.Кол_раб="";
ОбластьОперации.Параметры.КодТарифнойСетки="";
ОбластьОперации.Параметры.Разряд="";
ОбластьОперации.Параметры.КодВидаНормы="";
ОбластьОперации.Параметры.Содержание="";
ОбластьОперации.Параметры.симв="";
ОбластьОперации.Параметры.ОбознДок="";

Для Эл=0 По ТабДок.ВысотаТаблицы*10 Цикл

если ТабДок.ПроверитьВывод(МассивВывода)= Истина тогда
ТабДок.Вывести(ОбластьОперации);
иначе
НомерСтраницы=НомерСтраницы+1;
если НомерСтраницы=1 тогда
ОбластьПодвалГлДокумента.Параметры.НомерСтраницы=НомерСтраницы;
ОбластьПодвалГлДокумента.Параметры.КолСтрок="КолСтрокОпер";
ОбластьПодвалГлДокумента.Параметры.ДатаОтчета="ДатаОтчетаОпер";
ОбластьПодвалГлДокумента.Параметры.РазработалМК=ДокОбъект.РазработалМК.Наименование;
ОбластьПодвалГлДокумента.Параметры.ПроверилМК=ДокОбъект.ПроверилМК.Наименование;
ОбластьПодвалГлДокумента.Параметры.НормирМК=ДокОбъект.НормировалМК.Наименование;
ОбластьПодвалГлДокумента.Параметры.УтвердилМК=ДокОбъект.УтвердилМК.Наименование;

ТабДок.Вывести(ОбластьПодвалГлДокумента);
иначе
ОбластьПодвалКаждСтр.Параметры.НомерСтраницы=НомерСтраницы;
ТабДок.Вывести(ОбластьПодвалКаждСтр);
конецесли;
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();

Прервать;
конецесли;
конеццикла;
конецесли;
///////////////////////////конец -достройка до конца страницы - операции
КолСтрОперации=НомерСтраницы;

//***************************************************вывод материалов
//вывели шапку материалы
если ДокОбъект.ТехнологическийСостав.Количество()<>0 тогда
НомерСтраницы=0;
///вывели главную шапку
если СокрЛП(ДокОбъект.Литера.Порядок)="6" тогда
ОбластьШапкаГлДокумента.Параметры.L6=СокрЛП(ДокОбъект.Литера.Наименование);

иначеесли СокрЛП(ДокОбъект.Литера.Порядок)="3" тогда
ОбластьШапкаГлДокумента.Параметры.L3=СокрЛП(ДокОбъект.Литера.Наименование);
конецесли;
ОбластьШапкаГлДокумента.Параметры.Название=" Маршрутная карта"+Символы.ПС+Символы.Таб+"Материалы";
ТабДок.Вывести(ОбластьШапкаГлДокумента);
///////////////////////////////////////////////////********************

СтрокаТехСостава=0;
ПервыйВходВОтчетМатериалов=Истина;
Для каждого Эл из ДокОбъект.ТехнологическийСостав Цикл
///////////////////////////////////
если (НомерСтраницы=0) тогда
МассивВывода=СтрокаСПодвалГлДокументаМатер;
иначе
МассивВывода=СтрокаСПодвалКаждСтрМатер;
конецесли;
/////////////////////////////////////

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

СтрокаТехСостава=СтрокаТехСостава+1;

//выводим дитаэл

иначе
НомерСтраницы=НомерСтраницы+1;

если НомерСтраницы=1 тогда
ОбластьПодвалГлДокумента.Параметры.НомерСтраницы=НомерСтраницы;
//вывели главный подвал
ОбластьПодвалГлДокумента.Параметры.КолСтрок="КолСтрокМат";
ОбластьПодвалГлДокумента.Параметры.ДатаОтчета="ДатаОтчетаМат";
ТабДок.Вывести(ОбластьПодвалГлДокумента);

иначе
//выводим обычный подвал

ОбластьПодвалКаждСтр.Параметры.НомерСтраницы=НомерСтраницы;
ТабДок.Вывести(ОбластьПодвалКаждСтр);
конецесли;

если (СтрокаТехСостава<ДокОбъект.ТехнологическийСостав.Количество()) или (ДокОбъект.Операции.Количество()<>0) тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
//со второй страницы выводим Обычную шапку
ТабДок.Вывести(ОбластьШапкаКажСтр);
//и шапку материалов
ТабДок.Вывести(ОбластьШапка_Материалы);
ТабДок.Вывести(ОбластьМатериалы);
СтрокаТехСостава=СтрокаТехСостава+1;

конецесли;
конецесли;

Конеццикла;
//конецесли;

//*********************************************************************************
//////////////////////////////////////////////////////////////
//достройка до конца страницы

если (НомерСтраницы=0) тогда
МассивДоВывода=СтрокаСПодвалГлДокументаМатер;
ОбластьКонВывода=ОбластьПодвалГлДокумента;
ОбластьСтрока=ОбластьМатериалы;
//флаг_выбора=2;
иначе
//МассивДоВывода=СтрокаСПодвалГлДокументаОпер;
МассивДоВывода=СтрокаСПодвалКаждСтрМатер;
ОбластьКонВывода= ОбластьПодвалКаждСтр;
ОбластьСтрока=ОбластьМатериалы;
//флаг_выбора=2;
конецесли;
/////////////////////////////////////////////////////////////
ОбластьСтрока.Параметры.НаимМат="";
ОбластьСтрока.Параметры.КЕИ="" ;
ОбластьСтрока.Параметры.МасДет="";
ОбластьСтрока.Параметры.ЗагРазм="";
ОбластьСтрока.Параметры.КолДет="";
ОбластьСтрока.Параметры.МасЗаг="";
ОбластьСтрока.Параметры.НормРас="";
ОбластьМатериалы.Параметры.Опер="";
ОбластьМатериалы.Параметры.КодДСЕ="";
Для Эл=0 По ТабДок.ВысотаТаблицы*10 Цикл

если ТабДок.ПроверитьВывод(МассивДоВывода)= Истина тогда

ТабДок.Вывести(ОбластьМатериалы);
иначе
если НомерСтраницы=0 тогда
ОбластьПодвалГлДокумента.Параметры.НомерСтраницы=НомерСтраницы+1;
иначе
ОбластьПодвалКаждСтр.Параметры.НомерСтраницы=НомерСтраницы+1;
конецесли;
ОбластьПодвалГлДокумента.Параметры.КолСтрок="КолСтрокМат";
ОбластьПодвалГлДокумента.Параметры.ДатаОтчета="ДатаОтчетаМат";
ТабДок.Вывести(ОбластьКонВывода);
Прервать;
конецесли;
КонецЦикла;
конецесли;
//////////////////////////////////////////////////////////////////////////////////////////////////////
КолСтр1=ТабДок.НайтиТекст("КолСтрокМат");
если КолСтр1<>Неопределено тогда
КолСтр1.Текст=НомерСтраницы+1;
конецесли;
ДатаСтр1=ТабДок.НайтиТекст("ДатаОтчетаМат");
если ДатаСтр1<>Неопределено тогда
ДатаСтр1.Текст=Лев(Строка(ДокОбъект.Дата),10);
конецесли;
КолСтр=ТабДок.НайтиТекст("КолСтрокОпер");
если КолСтр<>Неопределено тогда
КолСтр.Текст=КолСтрОперации;
конецесли;
ДатаСтр=ТабДок.НайтиТекст("ДатаОтчетаОпер");
если ДатаСтр<>Неопределено тогда
ДатаСтр.Текст=Лев(Строка(ДокОбъект.Дата),10);
конецесли;
//********** кто вводил и проверял маршрутную карту

//РазработалМКСтр=ТабДок.НайтиТекст("РазработалМК");
//если РазработалМКСтр<>Неопределено тогда
// РазработалМКСтр.Текст=ЭтотОбъект.РазработалМК.Наименование;
//конецесли;
//ПроверилМКСтр=ТабДок.НайтиТекст("ПроверилМК");
//если ПроверилМКСтр<>Неопределено тогда
// ПроверилМКСтр.Текст=ЭтотОбъект.ПроверилМК.Наименование;
//конецесли;
//НормирМКСтр=ТабДок.НайтиТекст("НормирМК");
//если НормирМКСтр<>Неопределено тогда
// НормирМКСтр.Текст=ЭтотОбъект.НормировалМК.Наименование;
//конецесли;
//УтвердилМКСтр=ТабДок.НайтиТекст("УтвердилМК");
//если УтвердилМКСтр<>Неопределено тогда
// УтвердилМКСтр.Текст=ЭтотОбъект.УтвердилМК.Наименование;
//конецесли;
//*********************************************************************************************
//вывод ведомости оснастки
ОбластьШапкаВедомостиОснастки = Макет_Печать.ПолучитьОбласть("ШапкаВедомостиОснастки");
ОбластьВедомостиОснастки=Макет_Печать.ПолучитьОбласть("ВедомостьОснастки");
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
ОбластьШапкаГлДокумента.Параметры.Название="Ведомость оснастки";
ТабДок.Вывести(ОбластьШапкаГлДокумента);

//*********************************************************************************************
//вывод табличного документа
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Ложь;
ТабДок.ОтображатьЗаголовки = Ложь;
Возврат ТабДок;