Печать отчёта на выбранный принтер

[Игорь Столяров]

Привет всем !

Хотел бы проконсультироваться по старой проблеме, какое-то время спасали костыли,
но вопрос как-то надо разруливать …

Вопрос: Можно ли как-то вывернуться и напечатать отчёт (структура REPORT) на конкретный принтер ?

Поясню. Есть система печати отчётов: компьютер, к которому подключено несколько разных принтеров
(хороший, плохой, A3, этикеток, чеков и ещё 3 не знаю зачем). Приходит запрос, он обрабатывается
(иногда относительно долго), создаётся отчёт и печатается на заданный в запросе принтер. Всё.

Всё прекрасно работает в моно-режиме, если идёт последовательная обработка и печать по одному заданию (отчёту).
При попытке запустить несколько потоков обработки и печати, предсказуемо возникает накладка с Printer{PropPrint:Device}
Всё перекашивает и заканчивается GPF.

Можно ли (как-то) направить отчёт на заданный принтер без глобальных свойств Printer{PropPrint:Device} ?
Заранее спасибо за идею …

[kreator]

Можно ли (как-то) направить отчёт на заданный принтер без глобальных свойств Printer{PropPrint:Device} ?

Судя по справке, после открытия репорта можно применить свойство к конкретному отчёту:

Код: Выделить всё

Report{propprint:Device} = 'HP ...'

Опять же в справке есть предупреждение:

All of these properties can be used with either the PRINTER built-in variable or the label of the report as the target, however they may not all make sense with both.

Не понять. Надо пробовать.

[Игорь Столяров]

Report{propprint:Device} = 'HP ...'

Странно однако … я у структуры REPORT такой проперти как "DEVICE" не вижу.
Хотя, это конечно спасло бы отца русской демократии … Подскажите, в каком разделе справки посмотреть ?

[gopstop2007]

Report{propprint:Device} постоянно использую
Справка -> Printer Control Properties

[Игорь Столяров]

постоянно использую

Господа ! Я подозреваю, что имеет место небольшое недоразумение, связанное особенностями
преподавания английского в советских школах. Ну нет такого в справке …

Есть глобальные настройки:

Код: Выделить всё

   PRINTER{PROPPRINT:Device} = 'Epson'
   

и локальные, для конкретного, открытого отчёта:

Код: Выделить всё

   
  OPEN(SomeReport)                               !После установки свойств открыть отчет 
  SomeReport{PROPPRINT:Paper} = PAPER:User       !Нестандартный размер бумаги
  SomeReport{PROPPRINT:PAPERHeight} = 6 * 254    !6" дюймов высотой 
  SomeReport{PROPPRINT:PAPERWidth} = 3.5 * 254   !3.5" дюйма шириной
  

Ну или сделайте снимок Вашей справки и ткните меня в него носом. Пусть мне будет стыдно. Я согласен.

[gopstop2007]

C10 смотри PRNPROP.CLW

[Игорь Столяров]

Спасибо, эту справку я видел.
Там как раз и нет описания применения PropPrint:Device к структуре REPORT …

Но учитывая Ваш опыт - я проверил Report{propprint:Device} = 'Название принтера'.
Действительно, если применять после (!!!) открытия отчёта - работает, отчёт перенаправляется. Спасибо !

Вроде бы глобальные настройки печати при этом не меняются … но надо проверить в боевом режиме.
Потому, что лично мне непонятно, что будет если я открою REPORT для принтера с размером листа A4,
а потом перенаправлю его чековый принтер с узкой лентой ...

[gopstop2007]

Потому, что лично мне непонятно, что будет если я открою REPORT для принтера с размером листа A4,
а потом перенаправлю его чековый принтер с узкой лентой ...

то и будет, на 52 или 80мм , а вы чего ожидали?
и забывайте возвращать на принтер по умолчанию

[Игорь Столяров]

то и будет, на 52 или 80мм , а вы чего ожидали?

До сегодняшнего дня я думал, что формат отчёта устанавливается на момент его открытия.
Теперь я в этом уже не уверен ...

[gopstop2007]

До сегодняшнего дня я думал, что формат отчёта устанавливается на момент его открытия.
Теперь я в этом уже не уверен ...

он и остается не измененным, принтер честно отпечатает ваш формат, отчет на бумаге будет не того "формата"

[Игорь Столяров]

отчет на бумаге будет не того "формата"

Это жесть. В том смысле, что не правильно это …

[kreator]

Тут скорее практика поможет. Справка скудна. Конкретных примеров - ноль. Интересно проверить одновременную посылку на разные принтеры разные отчёты в разных потоках.

[Игорь Столяров]

Интересно проверить одновременную посылку на разные принтеры разные отчёты в разных потоках.

В принципе - работает. Но смешанное чувство от этого.
Без проблем можно перенаправлять отчёты … только между одинаковыми принтерами.
Иначе получается, что REPORT открывается для листа A4 и потом этот A4 перенаправляется и печатается на принтер этикеток.
Результат - понятен и он не satisfaction …

Конечно можно перед открытием REPORT установить на время PRINTER{PROPPRINT:Device} для создания отчёта в нужном формате …
Но здесь мы опять попадаем на игру "повезёт - не повезёт", просто шансов, что отчёт в другом потоке не собьёт настройки - больше.

Наверно, надо не изобретать колесо, а идти по классическому пути. Т.е. переустановка драйвера принтера в одном месте
с флагами и семафорами.

[gopstop2007]

не пробовали к отчету подвязать "жестко" принтер

[kreator]

Иначе получается, что REPORT открывается для листа A4 и потом этот A4 перенаправляется и печатается на принтер этикеток.

А почему так? Если отчёт в A4, зачем его перенаправлять на принтер этикеток? Может надо ещё после открытия отчёта (кроме изменения девайса) и свойства страницы изменить? Посмотрел у себя, что-то подобное есть. Печать типа этикетки на чековый или любой другой:

Код: Выделить всё

i# = printer{propprint:Paper}
if i#<>PAPER:User
  Report{propprint:Paper} = i#
end