coprrp001 (Catalogo de Suplidores): exportacion a PDF/Excel/pantalla

- La salida escribia un XML crudo en FGLSPOOL (no era PDF ni Excel); se
  restaura el codigo de 3.20: ventana seleccionarSalida() (EXCEL / PDF /
  SCREEN) con el diseno bin/coprrp001.4rp (fgl_report_loadCurrentSettings).
Verificado contra la BD .250 (22-1 a 22-10, orden numerico): PDF y Excel
generados; 9 suplidores = SQL (22-7 anulado). Build OK con gsmake.

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

PROYECTO/codir/coprrp001.4gl

@@ -144,11 +144,13 @@ FUNCTION coprrp001()
             archivo,
             copia
 
-    -- La API de configuracion de reportes (fgl_report_*) no esta
-    -- disponible en este FGL; 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"), "/coprrp001_catalogo.xml"
-    LET handler = om.XmlWriter.createFileWriter(r_filename)
+    LET r_filename = 'coprrp001.4rp'
+    CALL seleccionarSalida() RETURNING r_output
+    IF fgl_report_loadCurrentSettings(r_filename) THEN
+        CALL fgl_report_selectDevice(r_output)
+        CALL fgl_report_selectPreview(TRUE)
+        LET handler = fgl_report_commitCurrentSettings()
+    END IF
 
     START REPORT catalogo2 TO XML HANDLER handler
 #### Enviando la informacion al registro del reporte