FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Reporte - Factura con oReport
Posts: 199
Joined: Thu Oct 06, 2005 09:07 PM
Reporte - Factura con oReport
Posted: Sat Nov 21, 2009 09:50 PM
Hola :-)

estoy generando un reporte desde mySql con TMySql

bueno vamos al grano como dijo el pollo

tengo 2 arreglos con la informacion a imprimir en uno estan los encabezados de las facturas y en otro el detalle.
pero no doy con bola para armar que despues de cada encabezado me imprima el datalle completo de esa factura es decir, todos los renglones que tiene

Ejemplo:
FOLIO FECHA IMPORTE
2 02-10-02 99.99

// Aqui irian los rengloes de esa nota, que estan en otro arreglo.



pongo una parte del codigo para que os den una mejor idea.

Code (fw): Select all Collapse
   REPORT oReport TITLE cTexto   PREVIEW

      COLUMN TITLE "Folio"                              DATA aRegistros[nRegistro,1] PICTURE '99999' RIGHT
      COLUMN TITLE "Fecha"                              DATA aRegistros[nRegistro,2]
      COLUMN TITLE "Or"                                 DATA aRegistros[nRegistro,3] PICTURE '99'
      COLUMN TITLE "Origen"                             DATA substr(NombreRutas(aRegistros[nRegistro,3]),1,15)
      COLUMN TITLE "De"                                 DATA aRegistros[nRegistro,4] PICTURE '99'
      COLUMN TITLE "Destino"                            DATA substr(NombreRutas(aRegistros[nRegistro,4]),1,15)
      COLUMN TITLE "Comentarios"                        DATA aRegistros[nRegistro,5]
      COLUMN TITLE "Unidades"                           DATA aRegistros[nRegistro,6] PICTURE '9,999' RIGHT

      // EN ESTA PARTE DE AQUI, QUIERO PONER EL DETALLE QUE ESTA EN OTRO ARREGLO
      

      oReport:bSkip := {|| nRegistro++}
   END REPORT

   ACTIVATE REPORT oReport WHILE nRegistro <= len(aRegistros)



Saludos,
Mauricio :-)
Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 12:18 AM

???

Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 01:33 AM

José Luis: (disculpa Mauricio)

Sin intención de molestar ! :wink: , entiendo que tus ??? son para estar pendiente del tema.

Haz lo siguiente y así no dejas mensajes regados con puros ???:

En la esquina superior izquierda, abajo de los botones NUEVO TEMA y PUBLICAR RESPUESTA encuentras un link que dice SUSCRIBIR TEMA, das un clic ahí y listo el pollo, cuando haya alguna respuesta en el tema te será enviado un correo a la dirección que tienes registrada.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 199
Joined: Thu Oct 06, 2005 09:07 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 01:49 AM

Armando,
Gracias.

a lo mejor no me explique en lo que quiero hacer con el reporte, por eso los " ???? "

Saludos,
Mauricio :mrgreen:

:D

Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 02:13 AM

Mauricio:

No, tu pregunta esta muy clara, desafortunadamente no uso TMySql por eso no puedo ayudarte.

La sugerencia es para José Luis quien acostumbra colocar ese tipo de mensajes (???) para que cundo haya alguna respuesta al tema sea notificado en su correo y así esta pendiente de lo que se responde.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 199
Joined: Thu Oct 06, 2005 09:07 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 02:23 AM

Gracias,

no importa si es en codigo de DBF yo lo ajusto a MySql,

como imprimes con TReport

de una dbf con los encabezados y en otra el detalle

imprimir en el primer renglon el encabezado despues el detalle.

si tienes un ejemplo en DBF te lo agradeceria mucho,

saludos,
Mauricio :mrgreen:

:D

Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 02:38 AM
Mauricio:

Ahi te va un ejemplo con DBFs

De acuerdo al código que muestras solo te falta poder imprimir el detalle de la factura, mira este trozo de código.

Como deduzco que la información la tienes en dos DBFs, antes de imprimir la parte superior de la factura filtras la DBF que contiene el detalle para que solo te queden los registros de la factura que estas imprimiendo.

Code (fw): Select all Collapse
ACTIVATE REPORT oReporte;
    ON STARTPAGE (Alinea(oReporte,1,3),Alinea(oReporte,2,3));
    ON STARTLINE Sombra(oReporte);
    ON CHANGE Detalle(oReporte,nTot,nSub);
    ON END MessageBeep()


Observa el método ON CHANGE, por cada registro de la factura iras a la función Detalle() y en la función Detalle() es donde imprimes el detalle de la factura

Code (fw): Select all Collapse
STATIC FUNCTION Detalle(oReporte,gCuenta,oDbf,oLby)
(cPagos)->(DBGOTOP())
DO WHILE ! (cPagos)->(EOF())
    oReporte:ENDLINE()
    oReporte:STARTLINE()

    oReporte:SAY( 2,TRANSFORM((cPagos)->PAG_GUI,"999999"),,RPT_RIGHT)
    oReporte:SAY( 3,(cPagos)->PAG_CLI,,RPT_LEFT)
    oReporte:SAY( 4,IF((cPagos)->PAG_PAR,"P","T"),,RPT_CENTER)
    oReporte:SAY( 5,TRANSFORM((cPagos)->PAG_PAG,"@Z 9,999,999.99"),,RPT_RIGHT)

    (cPagos)->(DBSKIP())
ENDDO
RETURN(.T.)


Ojalá me haya explicado bien y si no es así por aqui nos vemos.

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 199
Joined: Thu Oct 06, 2005 09:07 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 02:58 AM

Gracias,

esa era la solucion 8)

ahora mismo la paso a MySql,

usas algun cliente de mensajeria, yahoo ... etc

saludos cordiales,
Mauricio :mrgreen:

:D

Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 05:07 AM
Armando wrote:José Luis: (disculpa Mauricio)

Sin intención de molestar ! :-) , entiendo que tus ??? son para estar pendiente del tema.

Haz lo siguiente y así no dejas mensajes regados con puros ???:

En la esquina superior izquierda, abajo de los botones NUEVO TEMA y PUBLICAR RESPUESTA encuentras un link que dice SUSCRIBIR TEMA, das un clic ahí y listo el pollo, cuando haya alguna respuesta en el tema te será enviado un correo a la dirección que tienes registrada.

Saludos

Armando, he buscado hacer lo que me dices muchas veces, pero no he hallado otra manera, lo que me dices de PARTE SUPERIOR IZQUIERDA, es decir, ARRIBA Y A LA IZQUIERDA, no veo lo que me dices, por eso es que he usado los benditos ???, claro que la forma que me dices es mejor y menos molestosa ya que al alguien le llega que hay algo sobre su tema que haya anunciado y es....JOSE LUIS con sus ??? , jejjee, de verdad disculpa a lo que esto incomodo, igual no veo lo que me dices de SEGUIR EL TEMA, o es que la vista me esta fallando, gracias, saludos... :-)
Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 05:19 AM
Armando wrote:Mauricio:

No, tu pregunta esta muy clara, desafortunadamente no uso TMySql por eso no puedo ayudarte.

La sugerencia es para José Luis quien acostumbra colocar ese tipo de mensajes (???) para que cundo haya alguna respuesta al tema sea notificado en su correo y así esta pendiente de lo que se responde.

Saludos

Muchas gracias por tu sugerencia y es bienvenida, ya encontre lo que me dijistes de SUSCRIBIRME AL TEMA, pero PARTE INFERIOR IZQUIERDA, por eso no lo veia, como dijo, Armando tu pregunta esta bien hecha, pero como estoy en lo mismo haciendo reporte de facturacion pero con DBF fue que segui el tema, pero bueno, agua pasada no mueve molino, muchas gracias Armando por tu respuesta al colega ya que tanbien me sirve y la voy a poner en uso, espero me ayude en mis reportes, gracias, saludos... :-)
Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Reporte - Factura con oReport
Posted: Sun Nov 22, 2009 02:31 PM
Mauricio:

Me alegra que casí hayas resuelto el problema, sin embargo te recomiendo que le eches un ojo a la clase TDosPrn (es al estilo del viejo clipper), te da más libertad para imprimir en cualquier parte de la factura, te he agregado al messenger !.


José Luis:

Tambien me alegra haber sido de ayuda y que hayas encontrado la forma de suscribirte a los temas de interés, solo por claridad te adjunto una imágen para ubicar el link que te había recomendado.



Saludos a ambos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

Continue the discussion