JSOTO Restaura configureOutput() de 3.20 en msgrp000 (reportes GRE)
El stub RETURN NULL dejaba sin handler a los ~90 programas que usan configureOutput(): todos caian con -8083 en START REPORT ... TO XML HANDLER. Se vuelve a la version de 3.20 y se agrega IMPORT FGL greruntime para que las funciones fgl_report_* resuelvan aunque la app no declare libgre.42x. Verificado con gsmake (fgl602) sobre las 79 apps que dependen de FUNCIONESREPORT: ninguna empeora; las de CxP, Compras y Nomina siguen compilando y 8 reportes de Ventas pasan a compilar. Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
This commit is contained in:
@@ -1,3 +1,4 @@
|
||||
IMPORT FGL greruntime -- fgl_report_* (Genero Report Writer) para configureOutput()
|
||||
{
|
||||
Esta funcion se utiliza para desplegar mensajes de los reportes de
|
||||
los sistemas de Ray-O-Vac Dominicana.
|
||||
@@ -274,10 +275,19 @@ END FUNCTION
|
||||
|
||||
FUNCTION configureOutput(tipo_file)
|
||||
DEFINE tipo_file CHAR(3)
|
||||
-- La API fgl_report_* (Report Writer 2.0) no esta disponible en este
|
||||
-- FGL 6.00.01. Esta salida (XML/XLS/PDF por handler) no esta soportada
|
||||
-- en este entorno; usar r_output = 'MA' (impresion clasica) en su lugar.
|
||||
RETURN NULL
|
||||
IF NOT fgl_report_loadCurrentSettings(NULL) THEN
|
||||
RETURN NULL
|
||||
END IF
|
||||
# CALL fgl_report_selectLogicalPageMapping("multipage")
|
||||
# CALL fgl_report_configureMultipageOutput(2, 4, TRUE)
|
||||
CALL fgl_report_setPageMargins("0.5cm","0.5cm","0.5cm","0.5cm")
|
||||
--CALL fgl_report_selectDevice("XLS")
|
||||
# CALL fgl_report_selectDevice(getPreviewDevice())
|
||||
# CALL fgl_report_configureCompatibilityOutput(1,'Franklin Gothic Heavy',false,'existencia',NULL,NULL)
|
||||
CALL fgl_report_selectDevice(tipo_file)
|
||||
CALL fgl_report_configurexlsxdevice(null,null,null,false,false,null,1)
|
||||
CALL fgl_report_selectPreview(TRUE)
|
||||
RETURN fgl_report_commitCurrentSettings()
|
||||
END FUNCTION
|
||||
|
||||
FUNCTION getPreviewDevice()
|
||||
|
||||
Reference in New Issue
Block a user