diff --git a/PROYECTO/codir/coprrp004.4gl b/PROYECTO/codir/coprrp004.4gl
index eeda8bf..f90f373 100644
--- a/PROYECTO/codir/coprrp004.4gl
+++ b/PROYECTO/codir/coprrp004.4gl
@@ -35,6 +35,8 @@ FUNCTION coprrp004()
monto DECIMAL(12,2)
END RECORD
+ DEFINE r_filename STRING
+
#WHENEVER ERROR CONTINUE
OPTIONS
@@ -115,9 +117,14 @@ END IF
# doce,normal,archivo,copia
- CALL seleccionarsalida() RETURNING salida
- CALL configureoutput(salida) RETURNING HANDLER
-
+ -- 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)
+
START REPORT cronologico TO XML HANDLER handler
diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw
index 28e03de..079fa41 100644
--- a/PROYECTO/mbsERP.4pw
+++ b/PROYECTO/mbsERP.4pw
@@ -195,6 +195,7 @@
+
@@ -233,11 +234,15 @@
-
+
+
+
+
+