"Подскажите пожалуйста с вопросиком.<br><br>Есть обработка "ПакетОтчетовДоп" с печатной формой "Отчет по ордерам", в которой есть поле "Неисправность"(НА ЧТО ОБРАЩАЮ ВАШЕ ВНИМАНИЕ!!!).<br>Вообще суть обработки состоит в том,чтобы взять и вывести отчет по ОРДЕРАМ сразу для всех сотрудников(к примеру их туда попало 3 человека - Осипов,Иванов и Петров).<br>Всё отлично формируеться за исключения одной маленькой прихоти БОССА....чтобы после формирования группы таких отчетов при двойном клике на ячейку "Неисправность" весь отчет отсортировался по этой самой графе.<br><br>И вот тут возникает такая проблемка - Все эти 3 отчета формировались с помощью ТаблицыЗначений(ТЗ1) <br>....<br>ТЗ1.НомерДок = Док.ТекущийДокумент();<br>ТЗ1.ДатаДок = Док.ДатаДок;<br>ТЗ1.ДатаОкончания = Док.ДатаОкончания;<br>....<br>и получаеться что каждый раз при выборе следующего сотрудника для отчета предыдущие затирались.<br><br>Поэтому когда все отчеты сформированы и нажать двойным кликом на ячейку "Неисправность" на любом из них,то сортируеться и соответственно обновляеться только отчет по последнему сотруднику.<br><br>//-------------------------------------------<br>Процедура ОбновитьТаблицу()<br>... <br> ТЗ1.ВыбратьСтроки();<br> Пока ТЗ1.ПолучитьСтроку() = 1 цикл<br> Таб.ВывестиСекцию("Строка");<br> НомерПП = НомерПП + 1;<br> КонецЦикла;<br>... <br>КонецПроцедуры<br>//-------------------------------------------<br>Процедура ОбработкаЯчейкиТаблицы(Зн, Стандарт, Таб, Адр)<br> ...<br> Если Зн = "Неисправность" тогда<br> ТЗ1.Сортировать(Зн);<br> ОбновитьТаблицу();<br> КонецЕсли;<br>КонецПроцедуры<br>//-------------------------------------------<br><br>Теперь не знаю как можно сделать чтобы из ТЗ1 каждый раз все поля сохранялись куда-то!!!!!!,чтобы впоследствии сортировалось всё правильно...<br><br>"
Сообщений: 69
Сообщений: 4656
каков её смысл обработки ?
Сообщений: 69
Вообще суть обработки состоит в том,чтобы взять и вывести отчет по ОРДЕРАМ сразу для всех сотрудников(к примеру их туда попало 3 человека - Осипов,Иванов и Петров).
Сообщений: 4656
> Вообще суть обработки состоит в том,чтобы взять и вывести отчет по ОРДЕРАМ сразу для всех сотрудников(к примеру их туда попало 3 человека - Осипов,Иванов и Петров).<br><br>какой ордер ? подробнее
Сообщений: 803
Как формируется отчет по каждому сотруднику? Запросом? Перебором документов (ордеров)?
Сообщений: 69
"это дописанная конфа,в ней есть док.Ордер,в котором указываються:<br>- контрагент,сдавший оборудование в ремонт;<br>- сотрудник,ответственный за выполнение работ;<br>...ну там датаприема,датаВыдачи оборудования,вобщем ещё много чего."
Сообщений: 69
перебором документов
Сообщений: 803
"Так, идем далее, отчеты вы делаете по каждому сотруднику отдельно, то есть сформировали по Иванову, а когда начинаете формировать по Петрову, ТаблицаЗначений очищается? Так?<br><br>Вот маленький пример (на вскидку):<br><br> Если ТЗ1.КоличествоСтрок()>0 Тогда<br> Рез=Вопрос("В талице уже есть данные, очистить ее?",3);<br> Если Рез=2 Тогда<br> Возврат;<br> КонецЕсли;<br> Если Рез=6 Тогда<br> ТЗ1.УдалитьСтроки();<br> КонецЕсли;<br> КонецЕсли;<br> Док=СоздатьОбъект("Документ.Ордер");<br> Док.ВыбратьДокументы(НачДата,КонДата);<br> Пока Док.ПолучитьДокумент()>0 Цикл<br> Если Док.Проведен()=0 Тогда<br> Продолжить;<br> КонецЕсли;<br> Если Док.Сотрудник<>ВыбСотрудник Тогда<br> Продолжить;<br> КонецЕсли;<br> Стр=ТЗ1.КоличествоСтрок()+1;<br> ТЗ1.НовыяСтрока(Стр);<br> ТЗ1.НомерДок=Док.НомерДок;<br> ТЗ1.ДатаДок=Док.ДатаДок;<br> ТЗ1.Контрагент=Док.Контрагент;<br> ТЗ1.ДатаПриема=Док.ДатаПриема;<br> ТЗ1.ДатаВыдачи=Док.ДатаВыдачи;<br> //...<br> //вобщем ещё много чего.<br> //...<br> КонецЦикла;<br><br>НачДата и КонДата период выбора документов, ВыбСотрудник - по кому формируем отчет, это реквизиты формы ввода.<br><br>Если пример ни на что не натолкнет, то приведите свой код.<br>"
Сообщений: 69
"> то есть сформировали по Иванову, а когда начинаете формировать по Петрову, ТаблицаЗначений очищается? Так?<br><br>Отличный пример - все вот так и происходит,с формированием самих отчетов у меня проблем не возникает.<br><br>Только как я понимаю код,у вас будет одна ТЗ1, наполненная данными по всем сотрудникам????<br>Ну даже если так как же эту ТЗ1 потом отсортировать????<br><br>А проблема как раз в том, что при попытке отсортировать <br><br> //-------------------------------------------<br> Процедура ОбновитьТаблицу()<br> ... <br> ТЗ1.ВыбратьСтроки();<br> Пока ТЗ1.ПолучитьСтроку() = 1 цикл<br> Таб.ВывестиСекцию("Строка");<br> НомерПП = НомерПП + 1;<br> КонецЦикла;<br> .... <br> КонецПроцедуры<br> //-------------------------------------------<br> Процедура ОбработкаЯчейкиТаблицы(Зн, Стандарт, Таб, Адр)<br> Если Зн = "Неисправность" тогда<br> ТЗ1.Сортировать(Зн);<br> ОбновитьТаблицу();<br> КонецЕсли; <br> КонецПроцедуры<br><br>по "Неисправность" любой из этих отчетов в результате обновляеться ТЗ1,в которой остались поля сформированные по последнему сотруднику<br><br>"
Сообщений: 20953
"вот для этого :<br>> ТЗ1.НовыяСтрока(Стр);<br>З,Ы, пока писал, вижу что сам увидел!"