С55 EE АВС
Добрый день.
Возник вот какой вопрос:
Формируем очередь для печати. Ну, например PrintQueue.
Сейчас вывожу её на печать стандартным репортом через временный tps файл.
Всё бы хорошо, но этот tps файл абсолютно не нужен - открывай его, записывай, выводи на печать и стирай. Причем, абсолютно ненужное торможение при add записей в файл.
Хотелось бы как то сформировать стандартный репорт, но вместо файла использовать PrintQueue. Возможно ли это?
Заранее спасибо.
Печать очереди напрямую
Модератор: Дед Пахом
Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
-
- Ветеран
- Сообщения: 390
- Зарегистрирован: 26 Август 2009, 12:41
- Откуда: Moscow
- Контактная информация:
Re: Печать очереди напрямую
Добрый день!
Создай один файл с одной записью.
Его используй в качестве основного файла в схеме процедуры report.
В embed before print detail
поставь цикл работы с очередью и print(rpt:detail)
ну и другие print
В конце этой вставки :
if 2=3 then
Во вставку: after print detail
end
Алексей
Создай один файл с одной записью.
Его используй в качестве основного файла в схеме процедуры report.
В embed before print detail
поставь цикл работы с очередью и print(rpt:detail)
ну и другие print
В конце этой вставки :
if 2=3 then
Во вставку: after print detail
end
Алексей
-
- ✯ Ветеран ✯
- Сообщения: 5006
- Зарегистрирован: 28 Май 2009, 15:54
- Откуда: Москва
- Благодарил (а): 7 раз
- Поблагодарили: 21 раз
Re: Печать очереди напрямую
А если так. Очередь всё равно ведь на основе какой-то таблицы. В репорте задаём эту таблицу, а в точке вставки Take Record сделать обращение к очереди.
We are hard at work… for you.
-
- Активист
- Сообщения: 114
- Зарегистрирован: 29 Март 2006, 10:53
- Откуда: Саранск
- Контактная информация:
Re: Печать очереди напрямую
Очередь на основе MySQL таблицы.
Кстати, после селекта RECORDS(Sqlfile)=0. На самом деле, всё вытягивается нормально.
Может можно как то узнать кол-во записей в Sqlfile без тупого перебора со счетчиком?
Кстати, после селекта RECORDS(Sqlfile)=0. На самом деле, всё вытягивается нормально.
Может можно как то узнать кол-во записей в Sqlfile без тупого перебора со счетчиком?
-
- ✯ Ветеран ✯
- Сообщения: 5006
- Зарегистрирован: 28 Май 2009, 15:54
- Откуда: Москва
- Благодарил (а): 7 раз
- Поблагодарили: 21 раз
Re: Печать очереди напрямую
У меня FireBird сейчвс. RECORDS(Sqlfile) работает без проблем. Может Sqlfile к этому времени закрыт?
Можно ещё сделать так:
Sqlfile{prop:SQL} = 'count(*) from MyFile'
next(Sqlfile)
Только в Sqlfile первое поле должно быть long.
Можно ещё сделать так:
Sqlfile{prop:SQL} = 'count(*) from MyFile'
next(Sqlfile)
Только в Sqlfile первое поле должно быть long.
We are hard at work… for you.