Page 1 of 1

Cómo cambio una linea de encabezado en TREPORT (SOLUCIONADO)

Posted: Sun Jul 26, 2015 3:17 am
by Armando
Amigos:

Tengo la necesidad de cambiar una línea de los encabezados de un reporte hecho con TREPORT
en tiempo de ejecución, tengo el siguiente código:

Code: Select all | Expand


REPORT oReporte CAPTION "Guías por cobrar a clientes" PREVIEW;
    HEADER ALLTRIM((cEmpresa)->EMP_RAZ),;
    "",;
    "Guías por cobrar a clientes",;
    aMes[nMes]+"/"+STR(nAmo,4,0) CENTER;
    TITLE "Fecha: "+Date2Txt(DATE(),,,,,,),;
    "Hoja No:"+STR(oReporte:nPage,3);
    FONT aFnt[1],aFnt[2],aFnt[3];
    PEN aPen[1],aPen[2]
 


En cierto momento del proceso necesito cambiar el texto del tercer renglón de encabezados,
en lugar de que siga imprimiendo "Guías por cobrar a clientes" ahora diga "Nuevo texto".

Saludos

Re: Cómo cambio una linea de encabezado en TREPORT

Posted: Sun Jul 26, 2015 4:16 pm
by FranciscoA
Armando, prueba asi:

Code: Select all | Expand

         oReport:oTitle:aLine[3] := {|| "CAMBIANDO LINEA 3 DEL HEADER" }
 

Re: Cómo cambio una linea de encabezado en TREPORT

Posted: Sun Jul 26, 2015 4:33 pm
by joseluisysturiz
Que tal si ese texto lo colocas en una VAR y lo condicionas antes de imprimir..? asi podria decir lo que quieras cuando quieras..nose..es una idea.gracias..saludos.. :shock:

Code: Select all | Expand


cTit := IIF( xValor = x, "titulo 1", "titulo 2")

REPORT oReporte CAPTION "Guías por cobrar a clientes" PREVIEW;
    HEADER ALLTRIM((cEmpresa)->EMP_RAZ),;
    "",;
    cTit ,;
    aMes[nMes]+"/"+STR(nAmo,4,0) CENTER;
    TITLE "Fecha: "+Date2Txt(DATE(),,,,,,),;
    "Hoja No:"+STR(oReporte:nPage,3);
    FONT aFnt[1],aFnt[2],aFnt[3];
    PEN aPen[1],aPen[2]
 

Re: Cómo cambio una linea de encabezado en TREPORT

Posted: Sun Jul 26, 2015 6:43 pm
by Armando
Amigos:

José Luis, tu idea me parece excelente, aunque no la probé, creo que funcionará de 100.

Francisco, tu sugerencia funcionó con un pequeño cambio

Code: Select all | Expand


//oReporte:oTitle:aLine[3] := {|| "CAMBIANDO LINEA 3 DEL HEADER" }  // Esto mandaba error porque solo tengo 1 línea de título
oReporte:oHeader:aLine[3] := {|| "CAMBIANDO LINEA 3 DEL HEADER" }  // Esto funcionó al 100
 


Gracias a ambos

Saludos