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
|
||||
|
||||
+2
-2
@@ -70,7 +70,7 @@
|
||||
</Settings>
|
||||
<LanguageList version="1.0"/>
|
||||
<PlatformList version="1.0"/>
|
||||
<Group environment="value:CLASSPATH=$(ProjectDir)\\classes\\javax.mail.jar;$(CLASSPATH)" id="-2057013643" label="COMUNES" language="Genero">
|
||||
<Group environment="value:CLASSPATH=$(ProjectDir)\\classes\\javax.mail.jar;$(CLASSPATH),file:FGLJVMPATH=C:\\Users\\alopez\\Java\\jdk8u504-b01-jre\\bin\\server\\jvm.dll,dir:JAVA_HOME=C:\\Users\\alopez\\Java\\jdk8u504-b01-jre,dirlist:PATH=C:\\Users\\alopez\\Java\\jdk8u504-b01-jre\\bin;C:\\Users\\alopez\\Java\\jdk8u504-b01-jre\\bin\\server;$(PATH)" id="-2057013643" label="COMUNES" language="Genero">
|
||||
<Library binaryName="Config" id="1765711908" label="Config">
|
||||
<File filePath="config/Application.xcf"/>
|
||||
</Library>
|
||||
@@ -241,7 +241,7 @@
|
||||
<File filePath="codir/cofmmt016.4fd"/>
|
||||
<File filePath="codir/cofmmt010.per"/>
|
||||
<File filePath="codir/cofmwd015.per"/>
|
||||
<File filePath="codir/cofmmt025.per"/>
|
||||
<File filePath="codir/cofmmt025.4fd"/>
|
||||
<File filePath="codir/cofmcs005.per"/>
|
||||
<File filePath="codir/cofmcs010.4fd"/>
|
||||
<File filePath="codir/cofmcs009.per"/>
|
||||
|
||||
Reference in New Issue
Block a user