Página 1 de 1

Tratando con FastReport Xailer

Publicado: Mié Abr 23, 2014 2:54 am
por Carlos Fuentes
Saludos estimados, he estado tratando de trabajar con la nueva version de
FastReport Xailer y obtengo este error:
Código de error : 13
Descripción : Message not found
Operación : TFastReport:SETUSERDATASET
Sub-sistema : BASE
Procedimiento : __ERRRT_SBASE
STACK : __ERRRT_SBASE (0)
TFASTREPORT:ERROR (0)
(b)HBOBJECT (0)
TFASTREPORT:MSGNOTFOUND (0)
TFASTREPORT:SETUSERDATASET (0)
COMMISSIONREPORT:SENDCLICK (694)
TBUTTON:ONCLICK (0)
TBUTTON:CLICK (101)
(b)XCONTROL (147)
TBUTTON:COMMAND (0)
TBEVEL:WMCOMMAND (273)
RUNFORM (0)
TAPPLICATION:RUN (286)
Llevamos años trabajando con la version anterior de FastReport sin ningun
inconveniente con los codigos que detallo sin ningun inconveniente:
TRY
WITH OBJECT ::oFR := TFastReport():New()
//frReportManager():New("FrSystH.dll")
:LoadLangRes(AppData:cResDir + "Spanish.xml")
IF ::cModo = "Comision"
:SetTitle( "Comisiones" )
ELSE
:SetTitle( "Estudios realizados" )
ENDIF
:SetIcon("BP")
END
CATCH oErr
FPErrorMsg("No se pudo inicializar el generador de reportes", oErr)
::lReport := .F.
END
TRY
WITH OBJECT ::oFR
:SetUserDataSet( "Datos", ; // DataSet
Alias
cHeader, ; //
Header String
{ || i := 1 }, ; //
bGoTop
{ || i := i + 1 }, ; //
bSkipPlus
{ || i := i - 1 }, ; //
bSkipMinus
{ || i > Len(aData) }, ; //
bCheckEOF
{ | cField | GetSQLValue( cField, aRepHeader,
aData, i ) } ;
) // OOOJOOO Linea 694 donde marca el
error
FUNCTION GetSQLValue( cField, aHeaders, aData, nArrayAt )
LOCAL cRetVal := "", nPos, oErr
TRY
nPos := Ascan( aHeaders, { |cVal| cVal == cField } )
cRetVal := IF( nPos > 0 .AND. nArrayAt <= Len(aData),
aData[nArrayAt][nPos], "" )
CATCH oErr
FPErrorMsg("Ocurrió un error al procesar el dataset", oErr)
END
RETURN cRetVal
Que debo cambiar? Gracias anticipadas
Carlos Fuentes
---
Este mensaje no contiene virus ni malware porque la protección de avast! Antivirus está activa.
http://www.avast.com

Tratando con FastReport Xailer

Publicado: Mié Abr 23, 2014 10:23 am
por ignacio
Buenos dí­as,
"La anterior versión de FastReport" a la que usted hace mención no es nuestra, es otro producto que nada tiene que ver con el nuestro y no es nuestra intención ser 100% compatibles con él porque incluso hay muchas cosas de dicho producto que simplemente no nos gusta como se resuelven.
Le aconsejo que consulte la vasta documentación y los ejemplos que incluye el producto. í‰chele un vistazo al código del modulo frReportManager.prg que es nuestra clase de compatibilidad con el discontinuado producto de Sergey.
Un saludo