diff --git a/Source/Modulos/Contactos/Model/uBizGruposCliente.pas b/Source/Modulos/Contactos/Model/uBizGruposCliente.pas
index 349403b6..de7aead9 100644
--- a/Source/Modulos/Contactos/Model/uBizGruposCliente.pas
+++ b/Source/Modulos/Contactos/Model/uBizGruposCliente.pas
@@ -14,10 +14,19 @@ type
   end;
 
   TBizGrupoCliente = class(TGruposClienteDataTableRules, IBizGrupoCliente)
+    procedure AfterOpen(Sender: TDADataTable); override;
   end;
 
 implementation
 
+{ TBizGrupoCliente }
+
+procedure TBizGrupoCliente.AfterOpen(Sender: TDADataTable);
+begin
+  inherited;
+  DataTable.Sort([fld_GruposClienteDESCRIPCION], [sdAscending]);
+end;
+
 initialization
   RegisterDataTableRules(BIZ_CLIENT_GRUPOSCLIENTE, TBizGrupoCliente);
 
diff --git a/Source/Modulos/Contactos/Model/uBizGruposEmpleado.pas b/Source/Modulos/Contactos/Model/uBizGruposEmpleado.pas
index 0c106e2a..c8118973 100644
--- a/Source/Modulos/Contactos/Model/uBizGruposEmpleado.pas
+++ b/Source/Modulos/Contactos/Model/uBizGruposEmpleado.pas
@@ -14,10 +14,19 @@ type
   end;
 
   TBizGrupoEmpleado = class(TGruposEmpleadoDataTableRules, IBizGrupoEmpleado)
+    procedure AfterOpen(Sender: TDADataTable); override;  
   end;
 
 implementation
 
+{ TBizGrupoEmpleado }
+
+procedure TBizGrupoEmpleado.AfterOpen(Sender: TDADataTable);
+begin
+  inherited;
+  DataTable.Sort([fld_GruposEmpleadoDESCRIPCION], [sdAscending]);
+end;
+
 initialization
   RegisterDataTableRules(BIZ_CLIENT_GRUPOSEMPLEADO, TBizGrupoEmpleado);
 
diff --git a/Source/Modulos/Contactos/Model/uBizGruposProveedor.pas b/Source/Modulos/Contactos/Model/uBizGruposProveedor.pas
index 8e5a6115..bbcfd829 100644
--- a/Source/Modulos/Contactos/Model/uBizGruposProveedor.pas
+++ b/Source/Modulos/Contactos/Model/uBizGruposProveedor.pas
@@ -14,10 +14,19 @@ type
   end;
 
   TBizGrupoProveedor = class(TGruposProveedorDataTableRules, IBizGrupoProveedor)
+    procedure AfterOpen(Sender: TDADataTable); override;  
   end;
 
 implementation
 
+{ TBizGrupoProveedor }
+
+procedure TBizGrupoProveedor.AfterOpen(Sender: TDADataTable);
+begin
+  inherited;
+  DataTable.Sort([fld_GruposProveedorDESCRIPCION], [sdAscending]);   
+end;
+
 initialization
   RegisterDataTableRules(BIZ_CLIENT_GRUPOSPROVEEDOR, TBizGrupoProveedor);
 
diff --git a/Source/Modulos/Contactos/Views/Contactos_view.res b/Source/Modulos/Contactos/Views/Contactos_view.res
index 1641339f..8b251f31 100644
Binary files a/Source/Modulos/Contactos/Views/Contactos_view.res and b/Source/Modulos/Contactos/Views/Contactos_view.res differ