Añadir cpprrp002, cpprrp003 y cpprrp004; corregir reportes XML y formulario cpfmrp002
- cpprgb000/msgrp000: restaurar getPreviewDevice con case correcto (ui.Interface.frontCall) y dejar configureOutput como stub, ya que la API fgl_report_* no existe en este FGL 6.00.01. - cpprrp002/003/004: sustituir configureoutput()/handler roto por om.XmlWriter.createFileWriter escribiendo a FGLSPOOL, usando STRING para la ruta (CHAR(80) truncaba la ruta larga del proyecto). - cpfmrp002.per: agregar campo faltante "Salida" (r_output) que el programa ya esperaba. - mbsERP.4pw: registrar cpprrp002/003/004 con sus dependencias, entorno FGLSPOOL y configuracion de prueba. Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
co-authored by
Claude Sonnet 5
parent
fd01d27119
commit
fa1b51c33e
@@ -8,9 +8,10 @@ FECHA REALIZACION : Junio 16, 1993
|
||||
}
|
||||
GLOBALS "cpprgb000.4gl"
|
||||
|
||||
DEFINE fecha_corte DATE
|
||||
DEFINE fecha_corte DATE
|
||||
DEFINE cod_sp1 SMALLINT
|
||||
DEFINE idx_1, idx_2 SMALLINT
|
||||
DEFINE idx_1, idx_2 SMALLINT
|
||||
DEFINE p_reportfile STRING
|
||||
DEFINE doccli9 RECORD
|
||||
cod_sp SMALLINT,
|
||||
cod_sp_sec SMALLINT,
|
||||
@@ -124,7 +125,11 @@ DEFINE valor1,valor2,valor3 DECIMAL(12,2)
|
||||
|
||||
START REPORT reporte31 TO archivo
|
||||
ELSE
|
||||
CALL configureoutput(r_output) RETURNING handler
|
||||
-- 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 la vista previa/exportacion nativa.
|
||||
LET p_reportfile = FGL_GETENV("FGLSPOOL"), "/cpprrp002_saldos.xml"
|
||||
LET handler = om.XmlWriter.createFileWriter(p_reportfile)
|
||||
START REPORT reporte31 TO XML HANDLER handler
|
||||
END IF
|
||||
END IF
|
||||
|
||||
Reference in New Issue
Block a user