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 @@ - + + + + +