coprmt025: desbloqueado (JVM en COMUNES, formulario .4fd e impresion)
- mbsERP.4pw: el grupo COMUNES (libreria FUNCIONESEMAIL, que usa IMPORT JAVA javax.mail) recibe FGLJVMPATH/JAVA_HOME/PATH como el grupo MODULOS; sin eso el build fallaba con -8301 "Can not create java VM". - mbsERP.4pw: se registra codir/cofmmt025.4fd en lugar del .per (el .per no tiene el combo formonly.depto: error -8083 al consultar). - coprmt025.4gl: la impresion vuelve a configureoutput(salida) como en 3.20 (escribia un XML suelto en FGLSPOOL); el boton imprimir muestra el cuadro de formato (PDF si se cancela). Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
This commit is contained in:
co-authored by
Claude Opus 5.5
parent
6a72dad748
commit
a8c4ab1f78
@@ -786,11 +786,7 @@ ON ACTION guardar ATTRIBUTE(TEXT="Salvar", IMAGE="save")
|
||||
COMMIT WORK
|
||||
|
||||
CALL seleccionarsalida() RETURNING salida
|
||||
-- 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"), "/coprmt025_req1.xml"
|
||||
LET handler = om.XmlWriter.createFileWriter(p_reportfile)
|
||||
CALL configureoutput(salida) RETURNING HANDLER
|
||||
|
||||
START REPORT print_req TO XML HANDLER HANDLER
|
||||
|
||||
@@ -907,9 +903,7 @@ ON ACTION guardar ATTRIBUTE(TEXT="Salvar", IMAGE="save")
|
||||
COMMIT WORK
|
||||
|
||||
CALL seleccionarsalida() RETURNING salida
|
||||
-- Ver nota sobre fgl_report_* mas arriba en este archivo.
|
||||
LET p_reportfile = FGL_GETENV("FGLSPOOL"), "/coprmt025_req2.xml"
|
||||
LET handler = om.XmlWriter.createFileWriter(p_reportfile)
|
||||
CALL configureoutput(salida) RETURNING HANDLER
|
||||
START REPORT print_req TO XML HANDLER HANDLER
|
||||
|
||||
PREPARE query FROM
|
||||
@@ -1189,12 +1183,11 @@ FUNCTION copcmf025()
|
||||
|
||||
|
||||
ON ACTION impresor
|
||||
CALL seleccionarsalida() RETURNING salida
|
||||
IF salida IS NULL THEN
|
||||
LET salida = 'PDF'
|
||||
END IF
|
||||
-- Ver nota sobre fgl_report_* mas arriba en este archivo.
|
||||
LET p_reportfile = FGL_GETENV("FGLSPOOL"), "/coprmt025_req3.xml"
|
||||
LET handler = om.XmlWriter.createFileWriter(p_reportfile)
|
||||
END IF
|
||||
CALL configureoutput(salida) RETURNING HANDLER
|
||||
START REPORT print_req TO XML HANDLER HANDLER
|
||||
|
||||
PREPARE query FROM
|
||||
|
||||
Reference in New Issue
Block a user