forum.clarionlife.net

С55 EE АВС
Добрый день.
Возник вот какой вопрос:

Формируем очередь для печати. Ну, например PrintQueue.
Сейчас вывожу её на печать стандартным репортом через временный tps файл.
Всё бы хорошо, но этот tps файл абсолютно не нужен - открывай его, записывай, выводи на печать и стирай. Причем, абсолютно ненужное торможение при add записей в файл.
Хотелось бы как то сформировать стандартный репорт, но вместо файла использовать PrintQueue. Возможно ли это?

Заранее спасибо.

Добрый день!
Создай один файл с одной записью.
Его используй в качестве основного файла в схеме процедуры report.
В embed before print detail
поставь цикл работы с очередью и print(rpt:detail)
ну и другие print
В конце этой вставки :
if 2=3 then
Во вставку: after print detail
end

Алексей

Спасибо. Буду пробовать.

А если так. Очередь всё равно ведь на основе какой-то таблицы. В репорте задаём эту таблицу, а в точке вставки Take Record сделать обращение к очереди.

Очередь на основе MySQL таблицы.
Кстати, после селекта RECORDS(Sqlfile)=0. На самом деле, всё вытягивается нормально.
Может можно как то узнать кол-во записей в Sqlfile без тупого перебора со счетчиком?

У меня FireBird сейчвс. RECORDS(Sqlfile) работает без проблем. Может Sqlfile к этому времени закрыт?
Можно ещё сделать так:
Sqlfile{prop:SQL} = 'count(*) from MyFile'
next(Sqlfile)
Только в Sqlfile первое поле должно быть long.