Error en PREVIEW nueva versión 11.04

[Manuel Aranda]

Al recompilar con la última versión 11.04 me encuentro con el siguiente error en el PREVIEW:

Error description: Warning BASE/1005 Message not found: TPREVIEW:_OREPORT

Stack Calls
===========
Called from: source\rtl\tobject.prg => TPREVIEW:ERROR(172)
Called from: source\rtl\tobject.prg => TPREVIEW:MSGNOTFOUND(205)
Called from: source\rtl\tobject.prg => TPREVIEW:_OREPORT(0)
Called from: .\source\classes\RPREVIEW.PRG => RPREVIEW(1579)
Called from: .\source\classes\REPORT.PRG => (b)TREPORT:NEW(187)
Called from: .\source\classes\REPORT.PRG => TREPORT:ACTIVATE(880)

[nageswaragunupudi]

We regret the inconvenience. There is a small typographical error in the rpreview.prg
Please see line no: 71 in rpreview.prg (11.04)

Code: Select all  Expand view

  DATA   oDevice, oReportf

Instead of oReport, wrongly typed as oReportf.
Kindly correct this line as below:

Code: Select all  Expand view

  DATA   oDevice, oReport

With the correction it will work correctly.

[acuellar]

G. N. Rao.

You must repair and we download again

Thanks.

Regards,

Adhemar

[Manuel Aranda]

He descargado la actualización de hoy y ahora el error es otro:

Error occurred at: 02-05-2011, 12:51:47
Error description: Error BASE/1004 Class: 'NIL' has no exported method: NHEIGHT
Args:
[ 1] = U

Stack Calls
===========
Called from: => NHEIGHT(0)
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:PAINTMETA(638)
Called from: .\source\classes\RPREVIEW.PRG => (b)TPREVIEW:ACTIVATE(159)
Called from: .\source\classes\WINDOW.PRG => TWINDOW:RESIZE(2118)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\WINDOW.PRG => _FWH(3409)
Called from: => SHOWWINDOW(0)
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE(975)
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:ACTIVATE(159)
Called from: .\source\classes\RPREVIEW.PRG => RPREVIEW(1606)
Called from: .\source\classes\REPORT.PRG => (b)TREPORT:NEW(187)
Called from: .\source\classes\REPORT.PRG => TREPORT:ACTIVATE(880)

[nageswaragunupudi]

Fix:
For the lines 638 and 639 in rpreview.prg

Code: Select all  Expand view

     aRect[ 1 ] += ( ::oWnd:oBar:nHeight    + 4 )
      aRect[ 3 ] -= ( ::oWnd:oMsgBar:nHeight + 4 + 5 )  // 5 shadow depth
 

substitute:

Code: Select all  Expand view

     aRect[ 1 ] += ( ::oWnd:oTop:nHeight    + 4 )
      aRect[ 3 ] -= ( IfNil( ::oWnd:oMsgBar, ::oWnd:oBottom ):nHeight + 4 + 5 )  // 5 shadow depth