diff --git a/PROYECTO/vedir/vefmwd022.4fd b/PROYECTO/vedir/vefmwd022.4fd
index 2db20d6..9cc84a2 100644
--- a/PROYECTO/vedir/vefmwd022.4fd
+++ b/PROYECTO/vedir/vefmwd022.4fd
@@ -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">
diff --git a/PROYECTO/vedir/veprmt025.4gl b/PROYECTO/vedir/veprmt025.4gl
index a8cad45..78b2de2 100644
--- a/PROYECTO/vedir/veprmt025.4gl
+++ b/PROYECTO/vedir/veprmt025.4gl
@@ -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)