FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Xbrowse ToCalc() ToExcel() formatos numericos
Posts: 38
Joined: Tue Jan 22, 2019 08:28 AM
Xbrowse ToCalc() ToExcel() formatos numericos
Posted: Sun Mar 22, 2020 12:34 PM

Hola,
Con Xbrowse intento exportar a formato Calc de LibreOffice o Xls de Excel con las instrucciones Obrw:ToCalc() o Obrw:ToExcel(). Depende de la cantidad de decimales de los campos me da el error "could not set format #,##0.00000 to Column N" y en la hoja exportada no separa bien los formatos num茅ricos. Tambi茅n en ocasiones aparece el error (DOS Error -2147352567) WINOLE/1006
Agradecer铆a si pueden mostrarme alg煤n ejemplo del buen funcionamiento de dicha instrucci贸n, muchas gracias y saludos

Este es el c贸digo que ejecuto:

include "FiveWin.ch"

include "XBrowse.Ch"

function Main()
local oDlg, oBrw
SET DATE BRITISH
SET CENTURY ON
xbrNumFormat( "E", .t. ) // "E" for European, "A" for American and others
// .t. for showing thousand separators
USE ITEMS
/
CCODE Character 10
DETAIL Character 50
PVP1 Numeric 14 5
PVP2 Numeric 14 5
PVP3 Numeric 14 5
ARTIVA Numeric 5 2
LASTCHANGE Date 8 0
/

DEFINE DIALOG oDlg SIZE 1100,600 PIXEL

@ 40, 20 XBROWSE oBrw SIZE -20,-20 PIXEL OF odlg;
        DATASOURCE "ITEMS" AUTOSORT;
        COLUMNS "CCODE", "DETAIL", "PVP1", "PVP2", "PVP3", ARTIVA,"LASTCHANGE";
        CELL LINES noborder FOOTERS FASTEDIT

        WITH OBJECT oBrw                
            :nEditTypes    := EDIT_GET              
            :CreateFromCode()
        END

@ 2,2 BUTTONbmp obtn prompt "To Calc LibreOffice"  SIZE 60,16 PIXEL OF oDlg tooltip "Calc" ACTION oBrw:toCalc()

ACTIVATE dialog oDlg Centered

return nil

Jorge

--------------------------------------------------

Fivewin 18.10 - Harbour - BCC 7 - PellesC

--------------------------------------------------
Posts: 38
Joined: Tue Jan 22, 2019 08:28 AM
Re: Xbrowse ToCalc() ToExcel() formatos numericos
Posted: Mon Mar 30, 2020 08:58 AM

Hola, sigo sin encontrar la soluci贸n con Xbrowse.... con la clase TFileXls no funcionan los pictures pero por lo menos respeta los campos num茅ricos, sin embargo con TFileXls no respeta los formatos de fecha.

La configuraci贸n regional de Windows 10 es Espa帽ol/Espa帽a, igual en configuraci贸n de idioma de LibreOffice

Gracias por vuestra ayuda,

Jorge

--------------------------------------------------

Fivewin 18.10 - Harbour - BCC 7 - PellesC

--------------------------------------------------

Continue the discussion