Agregar coprrp004 (Cronologico de Ordenes) al proyecto

- Registrar coprrp004 (usando cofmrp004.4fd, el .per carece del
  campo estado) en mbsERP.4pw
- Sustituir seleccionarsalida()/configureoutput() (no definidas en
  este programa, misma API fgl_report_* no disponible) por
  om.XmlWriter.createFileWriter() hacia FGLSPOOL

Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
Abel López
2026-08-28 16:48:04 -04:00
co-authored by Claude Sonnet 5
parent 91eeef199e
commit 3df53ba483
2 changed files with 16 additions and 4 deletions
+10 -3
View File
@@ -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
+6 -1
View File
@@ -195,6 +195,7 @@
<File filePath="codir/cofmcs009.per"/>
<File filePath="codir/cofmwd016.per"/>
<File filePath="codir/cofmrp001.per"/>
<File filePath="codir/cofmrp004.4fd"/>
</Library>
<Application binaryName="coprmt001" dependencies="-1026233879,-764824792,-700000015,-700000016" id="-700000017" label="coprmt001">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000018" label="Configuration"/>
@@ -233,11 +234,15 @@
<Configuration commandLineArguments="alopez Lopez2023" id="-700000034" label="Configuration"/>
<File filePath="codir/coprcs009.4gl"/>
</Application>
<Application binaryName="coprrp001" dependencies="-1026233879,-764824792,-700000015,-700000016,-1423229125" environment="dir:FGLSPOOL=$(ProjectDir)/spool" id="-700000035" label="coprrp001">
<Application binaryName="coprrp001" dependencies="-1026233879,-764824792,-700000015,-700000016,-1423229125" environment="dir:FGLSPOOL=$(ProjectDir)/spool" externalDependencies="libgre.42x" id="-700000035" label="coprrp001">
<Configuration commandLineArguments="alopez Lopez2023 70" id="-700000036" label="Configuration"/>
<File filePath="codir/coprrp001.4gl"/>
<File filePath="bin/coprrp001.4rp"/>
</Application>
<Application binaryName="coprrp004" dependencies="-1026233879,-764824792,-700000015,-700000016,-1423229125" environment="dir:FGLSPOOL=$(ProjectDir)/spool" id="-700000037" label="coprrp004">
<Configuration commandLineArguments="alopez Lopez2023 70" id="-700000038" label="Configuration"/>
<File filePath="codir/coprrp004.4gl"/>
</Application>
</Group>
<Group id="-1298100213" label="CONTABILIDAD GENERAL">
<Application binaryName="cgprmt001" dependencies="2055924299,-1026233879" id="-1385997751" label="cgprmt001">