FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Un problema con oReport
Posts: 464
Joined: Tue Mar 21, 2006 07:30 PM

Un problema con oReport

Posted: Sat Jan 17, 2009 01:08 PM
Hola a todos

Veamos, o estoy ya muy negro y no veo m谩s all谩 de mis narices, o alguien me puede decir que diferencias hay entre estos tres c贸digos
C贸digo 1

REPORT oReport TITLE ;
            If (aDatos[1] = 0,"LISTADO DE COBROS DE TODOS LOS REPARTOS",;
                              "LISTADO DE COBROS DEL REPARTO "+Str(aDatos[1])),;
            "DEL DIA  "+Dtoc(aDatos[2]),"",;
            FONT   oFont1, oFont2 ;
            PEN    oPen1, oPen2 ;
            HEADER "Fecha: "+dtoc(date()),"","P谩gina:"+Str(oReport:nPage,3) RIGHT ;
            PREVIEW

C贸digo 2
cTexto := If (aDatos[1] = 0,"LISTADO DE COBROS DE TODOS LOS REPARTOS",;
                              "LISTADO DE COBROS DEL REPARTO "+Str(aDatos[1]) ),

REPORT oReport TITLE ;
            cTexto,;
            "DEL DIA  "+Dtoc(aDatos[2]),"",;
            FONT   oFont1, oFont2 ;
            PEN    oPen1, oPen2 ;
            HEADER "Fecha: "+dtoc(date()),"","P谩gina:"+Str(oReport:nPage,3) RIGHT ;
            PREVIEW

C贸digo 3
 REPORT oReport TITLE  "LISTADO DE ALBARANES DEL REPARTO "+STR(aDatos[1]), ;
                           "DEL DIA  "+Dtoc(aDatos[2]),"",;
                           "LLEVA UN TOTAL DE "+Transform(nRegistros,"999")+"  ALBARANES" ;
                           FONT   oFont1, oFont2 ;
                           PEN    oPen1, oPen2 ;
                           HEADER "Fecha: "+dtoc(date()),"","P谩gina:"+Str(oReport:nPage,3) RIGHT ;
                           PREVIEW


Plis una ayuda, porque me vuelve loco que los dos primeros dan un error de sintaxis al compilar y el 煤ltimo no lo da
Un saludo
Pedro
gahetesoft@gmail.com
FWH12.06 BCC582, Xverce CW, Pelles C 6.00.4,PSPAD 4.54
y ahora con ADO
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM

Re: Un problema con oReport

Posted: Sat Jan 17, 2009 01:35 PM
Saludos pedro...
no lo he probado, pero creo que tienes una "coma" de mas

REPORT oReport TITLE ;
cTexto,;
"DEL DIA "+Dtoc(aDatos[2]),"",; // creo que es esta "coma"
FONT oFont1, oFont2 ;
PEN oPen1, oPen2 ;
HEADER "Fecha: "+dtoc(date()),"","P谩gina:"+Str(oReport:nPage,3) RIGHT ;
PREVIEW
Posts: 464
Joined: Tue Mar 21, 2006 07:30 PM

Re: Un problema con oReport

Posted: Sat Jan 17, 2009 02:07 PM

Gracias Daniel
Habr茅 pasado por esa coma mil veces, y no la he visto, lo dicho, estaba m谩s ciego que un topo

Un saludo
Pedro
gahetesoft@gmail.com
FWH12.06 BCC582, Xverce CW, Pelles C 6.00.4,PSPAD 4.54
y ahora con ADO

Continue the discussion