From d76e6d7035165a5ca665d79eb575698074b96101 Mon Sep 17 00:00:00 2001 From: Jeilyn Peguero Date: Wed, 14 Oct 2026 15:47:26 -0400 Subject: [PATCH] Corrige ipprrp014 (Dias de Inventarios Gerente Marcas): Detallado funcional - Registra ipfmrp014.4fd y la dependencia FUNCIONESREPORT en mbsERP.4pw - Quita convert(char(10),...,103) de fecha_v y fecha_oc (el campo es DATE) - Titulo de ventana corregido - Rescata ipprrp014.4rp del respaldo PROYECTOS/bin; el encabezado decia IPPRRP013 (texto fijo copiado del otro diseno), corregido a IPPRRP014 Verificado: pantalla, PDF y Excel con el gerente Adolfo Santelises (prueba con usuario temporal, no incluido en este commit). Pendiente: Resumen por clase, ipprrp014r.4rp no existe en el repo ni en el respaldo. Co-Authored-By: Claude Sonnet 5.5 --- PROYECTO/bin/ipprrp014.4rp | 101 +++++++++++++++++++++++++++++++++++ PROYECTO/ipdir/ipprrp014.4gl | 5 +- PROYECTO/ipdir/ipprrp014.4rp | 101 +++++++++++++++++++++++++++++++++++ PROYECTO/mbsERP.4pw | 3 +- 4 files changed, 207 insertions(+), 3 deletions(-) create mode 100644 PROYECTO/bin/ipprrp014.4rp create mode 100644 PROYECTO/ipdir/ipprrp014.4rp diff --git a/PROYECTO/bin/ipprrp014.4rp b/PROYECTO/bin/ipprrp014.4rp new file mode 100644 index 0000000..1ef56ed --- /dev/null +++ b/PROYECTO/bin/ipprrp014.4rp @@ -0,0 +1,101 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/PROYECTO/ipdir/ipprrp014.4gl b/PROYECTO/ipdir/ipprrp014.4gl index aaf80b2..ffc0c7c 100644 --- a/PROYECTO/ipdir/ipprrp014.4gl +++ b/PROYECTO/ipdir/ipprrp014.4gl @@ -155,6 +155,7 @@ FUNCTION ipprrp013() OPEN FORM ipfmrp014 FROM "ipfmrp014" DISPLAY FORM ipfmrp014 + CALL ui.Window.getCurrent().setText("Dias de Inventarios Gerente Marcas") DISPLAY "ipprrp014" AT 4, 3 ATTRIBUTE(RED) DISPLAY "Dias de Inventarios Gerente Marcas" AT 6, 33 ATTRIBUTE(BLACK) @@ -282,8 +283,8 @@ FUNCTION ipprrp013() LET select_bal = "SELECT a.cod_n, a.cod_grupo, a.cod_tipo, a.cod_sec, a.descrip_esp,", " a.unidad_med, '0', d.descripcion, ' ', x.cod_categoria, x.descripcion,", - " convert(char(10), uv.fecha_v, 103),", - " convert(char(10), uc.fecha_oc, 103),", + " uv.fecha_v,", + " uc.fecha_oc,", " ISNULL(uc.tcantidad, 0)", " FROM iptb00002 a", " INNER JOIN iptb00035 x1 ON a.cod_n = x1.cod_n", diff --git a/PROYECTO/ipdir/ipprrp014.4rp b/PROYECTO/ipdir/ipprrp014.4rp new file mode 100644 index 0000000..1ef56ed --- /dev/null +++ b/PROYECTO/ipdir/ipprrp014.4rp @@ -0,0 +1,101 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw index 045d600..719576a 100644 --- a/PROYECTO/mbsERP.4pw +++ b/PROYECTO/mbsERP.4pw @@ -771,9 +771,10 @@ - + +