coprrp004 (Cronologico de Ordenes): exportacion a PDF/Excel/pantalla

- La salida escribia un XML crudo en FGLSPOOL (no era PDF ni Excel); vuelve
  a configureOutput() (modo compatibilidad de GRE, como en 3.20) con la
  ventana comun seleccionarsalida() (EXCEL / PDF / SCREEN).
- Se quitan dos ESC P (ASCII 27, ASCII 80) de impresora matricial que el
  reporte imprimia directo y salian como basura en PDF/Excel.
Verificado contra la BD .250 (tipo 01, 01/08/2026 al 15/08/2026): PDF y Excel
generados; 4 ordenes, monto = productos + flete + otros gastos, total
1,515,154.88 = SQL. Build OK con gsmake.

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>

PROYECTO/codir/coprrp004.4gl

@@ -117,13 +117,8 @@ END IF
 #                                                       doce,normal,archivo,copia
 
 
-       -- La API de configuracion de reportes (fgl_report_*) no esta
-       -- disponible en este FGL; seleccionarsalida()/configureoutput()
-       -- tampoco estan definidas en este programa. Se escribe el XML
-       -- directo a un archivo en FGLSPOOL en lugar de usar la plantilla
-       -- .4rp con vista previa.
-       LET r_filename = FGL_GETENV("FGLSPOOL"), "/coprrp004_cronologico.xml"
-       LET handler = om.XmlWriter.createFileWriter(r_filename)
+       CALL seleccionarsalida() RETURNING r_output
+       CALL configureoutput(r_output) RETURNING handler
 
        START REPORT cronologico TO XML HANDLER handler
 
@@ -194,7 +189,7 @@ REPORT cronologico(x)
         LET bandera1 = "N"
         LET hora = time
         LET l = (80 - LENGTH(p_companias.nombre CLIPPED))/2
-           PRINT COLUMN  3, ASCII 27, ASCII 80,comp_off, negrillas_on
+           PRINT COLUMN  3, comp_off, negrillas_on   # sin ESC P (codigo de impresora matricial)
            PRINT COLUMN  1, "coprrp004",
                  COLUMN  l, p_companias.nombre CLIPPED,
                  COLUMN 73, "Pag. ",pageno using "###"
@@ -259,7 +254,7 @@ REPORT cronologico(x)
     SKIP 1 LINES
     ON LAST ROW
          PRINT COLUMN 2, "Total Registros Impresos = ", count(*) USING "<<<<"
-         PRINT COLUMN 2, ASCII 27, ASCII 80
+         PRINT COLUMN 2, ""   # sin ESC P (codigo de impresora matricial)
          PRINT COLUMN 1, "==================================================",
                          "=============================" 
      END REPORT