FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour fastreport y Variables
ruben Dario
Posts: 1078
Joined: Thu Sep 27, 2007 03:47 PM
fastreport y Variables
Posted: Tue Mar 05, 2013 09:46 PM
Saludos al Forum

1 Pregunta
Con el PRG para esta variablaes
Code (fw): Select all Collapse
Static Function def_Varfastr(oFrP,DGRUPO,LMOD)
   with object oFrP  
      :AddVariable( "EMPRESA", "NOMBRE", "'"+oApp:M_NOMEMP+"'" )
      :AddVariable( "EMPRESA", "SINONIMO", "'"+oApp:MTITU2+"'" )
      :AddVariable( "EMPRESA", "DIRECCION", "'"+oApp:M_DIREMP+"'" )
      :AddVariable( "EMPRESA", "CIUDAD", "'"+oApp:M_CIUEMP+"'" )
      :AddVariable( "EMPRESA", "DEPTO", "'"+oApp:M_DEPEMP+"'" )
      :AddVariable( "EMPRESA", "NIT", "'" +oApp:M_NITEMP+oApp:M_NITEMP+"'" )
      :AddVariable( "EMPRESA", "TELEFONOS", "'" + oApp:M_TELEMP + "'" )
      :AddVariable( "EMPRESA", "FAX", "'" + oApp:M_FAXEMP + "'" )
      :AddVariable( "EMPRESA", "CUENEMP", "'" + oApp:m_cueemp + "'" )
      :AddVariable( "EMPRESA", "CTIPFAC", "'" + oApp:m_cueemp + "'" )  //para efectos de facturacion
      :AddVariable( "EMPRESA", "WEBSITE", "'" + "www.por definir"+ "'" )
      :AddVariable( "EMPRESA", "MAIL", "'" + "www.por definir"+ "'" )
      :AddVariable( "EMPRESA", "PIEDEPAGINA", "Calle Busquela" + CRTLF + "www.por definir"  )
      :AddVariable( "EMPRESA", "NOM_PAQ","'" +oApp:MTITU1+"'"  ) //x_TPAQU
      :AddVariable( "EMPRESA", "COD_ROMP", DGRUPO  )
      :AddVariable( "EMPRESA", "COD_VAC",  "'" + " "+ "'"  )
      :AddVariable( "EMPRESA", "MODUL", "'" +LMOD+"'"  )
      :AddVariable( "EMPRESA", "PAR_COND_1", "'" + oApp:M_NOTA_1 + "'"  )
      :AddVariable( "EMPRESA", "PAR_COND_2", "'" + oApp:M_NOTA_2 + "'"  )
      :AddVariable( "EMPRESA", "PAR_COND_3", "'" + oApp:M_NOTA_3 + "'"  )
      :AddVariable( "EMPRESA", "PAR_COND_4", "'" + oApp:M_NOTA_4 + "'"  )
      :AddVariable( "EMPRESA", "PAR_COND_5", "'" + oApp:M_NOTA_5 + "'"  )
      :AddVariable( "EMPRESA", "PIE_DOC_1", "'" + oApp:m_npiep_1 + "'" )
      :AddVariable( "EMPRESA", "PIE_DOC_2", "'" + oApp:m_npiep_2 + "'" )
      :AddVariable( "EMPRESA", "PIE_DOC_3", "'" + oApp:m_npiep_3 + "'" )
      :AddVariable( "EMPRESA", "PIE_DOC_4", "'" + oApp:m_npiep_4 + "'" )
      :AddVariable( "EMPRESA", "PIE_DOC_5", "'" + oApp:m_npiep_5 + "'" )
      :AddVariable( "EMPRESA", "PIE_DOC_6", "'" + oApp:m_npiep_6 + "'" )
      :AddVariable( "EMPRESA", "CAR_IMAGEN", IF(oApp:MLOGO,1,0)  )  //oApp:CAR_IMAG
      :AddVariable( "EMPRESA", "Imagen", "'"+img+"'" )


cuando estoy con el designer.
nesecito cambiar el valor de una variable

CTIPFAC --> esta es la variable necesito que tome el valor deacuerdo a una condicion

IIF(<oDatos."TIPFAC">="DR","FACTURA DE VENTA NO:","NOTA CREDITO NO")
como lo haria.

2 Pregunta
cuando la factura es mas de una pagina requiero que la banda ColumnFooter1 solamente se imprima cuand hacga el romopimiento y no cada vez que salte pagina en este caso cuando la factura consta de varias paginas debe colocar al final el total de la factura, si es de una sola pagina funciona bien .
Lo mismo la pagina Pagefooter solamente cuando haga el rompimiento por numero de factura se debe imprimir y no cada salto de pagina y inicializar el contador de pagina en 1
La Banda GrupHeader se imprima al saltar pagina cuando la factura tiene mas de una pagina

No se si estoy manejando bien las bandas.
Anexo Ejemplo de las patallas y el formato



http://www.4shared.com/file/m45yz1NJ/PXP407_1.html
http://www.4shared.com/photo/MDVRjNS_/Factura_2.html
http://www.4shared.com/photo/wVze9XIS/Factura_1.html
http://www.4shared.com/photo/R7JNhGlp/FORMATO.html
http://www.4shared.com/photo/cKq6mpqa/FORMATO_1.html
Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com
jrestojeda
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: fastreport y Variables
Posted: Tue Mar 05, 2013 11:33 PM
Hola...
Respecto al punto 1 sería así:

Code (fw): Select all Collapse
[IIF(<oDatos."TIPFAC">='DR','FACTURA DE VENTA NO:','NOTA CREDITO NO')]


Para lo segundo.
Es más complicado de darte el ejemplo pero sería algo así:

Primero el "GroupHeader" con los datos de la cabecera del comprobante.
Luego el "MasterData" con los items de la factura.
Luego el "GroupFooter" con los totales.
Al final el PageFooter con el totalizador de los números de hoja. Con el siguiente código:
Code (fw): Select all Collapse
Página [Page] / [TotalPages]


Espero te sirva.
Saludos, Esteban.
Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Ariel
Posts: 389
Joined: Wed Nov 29, 2006 01:51 PM
Re: fastreport y Variables
Posted: Wed Mar 06, 2013 01:50 AM

Ruben,
para el punto 1 como te explica Esteban es lo correcto.

Punto 2.
Yo en vez de usar pagefooter uso ReportSummary, eso te lo muestra solo al final del reporte.

Espero te sirva, cualquier duda a tus ordenes.

Salu2, Ariel.

ruben Dario
Posts: 1078
Joined: Thu Sep 27, 2007 03:47 PM
Re: fastreport y Variables
Posted: Wed Mar 06, 2013 01:59 AM

Esteban Me funciono

Lo demas me funciona, era el Orden y estaba usando una banda diferente.
LO hice como lo indico

Primero el "GroupHeader" con los datos de la cabecera del comprobante.
Luego el "MasterData" con los items de la factura.
Luego el "GroupFooter" con los totales.

Como Puedo controlar que "GroupHeader" se vuelva a imprimir al saltar pagina (Caso cuando no ha hecho el rompimiento es una factura que tiene varias paginas).

Tambien Tengo Definido adicional a tu lista un "PageFooter" Que solamente se imprima en la ultima pagina no en todas.

Te pregunto cuando hago rompimiento, salto de pagina , como puedo inicializar el contador de paginas en 1

Gracias Por todo,

como se usa esta funciona
tengo la fecha de la factura y necesito sumarle un valor y me reporta la fecha de vencimiento

AddDays([oDatos."FECHAF"] , [oDatos."DIA_FAC"] )
me da error.
como se usa

Por ultimo esta
:AddVariable( "EMPRESA", "CTIPFAC", "'" + oApp:m_cueemp + "'" )

Como cambio desde el Designar volver asignar otro valor a "CTIPFAC"

Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com
jrestojeda
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: fastreport y Variables
Posted: Wed Mar 06, 2013 10:56 AM

Hola Rubén...
Que bueno que te haya funcionado lo primero.

Ahora bien...
Todo aquello que quieres que se repita en todas las páginas debes ponerlo en una banda tipo "PageHeader"
De modo que tu fr3 debería quedar más o menos así:

"PageHeader" con los datos de la cabecera del comprobante. (Estos se repetirán en todas las páginas)
"GroupHeader" Sólo con el campo que usas para agrupar. (No es necesario que lo imprimas ya que lo puedes imprimir en el pageheader, pero si tienes que crear la relación de agrupación)
"MasterData" con los items de la factura.
"GroupFooter" con los totales.
"PageFooter" con el totalizador de los números de hoja.

Espero te sirva.
Saludos, Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
ruben Dario
Posts: 1078
Joined: Thu Sep 27, 2007 03:47 PM
Re: fastreport y Variables
Posted: Wed Mar 06, 2013 04:25 PM

Esteban Gracias Por todo ya me funciono todo.

tengo la fecha de la factura y necesito sumarle un valor y me reporta la fecha de vencimiento
12-05-2012 + 30 Me denbe retornar la nueva fecha asi 01-05-2013
tengo entendido hay esta funcion para esto pero no me funciona no se si la has utilizado
AddDays([oDatos."FECHAF"] , [oDatos."DIA_FAC"] )
me da error.
como se usa

Variables
with object oFrP
..
:AddVariable( "EMPRESA", "CTIPFAC", "'" + oApp:m_cueemp + "'" )
Enf
En el Reporteador como se le cambia el valor a esta variable "CTIPFAC" quiero asignar otro valor

Esteban Tu eres musico

Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com
jrestojeda
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: fastreport y Variables
Posted: Wed Mar 06, 2013 06:08 PM

Ruben...
Eso de las fechas no lo hago nunca. Siempre prefiero tener el contro de lo que se imprime. Yo lo que haría es sumar antes y enviar al fr3 un campo nuevo con la fecha de vencimiento.
Es sólo una sugerencia.
Saludos, Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
ruben Dario
Posts: 1078
Joined: Thu Sep 27, 2007 03:47 PM
Re: fastreport y Variables
Posted: Wed Mar 06, 2013 06:49 PM

Gracias Por todo esteban

Si lo que tu sugieres es lo que hago, solamente era curiosidad que como funciona dicha funcion

Gracias Por todo

Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com

Continue the discussion

Static archive · New replies & topics via GitHub Discussions