diff --git a/PROYECTO/codir/coprrp007.4gl b/PROYECTO/codir/coprrp007.4gl
index 22b356f..344a7a0 100644
--- a/PROYECTO/codir/coprrp007.4gl
+++ b/PROYECTO/codir/coprrp007.4gl
@@ -164,13 +164,8 @@ LET idx = 1
        END IF
      IF idx = 1 THEN
 
-        -- 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"), "/coprrp007_organiza.xml"
-        LET handler = om.XmlWriter.createFileWriter(r_filename)
+        CALL seleccionarsalida() RETURNING r_output
+        CALL configureoutput(r_output) RETURNING handler
         START REPORT organiza TO XML HANDLER handler
 
      END IF
@@ -221,6 +216,7 @@ LET idx = 1
     DEFINE hora CHAR(5)
 
     OUTPUT
+       RIGHT MARGIN 148
 
      TOP MARGIN 0
       LEFT MARGIN 0