XBrowse ToExcel() Run time error and it's fix

Posts: 1335

Joined: Fri Jun 13, 2008 11:04 AM

XBrowse ToExcel() Run time error and it's fix
Posted: Sat Jan 30, 2010 09:56 AM

Dear Mr.Antonio,

There is a run time error which occurs in Line no 6357 Method ToCalc() xBrowse.Prg (As per ver 9.08)

6357    cFormat:=Upper(aSaveAs[i][1])

The run time error occurs only when the following conditions are true:-

1) xHarbour
2) MS-Excel NOT installed
3) Open Office Calc Installed
4) From our application prg we make a call to oBrw:ToExcel()

Problem:- A comma is missing on line no. 5787 Method ToExcel(), and as a result incorrect parameter is passed to the Method ToCalc()

Code (fw): Select all Collapse

   #ifdef __XHARBOUR__

      TRY
         oExcel   := GetActiveObject( "Excel.Application" )
      CATCH
    ....
    .....

5787     return ::ToCalc( bProgress, nGroupBy,, aCols )
   ....
   ....
  #else

Fix

Code (fw): Select all Collapse

return ::ToCalc( bProgress, nGroupBy,,, aCols )

This is for your information. Hope that this will be rectified in the next version

Regards
Anser

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: XBrowse ToExcel() Run time error and it's fix
Posted: Sat Jan 30, 2010 10:37 AM

This bug was already fixed in FWH 9.11

Regards

G. N. Rao.

Hyderabad, India

anserkk

Posts: 1335

Joined: Fri Jun 13, 2008 11:04 AM

Re: XBrowse ToExcel() Run time error and it's fix
Posted: Sat Jan 30, 2010 11:43 AM

Dear Mr.Rao,

Thanks for the info.

Regards
Anser

FiveTech Support Forums

Continue the discussion