veprmt025: Nuevo abre un grupo vacio y los botones Activar/Desactivar se ven

- El bloque AFTER DISPLAY de la lista recargaba el grupo seleccionado (y sus
  clientes) al pulsar Nuevo; ahora solo lo hace si operacion <> "N".
- vefmwd022.4fd: los botones Desactivar y Activar solo tenian icono y quedaban
  invisibles cuando el icono no carga; se les agrega texto.

Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
2026-11-07 16:08:43 -04:00
co-authored by Claude Sonnet 5.5
parent 539af7f912
commit 1e64839bf2
2 changed files with 4 additions and 2 deletions
+2 -2
View File
@@ -34,8 +34,8 @@
<ToolBarItem image="new.png" name="nuevo" text="Nuevo"/>
<ToolBarItem image="exit.png" name="cancel"/>
<ToolBarSeparator name="ToolBarSeparator1"/>
<ToolBarItem comment="Desactiva Registro" image="cancel.png" name="desactivar"/>
<ToolBarItem comment="Activa Registro" image="accept.png" name="activar"/>
<ToolBarItem comment="Desactiva Registro" image="cancel.png" name="desactivar" text="Desactivar"/>
<ToolBarItem comment="Activa Registro" image="accept.png" name="activar" text="Activar"/>
</ToolBar>
<Folder gridHeight="20" gridWidth="125" name="folder" posX="1" posY="1">
<Page name="Page1" text="Lista Grupos Clientes">
+2
View File
@@ -71,6 +71,7 @@ DIALOG ATTRIBUTE(UNBUFFERED)
CALL activar(arr_lista[arr_curr()].pcod_grupo)
CALL lista_grupos()
AFTER DISPLAY
IF operacion <> "N" THEN
LET centra.codigo_grupo = arr_lista[arr_curr()].pcod_grupo
LET centra.descripcion = arr_lista[arr_curr()].pdescripcion
@@ -90,6 +91,7 @@ DIALOG ATTRIBUTE(UNBUFFERED)
LET idx = idx +1
END FOREACH
END IF -- G6: no recargar el grupo seleccionado al crear uno nuevo
END DISPLAY
INPUT BY NAME centra.* ATTRIBUTE(WITHOUT DEFAULTS)