Можно-ли к MAV report подключить нормальный просмотрщик

[Михаил]

Здравствуйте ALL.
Можно ли прикрутить к отчётам нормальный VIEWER. стандартный в MAV
от Clarion такой убогий , показывать людям стыдно.
С уважением Михаил .

[Andrew™]

Здравствуйте ALL.
Можно ли прикрутить к отчётам нормальный VIEWER. стандартный в MAV
от Clarion такой убогий , показывать людям стыдно.
С уважением Михаил .

не понял вопроса, Report Preview я САМ не разрабатываю, использую тот штатный который генерят стандартные шаблоны. Разницы в просмотровщиках нет, что MAV Report, что ABC/Clarion REPORT

[Михаил]

Претензии конечно. к Clarion. У меня со стандартным репортом работает
TINTOOLS report viewer, а с вашим отчётом он неработает.

[Andrew™]

Претензии конечно. к Clarion. У меня со стандартным репортом работает
TINTOOLS report viewer, а с вашим отчётом он неработает.

можно, конечно, и заточить под продукты третих фирм, в частности по этот сделаю, т к в одном из моих продуктом (ELP) есть совместимость с этим, знаю этого зверя, сделаю.

но в настоящий момент ведь не очень сложно вставить пару строк кода Source в соответсвующий EMBED

[Михаил]

Если не сложно куда, и что написать (конечно в общих словах) для данного просмотрщика(моих знаний нехватает).

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

[Andrew™]

Если не сложно куда, и что написать (конечно в общих словах) для данного просмотрщика(моих знаний нехватает).

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

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

TintRptViewer.Display(REPORT,PRintPreview:Queue,'EasyListPrint - TinTools Report Viewer','Page Width',1)

стандартный вызов заOMITь и вставь такую строчку

[Михаил]

К сожалению не получилось, в extensions он задимлен ,omit я нашёл куда воткнуть. Ругается на TintRptViewer (неопознанная функциональная метка) Может где руками проинициализировать?

[Andrew™]

К сожалению не получилось, в extensions он задимлен ,omit я нашёл куда воткнуть. Ругается на TintRptViewer (неопознанная функциональная метка) Может где руками проинициализировать?

наверное у тебя какой то либо очень свежий, либо очень старый TINTOOLS, бросай его мне, если есть такая возможность, поглядим.

[Михаил]

TINTOOLS ver 6.0.0 build 1
Если старый значит надо искать свежее.
Посмотрел он совсем старый 2004 врядли кому он нужен.

[Andrew™]

TINTOOLS ver 6.0.0 build 1
Если старый значит надо искать свежее.
Посмотрел он совсем старый 2004 врядли кому он нужен.

У меня есть продукт EasyListPrint, так в нём есть совместимость
с TINTOOLS и сообщений что что то не работает не было, специально адаптировали и вели переписку с разработчиками данного софта

и код я тебе привёт именно правильный

ищи свежий продукт, адаптировать и смотреть старый не вижу смылса.

[Михаил]

В каком виде совсем новый прислать и куда?

[Andrew™]

В каком виде совсем новый прислать и куда?

выложи куда нибудь и дай сылку

[Andrew™]

и не увидел проблем, применительно к ABC
регистрирем глобальный шаблон TINTOLLS, на закладке Option включаем крыжик Enable Report Viewer

в EXTENSION MAV REPORT процедуры вставляем шаблон
(TinTools) Report Viewer

входим в режим Source в процедуре и делаем следующее:

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

MAV1:Process.After                       PROCEDURE
! Start of "MAV Process"
! [Priority 3500]
class_View   PrintPreviewClass
! [Priority 8500]

TintRptViewer TinReportViewer

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

! End of "MAV Process"
 CODE
! Start of "MAV Process"
! [Priority 4800]

IF SELF.Response = RequestCompleted
ENDPAGE(Report)
Report{PROP:FlushPreview} = TintRptViewer.Display(report,Self.QPrint,report{Prop:Text},'No Zoom',0)
END
OMIT('***')

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

! Closing Report
 IF SELF.Response = RequestCompleted
  ENDPAGE(Report)
  class_View.AllowUserZoom = True
  class_View.Maximize = True
  class_View.SetINIManager(iniMgr)
  class_View.Init(SELF.QPrint)
  Report{PROP:FlushPreview}=class_View.Display(PageWidth)
 END
! [Priority 9650]

***

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

 CLOSE(Report)
! [Priority 9800]

 PARENT.After
! [Priority 9950]

! End of "MAV Process"

[Andrew™]

ничего теперь делать руками не надо, подключили штатно TINTOOLS к процедуре и всё работает, как в ABC так и в Legasy

[Михаил]

Спасибо. Всё заработало
Я вне класса обьявил обьявил TintRptViewer TinReportViewer
Кстати в шаблонах надо обьявить процедуру SQLReport иначе
в отчетах в exten он не объявится.
С уважением Михаил.