From b6ae121e22acbd4ffb11bb9f8c2f47f1f58871ef Mon Sep 17 00:00:00 2001 From: Jeilyn Peguero Date: Wed, 7 Oct 2026 13:15:20 -0400 Subject: [PATCH] Corrige ipprrp053 (Informe Transacciones Inventarios) - Registra ipfmrp053.4fd y la dependencia FUNCIONESREPORT en mbsERP.4pw - selectoutput() inexistente -> selectOutputSimple() - Rescata ipprrp053.4rp del respaldo PROYECTOS/bin (ipdir/ y bin/) - Titulo de ventana corregido (mostraba "form") Verificado: rango 05/01/2026 a hoy genera 911 paginas; pantalla, PDF y Excel OK. Co-Authored-By: Claude Sonnet 5.5 --- PROYECTO/bin/ipprrp053.4rp | 100 +++++++++++++++++++++++++++++++++++ PROYECTO/ipdir/ipprrp053.4gl | 3 +- PROYECTO/ipdir/ipprrp053.4rp | 100 +++++++++++++++++++++++++++++++++++ PROYECTO/mbsERP.4pw | 3 +- 4 files changed, 204 insertions(+), 2 deletions(-) create mode 100644 PROYECTO/bin/ipprrp053.4rp create mode 100644 PROYECTO/ipdir/ipprrp053.4rp diff --git a/PROYECTO/bin/ipprrp053.4rp b/PROYECTO/bin/ipprrp053.4rp new file mode 100644 index 0000000..815a3fd --- /dev/null +++ b/PROYECTO/bin/ipprrp053.4rp @@ -0,0 +1,100 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/PROYECTO/ipdir/ipprrp053.4gl b/PROYECTO/ipdir/ipprrp053.4gl index d0bc967..793407e 100644 --- a/PROYECTO/ipdir/ipprrp053.4gl +++ b/PROYECTO/ipdir/ipprrp053.4gl @@ -43,6 +43,7 @@ FUNCTION ipprrp053() OPEN FORM ipfmrp053 FROM "ipfmrp053" DISPLAY FORM ipfmrp053 + CALL ui.Window.getCurrent().setText("Informe Transacciones Inventarios") INPUT BY NAME fecha1, fecha2 @@ -112,7 +113,7 @@ FUNCTION ipprrp053() LET r_filename = "ipprrp053.4rp" IF fgl_report_loadCurrentSettings(r_filename) THEN LET preview = 1 - CALL selectoutput() RETURNING r_output + CALL selectOutputSimple() RETURNING r_output CALL fgl_report_selectDevice(r_output) CALL fgl_report_selectPreview(preview) LET handler = fgl_report_commitCurrentSettings() diff --git a/PROYECTO/ipdir/ipprrp053.4rp b/PROYECTO/ipdir/ipprrp053.4rp new file mode 100644 index 0000000..815a3fd --- /dev/null +++ b/PROYECTO/ipdir/ipprrp053.4rp @@ -0,0 +1,100 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw index 51afa9f..045d600 100644 --- a/PROYECTO/mbsERP.4pw +++ b/PROYECTO/mbsERP.4pw @@ -766,9 +766,10 @@ - + +