0
tixis
18.10.14
✎
11:53
|
Начну со второго. Бала база на платформе 8.1(силно допиленеая торговля), перевели на новую базу на 8.2. Журнал регистрации от первой базы занимал 130 Гб и чтобы не занимал место его сжали в архив и с исходного места удалил. Теперь понадобилось найти кто изменял документ в старой базе, как подцепить страый журнал к старой базе? Просто разархивировав его в исходную папку не получилось подцепить. Прочитать обработкой с инфостарта тоже не получилось*(пол дня висела обработка а потом отвалилась из- за недостатка памяти). Как прочитать журнал?
Теперь по внешней печатно форме: Конфа - БП 3.0. Нужна печатка Акт выполненных работ. При печати нужно выбрать из списка услуг какие печатать в акте, а какие нет. В печатке прописал открытие формы с услугами где галочками проставляют что печатать, а что нет, не могу вывести типовую форму печати.Вот код
&НаКлиенте
Процедура Печать(ИдентификаторКоманды,ОбъектыНазначения) Экспорт
ЗагрузитьНомуНаСервере(ОбъектыНазначения);
ЭтаФорма.Открыть();
КонецПроцедуры
//команда в форме
&НаКлиенте
Процедура Печ(Команда)
ПечНаСервере();
КонецПроцедуры
//&НаСервере
Процедура ПечНаСервере()
Таб = Новый ТабличныйДокумент;
Макет = РеквизитФормыВЗначение("Объект").ПолучитьМакет("Акт");
ОблЗаголовок = Макет.ПолучитьОбласть("Заголовок");
Таб.Вывести(ОблЗаголовок);
.....................................................
......................................................
УправлениеПечатью.ЗадатьОбластьПечатиДокумента(Таб, 1, ОбъектыПечати, Объект.СсылканаДок);
КоллекцияПечатныхФорм = УправлениеПечатью.ПодготовитьКоллекциюПечатныхФорм("Акт");
Если УправлениеПечатью.НужноПечататьМакет(КоллекцияПечатныхФорм, "АктЮУЭСК") Тогда
Сообщить("Да");
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(
КоллекцияПечатныхФорм,
"Акт",
"Акт",
Таб,,,);
КонецЕсли;
КонецПроцедуры
В результате ни ошибок ни печакти
|
|