Xailer & OZ Software

Hola a todos
Quiero generar un reporte simple con los campos de un dataset (son tablas
dbf). Cuando adapto a mi programa el código que figura en los ejemplos no
funciona bien.
La primera vez que hago click en el botón para Imprimir me genera el reporte
con un solo registro, que es donde está el puntero. Salgo del preview de
impresión, vuelvo a mi formulario, vuelvo a hacer click en el botón de impresión
y ya no me aparece ningún registro.
¿Qué estoy haciendo mal?

Pablo,
Mandenos un pequeño ejemplo. Gracias de antemano,
Un saludo,
"Pablo Balerdi" <pablobalerdi@yahoo.com.ar> escribió en el mensaje
news:43c4277b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Hola a todos
>
> Quiero generar un reporte simple con los campos de un dataset (son tablas
> dbf). Cuando adapto a mi programa el código que figura en los ejemplos no
> funciona bien.
> La primera vez que hago click en el botón para Imprimir me genera el
> reporte
> con un solo registro, que es donde está el puntero. Salgo del preview de
> impresión, vuelvo a mi formulario, vuelvo a hacer click en el botón de
> impresión
> y ya no me aparece ningún registro.
>
> ¿Qué estoy haciendo mal?

Ahí va el ejemplo, Ignacio
METHOD btnImprimirPadronClick( oSender ) CLASS Recaudaciones2
Local oReport, oFont1, oFont2
With Object oFont1 := TFont():New()
:cName := "Arial"
:nSize := 12
:lBold := .T.
END WITH
With Object oFont2 := TFont():New()
:cName := "Arial"
:nSize := 10
:lBold := .f.
END WITH
::PADRON:Gotop()
REPORT oReport ;
TITLE "PADRON" ;
PREVIEW ;
FONT oFont1, oFont2
COLUMN OF oReport ;
TITLE "Código" ;
DATA PADRON->CODIGO ;
ALIGN taRIGHT;
FONT 2
COLUMN OF oReport ;
TITLE "Razón Social" ;
DATA PADRON->R_SOCIAL
RUN REPORT oReport
oFont1:Destroy()
oFont2:Destroy()
RETURN Nil
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> wrote:
>Pablo,
>
>Mandenos un pequeño ejemplo. Gracias de antemano,
>
>Un saludo,
>
>"Pablo Balerdi" <pablobalerdi@yahoo.com.ar> escribió en el mensaje
>news:43c4277b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>> Hola a todos
>>
>> Quiero generar un reporte simple con los campos de un dataset (son tablas
>> dbf). Cuando adapto a mi programa el código que figura en los ejemplos
no
>> funciona bien.
>> La primera vez que hago click en el botón para Imprimir me genera el
>> reporte
>> con un solo registro, que es donde está el puntero. Salgo del preview
de
>> impresión, vuelvo a mi formulario, vuelvo a hacer click en el botón de
>> impresión
>> y ya no me aparece ningún registro.
>>
>> ¿Qué estoy haciendo mal?
>
>

Pablo,
Un ejemplo autocontenido. Es decir, un proyecto completo, incluido DBF
Gracias
"Pablo Balerdi" <pablobalerdi@yahoo.com.ar> escribió en el mensaje
news:43c6b497$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
> Ahí va el ejemplo, Ignacio
>
> METHOD btnImprimirPadronClick( oSender ) CLASS Recaudaciones2
> Local oReport, oFont1, oFont2
>
> With Object oFont1 := TFont():New()
> :cName := "Arial"
> :nSize := 12
> :lBold := .T.
> END WITH
>
> With Object oFont2 := TFont():New()
> :cName := "Arial"
> :nSize := 10
> :lBold := .f.
> END WITH
>
> ::PADRON:Gotop()
>
> REPORT oReport ;
> TITLE "PADRON" ;
> PREVIEW ;
> FONT oFont1, oFont2
>
> COLUMN OF oReport ;
> TITLE "Código" ;
> DATA PADRON->CODIGO ;
> ALIGN taRIGHT;
> FONT 2
>
> COLUMN OF oReport ;
> TITLE "Razón Social" ;
> DATA PADRON->R_SOCIAL
>
> RUN REPORT oReport
>
> oFont1:Destroy()
> oFont2:Destroy()
> RETURN Nil
>
>
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> wrote:
>>Pablo,
>>
>>Mandenos un pequeño ejemplo. Gracias de antemano,
>>
>>Un saludo,
>>
>>"Pablo Balerdi" <pablobalerdi@yahoo.com.ar> escribió en el mensaje
>>news:43c4277b$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>>
>>> Hola a todos
>>>
>>> Quiero generar un reporte simple con los campos de un dataset (son
>>> tablas
>>> dbf). Cuando adapto a mi programa el código que figura en los ejemplos
> no
>>> funciona bien.
>>> La primera vez que hago click en el botón para Imprimir me genera el
>>> reporte
>>> con un solo registro, que es donde está el puntero. Salgo del preview
> de
>>> impresión, vuelvo a mi formulario, vuelvo a hacer click en el botón de
>
>>> impresión
>>> y ya no me aparece ningún registro.
>>>
>>> ¿Qué estoy haciendo mal?
>>
>>
>