topic-22457

Board index FiveWin para Harbour/xHarbour Tres Preguntas sobre Fastreport - SOLUCIONADO

Posts: 1078

Joined: Thu Sep 27, 2007 03:47 PM

Tres Preguntas sobre Fastreport - SOLUCIONADO
Posted: Sun Sep 25, 2011 07:53 PM

- Tres Preguntas sobre Fastreport

1. Si tengo varias lineas de detalle , como coloco a cada una los titulos e columna.
2. Si tengo elaborado un reporte ,y vuelvo adicionar una varieable, no aparece en el reporte, como se actualiza
3. Cada vez que ejecuto el reporte por codigo cambio el valor las variables, pero no los toma, quedan los valores cuando creo reporte.

Code (fw): Select all Collapse

Static Function def_Varfastr(oFrP,dgrupo)
   with object oFrP  
      :LoadLangRes( "Spanish.xml" )
      :SetIcon("_MOVALMA")  //(9001)
      :AddVariable( "EMPRESA", "NOMBRE", "'"+X_NOMEMP+"'" )
      :AddVariable( "EMPRESA", "SINONIMO", "'"+X_SIGLA+"'" )
      :AddVariable( "EMPRESA", "DIRECCION", "'"+X_DIREMP+"'" )
      :AddVariable( "EMPRESA", "CIUDAD", "'"+X_CIUEMP+"'" )
      :AddVariable( "EMPRESA", "DEPTO", "'"+X_DEPEMP+"'" )
      :AddVariable( "EMPRESA", "NIT", "'" +X_NITEMP+X_NIT1EMP+"'" )
      :AddVariable( "EMPRESA", "TELEFONOS", "'" + X_TELEMP + "'" )
      :AddVariable( "EMPRESA", "FAX", "'" + X_FAXEMP + "'" )
      :AddVariable( "EMPRESA", "WEBSITE", "'" + "www.por definir"+ "'" )
      :AddVariable( "EMPRESA", "MAIL", "'" + "www.por definir"+ "'" )
      :AddVariable( "EMPRESA", "PIEDEPAGINA", "Calle Busquela" + CRLF + "www.por definir"  )
      :AddVariable( "EMPRESA", "CODIGO_ROMP", dgrupo  )
      :AddVariable( "EMPRESA", "PAR_CONDIC_1", "   "  )
      :AddVariable( "EMPRESA", "PAR_CONDIC_2", "   "  )
      :AddVariable( "EMPRESA", "PAR_CONDIC_3", "   "  )
      :AddVariable( "EMPRESA", "Pie.Documento_1", "'" + "Cliente"+ "'" )
      :AddVariable( "EMPRESA", "Pie.Documento_2", "'" + "Empresa"+ "'" )
      :AddVariable( "EMPRESA", "Pie.Documento_3", "'" + "Despachos"+ "'" )
      :AddVariable( "EMPRESA", "Pie.Documento_4", "'" + "Porteria"+ "'" )
      :AddVariable( "EMPRESA", "Pie.Documento_5", "'" + "Por Definir"+ "'" )
      :AddVariable( "EMPRESA", "Pie.Documento_6", "'" + "Por Definir"+ "'" )

   End

  
Return Nil

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

MarioG

Posts: 1380

Joined: Fri Oct 14, 2005 01:28 PM

Re: Tres Preguntas sobre Fastreport
Posted: Mon Sep 26, 2011 11:57 AM

Ruben;
Te contesto la 2

Para que tome las variables verifica que este en este orden: (al menos así me funciona a mi)

oFr:SetUserDataSet( "arrLista",...
oFr:LoadFromFile( hP3:cRuta+"DctoX.fr3")
// Variables
oFr:AddVariable( "Cliente", "Fecha", "'"+DtoC(Date() )+"'" )
oFr:AddVariable( "Cliente", "Nombre", "'"+hP3:aDatCli["RazSoc"]+"'" )
oFr:AddVariable( "Cliente", "Direcc", "'"+hP3:aDatCli["Direcc"]+"'" )

Saludos

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

ruben Dario

Posts: 1078

Joined: Thu Sep 27, 2007 03:47 PM

Re: Tres Preguntas sobre Fastreport
Posted: Mon Sep 26, 2011 04:02 PM

MarioG wrote:Ruben;
Te contesto la 2

Para que tome las variables verifica que este en este orden: (al menos así me funciona a mi)

oFr:SetUserDataSet( "arrLista",...
oFr:LoadFromFile( hP3:cRuta+"DctoX.fr3")
// Variables
oFr:AddVariable( "Cliente", "Fecha", "'"+DtoC(Date() )+"'" )
oFr:AddVariable( "Cliente", "Nombre", "'"+hP3:aDatCli["RazSoc"]+"'" )
oFr:AddVariable( "Cliente", "Direcc", "'"+hP3:aDatCli["Direcc"]+"'" )

Saludos

Saludos, ya encontre el problema , primero tenia que cargar el reporte y despues asignar las variables. Me di cuenta por tu ejemplo
Gracias

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

FiveTech Support Forums

Continue the discussion