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

[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

[FranciscoA]

Armando, prueba asi:

Code: Select all | Expand

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

[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..

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]
 

[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