Xailer & OZ Software

Estimados Consultores:
Estoy utilizando la version de Xailer 1.5.6, con las anteriores utilizaba
la libreria filexls.lib que la colocaba en el proyecto en los Otros, y me
estaba funcionando,ahora al hacer un proyecto me marca en la compilación el
siguiente error:
Unroselved External 'HB _FUN_CTEMPFILE REFEREND ......programa
Por lo que opte utilizar la libreria tFileXLS.lib que lo lei del foro, al
compilar no me marca error pero al ejecutarlo no me despliega nada, como
que se abre y cierra de inmediato. Quite la libreria filexls.lib y puse la
tfilexls.lib.
La parte del programa que marca el error es:
...
.....
WITH OBJECT oXLS := TFileXls():New(cNomArchivo,,,.f.,.t.) EN ESTA PARTE
:_Col(1,1,10)
:_Col(2,1,20)
:_Col(3,1,50)
:_Col(4,1,12)
:_Col(5,1,12)
:Say(1,1,"Tabla de Colores",,,oFonts[1])
:Say(1,10,"Fecha: "+TRANSFORM(DATE(),"99/99/9999"),,,oFonts[1])
:Say(3,1,"Inventario",,,oFonts[2],,.t.)
:Say(3,2,"Bic-Color",,,oFonts[2],,.t.)
:Say(3,3,"M a r c a",,,oFonts[2],,.t.)
:Say(3,4,"Conos",,,oFonts[2],,.t.)
:Say(3,5,"Fecha",,,oFonts[2],,.t.)
nInd:= 4
(cAliCol)->(DBGOTOP())
DO WHILE !(cAliCol)->(EOF())
:Say(nInd,1,(cAliCol)->INVENTARIO,,,oFonts[2])
:Say(nInd,2,(cAliCol)->BICCOLOR,,,oFonts[2])
:Say(nInd,3,(cAliCol)->MARCA,,,oFonts[2])
:Say(nInd,4,(cAliCol)->CONOS,,,oFonts[2],oFormat1)
:Say(nInd,5,TRANSFORM((cAliCol)->FECHA,"99/99/9999"),,,oFonts[2])
++aTotal[1]
aTotal[2] := aTotal[2] + (cAliCol)->CONOS
(cAliCol)->(DBSKIP())
++nInd
ENDDO
:Say(nInd,1,aTotal[1],,,oFonts[2],oFormat1)
:Say(nInd,3,"T O T A L E S",,,oFonts[2],,.t.)
:Say(nInd,4,aTotal[2],,,oFonts[2],oFormat1)
:End()
END
Mi pregunta que es lo que requiero realizar para que se ejecute bien ??
Muchas gracias por su apoyo de antemano
Francisco Gonzalez.

Francisco,
Esa librería no es parte de Xailer. Siento no poder ayudarle.
Un saludo,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Ing. Francisco Gonzälez Herrera" <fglez@csyredes.com> escribió en el
mensaje news:[email=46f2f585@ozsrv2.ozlan.local...]46f2f585@ozsrv2.ozlan.local...[/email]
> Estimados Consultores:
> Estoy utilizando la version de Xailer 1.5.6, con las anteriores utilizaba
> la libreria filexls.lib que la colocaba en el proyecto en los Otros, y me
> estaba funcionando,ahora al hacer un proyecto me marca en la compilación
> el siguiente error:
>
> Unroselved External 'HB _FUN_CTEMPFILE REFEREND ......programa
>
> Por lo que opte utilizar la libreria tFileXLS.lib que lo lei del foro, al
> compilar no me marca error pero al ejecutarlo no me despliega nada, como
> que se abre y cierra de inmediato. Quite la libreria filexls.lib y puse la
> tfilexls.lib.
>
> La parte del programa que marca el error es:
>
> ...
> ....
> WITH OBJECT oXLS := TFileXls():New(cNomArchivo,,,.f.,.t.) EN ESTA PARTE
> :_Col(1,1,10)
> :_Col(2,1,20)
> :_Col(3,1,50)
> :_Col(4,1,12)
> :_Col(5,1,12)
>
> :Say(1,1,"Tabla de Colores",,,oFonts[1])
> :Say(1,10,"Fecha: "+TRANSFORM(DATE(),"99/99/9999"),,,oFonts[1])
>
> :Say(3,1,"Inventario",,,oFonts[2],,.t.)
> :Say(3,2,"Bic-Color",,,oFonts[2],,.t.)
> :Say(3,3,"M a r c a",,,oFonts[2],,.t.)
> :Say(3,4,"Conos",,,oFonts[2],,.t.)
> :Say(3,5,"Fecha",,,oFonts[2],,.t.)
>
> nInd:= 4
>
> (cAliCol)->(DBGOTOP())
> DO WHILE !(cAliCol)->(EOF())
> :Say(nInd,1,(cAliCol)->INVENTARIO,,,oFonts[2])
> :Say(nInd,2,(cAliCol)->BICCOLOR,,,oFonts[2])
> :Say(nInd,3,(cAliCol)->MARCA,,,oFonts[2])
> :Say(nInd,4,(cAliCol)->CONOS,,,oFonts[2],oFormat1)
> :Say(nInd,5,TRANSFORM((cAliCol)->FECHA,"99/99/9999"),,,oFonts[2])
> ++aTotal[1]
> aTotal[2] := aTotal[2] + (cAliCol)->CONOS
> (cAliCol)->(DBSKIP())
> ++nInd
> ENDDO
> :Say(nInd,1,aTotal[1],,,oFonts[2],oFormat1)
> :Say(nInd,3,"T O T A L E S",,,oFonts[2],,.t.)
> :Say(nInd,4,aTotal[2],,,oFonts[2],oFormat1)
> :End()
> END
>
> Mi pregunta que es lo que requiero realizar para que se ejecute bien ??
>
> Muchas gracias por su apoyo de antemano
>
> Francisco Gonzalez.
>
>

La lib que se colgó corresponde a una Lib compilada con el xHarbour para
Xailer 1.7.5
Te adjunto la TFileXls que estoy utilizando yo con Xailer 1.6.5
Un Saludo,
Xevi.
"Ing. Francisco Gonzälez Herrera" <fglez@csyredes.com> escribió en el
mensaje news:[email=46f2f585@ozsrv2.ozlan.local...]46f2f585@ozsrv2.ozlan.local...[/email]
> Estimados Consultores:
> Estoy utilizando la version de Xailer 1.5.6, con las anteriores utilizaba
> la libreria filexls.lib que la colocaba en el proyecto en los Otros, y me
> estaba funcionando,ahora al hacer un proyecto me marca en la compilación
> el
> siguiente error:
>
> Unroselved External 'HB _FUN_CTEMPFILE REFEREND ......programa
>
> Por lo que opte utilizar la libreria tFileXLS.lib que lo lei del foro, al
> compilar no me marca error pero al ejecutarlo no me despliega nada, como
> que se abre y cierra de inmediato. Quite la libreria filexls.lib y puse la
> tfilexls.lib.
>
> La parte del programa que marca el error es:
>
> ...
> ....
> WITH OBJECT oXLS := TFileXls():New(cNomArchivo,,,.f.,.t.) EN ESTA PARTE
> :_Col(1,1,10)
> :_Col(2,1,20)
> :_Col(3,1,50)
> :_Col(4,1,12)
> :_Col(5,1,12)
>
> :Say(1,1,"Tabla de Colores",,,oFonts[1])
> :Say(1,10,"Fecha: "+TRANSFORM(DATE(),"99/99/9999"),,,oFonts[1])
>
> :Say(3,1,"Inventario",,,oFonts[2],,.t.)
> :Say(3,2,"Bic-Color",,,oFonts[2],,.t.)
> :Say(3,3,"M a r c a",,,oFonts[2],,.t.)
> :Say(3,4,"Conos",,,oFonts[2],,.t.)
> :Say(3,5,"Fecha",,,oFonts[2],,.t.)
>
> nInd:= 4
>
> (cAliCol)->(DBGOTOP())
> DO WHILE !(cAliCol)->(EOF())
> :Say(nInd,1,(cAliCol)->INVENTARIO,,,oFonts[2])
> :Say(nInd,2,(cAliCol)->BICCOLOR,,,oFonts[2])
> :Say(nInd,3,(cAliCol)->MARCA,,,oFonts[2])
> :Say(nInd,4,(cAliCol)->CONOS,,,oFonts[2],oFormat1)
> :Say(nInd,5,TRANSFORM((cAliCol)->FECHA,"99/99/9999"),,,oFonts[2])
> ++aTotal[1]
> aTotal[2] := aTotal[2] + (cAliCol)->CONOS
> (cAliCol)->(DBSKIP())
> ++nInd
> ENDDO
> :Say(nInd,1,aTotal[1],,,oFonts[2],oFormat1)
> :Say(nInd,3,"T O T A L E S",,,oFonts[2],,.t.)
> :Say(nInd,4,aTotal[2],,,oFonts[2],oFormat1)
> :End()
> END
>
> Mi pregunta que es lo que requiero realizar para que se ejecute bien ??
>
> Muchas gracias por su apoyo de antemano
>
> Francisco Gonzalez.
>
>
>


Attached files TFileXLS.lib (20.5 KB)Â

Francisco:
En el progrma de ejemplo donde esta el uso del la filexls viene la
funcion cTempFile que te hace falta, copiala y listo.
Saludos desde Colombia.
Rene Flores
http://www.ciber-tec.com
Ing. Francisco Gonzí¤lez Herrera escribió:
> Estimados Consultores:
> Estoy utilizando la version de Xailer 1.5.6, con las anteriores utilizaba
> la libreria filexls.lib que la colocaba en el proyecto en los Otros, y me
> estaba funcionando,ahora al hacer un proyecto me marca en la compilación el
> siguiente error:
>
> Unroselved External 'HB _FUN_CTEMPFILE REFEREND ......programa
>
> Por lo que opte utilizar la libreria tFileXLS.lib que lo lei del foro, al
> compilar no me marca error pero al ejecutarlo no me despliega nada, como
> que se abre y cierra de inmediato. Quite la libreria filexls.lib y puse la
> tfilexls.lib.
>
> La parte del programa que marca el error es:
>
> ...
> ....
> WITH OBJECT oXLS := TFileXls():New(cNomArchivo,,,.f.,.t.) EN ESTA PARTE
> :_Col(1,1,10)
> :_Col(2,1,20)
> :_Col(3,1,50)
> :_Col(4,1,12)
> :_Col(5,1,12)
>
> :Say(1,1,"Tabla de Colores",,,oFonts[1])
> :Say(1,10,"Fecha: "+TRANSFORM(DATE(),"99/99/9999"),,,oFonts[1])
>
> :Say(3,1,"Inventario",,,oFonts[2],,.t.)
> :Say(3,2,"Bic-Color",,,oFonts[2],,.t.)
> :Say(3,3,"M a r c a",,,oFonts[2],,.t.)
> :Say(3,4,"Conos",,,oFonts[2],,.t.)
> :Say(3,5,"Fecha",,,oFonts[2],,.t.)
>
> nInd:= 4
>
> (cAliCol)->(DBGOTOP())
> DO WHILE !(cAliCol)->(EOF())
> :Say(nInd,1,(cAliCol)->INVENTARIO,,,oFonts[2])
> :Say(nInd,2,(cAliCol)->BICCOLOR,,,oFonts[2])
> :Say(nInd,3,(cAliCol)->MARCA,,,oFonts[2])
> :Say(nInd,4,(cAliCol)->CONOS,,,oFonts[2],oFormat1)
> :Say(nInd,5,TRANSFORM((cAliCol)->FECHA,"99/99/9999"),,,oFonts[2])
> ++aTotal[1]
> aTotal[2] := aTotal[2] + (cAliCol)->CONOS
> (cAliCol)->(DBSKIP())
> ++nInd
> ENDDO
> :Say(nInd,1,aTotal[1],,,oFonts[2],oFormat1)
> :Say(nInd,3,"T O T A L E S",,,oFonts[2],,.t.)
> :Say(nInd,4,aTotal[2],,,oFonts[2],oFormat1)
> :End()
> END
>
> Mi pregunta que es lo que requiero realizar para que se ejecute bien ??
>
> Muchas gracias por su apoyo de antemano
>
> Francisco Gonzalez.
>
>
>