Xailer & OZ Software

un Group
GROUP oGroup OF oReport ;
ON aSort[nRow,3] ; //IDKEY RELACION
HEADER ::aTitles[3] + " : " + Transform( aSort[nRow,3], "@X" ) +
" " + ; //IDKEY RELACION
Transform( aSort[nRow,4], "@!X" ) ; //DESCRIPCION IDKEY
RELACION
FOOTER " " ;
FONT 1
luego al final del report tengo puesto :
WITH OBJECT oReport
:bSkip := { || nRow++ }
END WITH
RUN REPORT oReport WHILE nRow <= nLen ;
Cuando no es un group funciona 100% pero con group no funciona,
evidentemente creo que el bskip esta influyendo.
??? con arrays los group me dan error,en el ON aSort[nRow,3], sin embargo le
pongo asort[1,3] y funciona?????
Un saludo

Has intentado cambiar el nombre de aSort?
Esto por que aSort es una funcion de xHarbour.
Espero te sirva,
--
Ramón Zea
01.993.194.14.27
http://www.paginasprodigy.com/zeasoftware/
zeasoftware@prodigy.net.mx
zeasoftware@hotmail.com
ramonzea@yahoo.com
zeasoft.movil@hotmail.com
visita mi "venta de garage"
"FRANCISCO SANCHEZ" <francisco@softwaretotal.biz> escribió en el mensaje
news:4646269c$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> un Group
>
> GROUP oGroup OF oReport ;
> ON aSort[nRow,3] ; //IDKEY RELACION
> HEADER ::aTitles[3] + " : " + Transform( aSort[nRow,3], "@X" ) +
> " " + ; //IDKEY RELACION
> Transform( aSort[nRow,4], "@!X" ) ; //DESCRIPCION IDKEY
> RELACION
> FOOTER " " ;
> FONT 1
>
> luego al final del report tengo puesto :
>
> WITH OBJECT oReport
> :bSkip := { || nRow++ }
> END WITH
>
> RUN REPORT oReport WHILE nRow <= nLen ;
>
> Cuando no es un group funciona 100% pero con group no funciona,
> evidentemente creo que el bskip esta influyendo.
>
> ??? con arrays los group me dan error,en el ON aSort[nRow,3], sin embargo
> le pongo asort[1,3] y funciona?????
>
> Un saludo
>
>

Francisco,
Sin ver el error.log me atrevo a decir que es sencillamente un problema de
rango en la matriz aSort. Comprueba:
1) oReport::bWhile := {|| nRow <= Len( aSort) }
2) Cambia la cláusula HEADER por HEADER Str( nRow ) y comprueba si en el
header del grupo nRow pasa a ser superior al Len( aSort )
3) Utiliza mejor en la cláusula del HEADER el valor cValor o cOldValue, es
decir:
HEADER ::aTitles[3] + " : " + Transform( oGroup:cValue, "@X" ) + ...
4) Si nada te funciona mandanos un PEQUEÑO ejemplo autocontendido que
muestre que realmente el error es de Xailer.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"FRANCISCO SANCHEZ" <francisco@softwaretotal.biz> escribió en el mensaje
news:4646269c$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> un Group
>
> GROUP oGroup OF oReport ;
> ON aSort[nRow,3] ; //IDKEY RELACION
> HEADER ::aTitles[3] + " : " + Transform( aSort[nRow,3], "@X" ) +
> " " + ; //IDKEY RELACION
> Transform( aSort[nRow,4], "@!X" ) ; //DESCRIPCION IDKEY
> RELACION
> FOOTER " " ;
> FONT 1
>
> luego al final del report tengo puesto :
>
> WITH OBJECT oReport
> :bSkip := { || nRow++ }
> END WITH
>
> RUN REPORT oReport WHILE nRow <= nLen ;
>
> Cuando no es un group funciona 100% pero con group no funciona,
> evidentemente creo que el bskip esta influyendo.
>
> ??? con arrays los group me dan error,en el ON aSort[nRow,3], sin embargo
> le pongo asort[1,3] y funciona?????
>
> Un saludo
>
>

He comprobado que si hago : WHILE nRow < nLen siendo nLen la longitud del
array, no falla, pero si lo hago asi : WHILE nRow <= nLen si falla.
Subsistema: BASE
Código de error: 1132
Estado: .F.
Descripción: Error de rango
Operación: acceso al array
Argumentos: [ 1] = Tipo: A Valor: [ 2] = Tipo: N Valor: 5
Fichero:
Código error SO: 0
Solo pasa en los group si no hago un group funciona 100% el mismo codigo.
Un saludo

Francisco,
Mandanos un ejemplo, o dinos como modificar el actual de informes para que
falle. Gracias.
Un saludo,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"FRANCISCO SANCHEZ" <francisco@softwaretotal.biz> escribió en el mensaje
news:4654128d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> He comprobado que si hago : WHILE nRow < nLen siendo nLen la longitud del
> array, no falla, pero si lo hago asi : WHILE nRow <= nLen si falla.
>
> Subsistema: BASE
> Código de error: 1132
> Estado: .F.
> Descripción: Error de rango
> Operación: acceso al array
> Argumentos: [ 1] = Tipo: A Valor: [ 2] = Tipo: N Valor: 5
> Fichero:
> Código error SO: 0
>
> Solo pasa en los group si no hago un group funciona 100% el mismo codigo.
>
> Un saludo
>
>

Le he pasado a jfg vuestro ejemplo cno el error. No obstante y por si sirve
de algo. He visto que si añado un registro en blanco en el array, un
registro el cual no esta recogido con nLen - ya sabes while nRow <= nLen -
no falla, por ahi debe andar el tema.
Un saludo

Francisco,
Estoy con ello. Espero tenerlo arreglado lo antes posible.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"FRANCISCO SANCHEZ" <francisco@softwaretotal.biz> escribió en el mensaje
news:465690bb$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Le he pasado a jfg vuestro ejemplo cno el error. No obstante y por si
> sirve de algo. He visto que si añado un registro en blanco en el array, un
> registro el cual no esta recogido con nLen - ya sabes while nRow <= nLen -
> no falla, por ahi debe andar el tema.
>
> Un saludo
>
>