diff --git a/Source/Modulos/Familias/Model/uBizFamilias.pas b/Source/Modulos/Familias/Model/uBizFamilias.pas
index 9bf8e21c..f4f09eeb 100644
--- a/Source/Modulos/Familias/Model/uBizFamilias.pas
+++ b/Source/Modulos/Familias/Model/uBizFamilias.pas
@@ -14,10 +14,19 @@ type
   end;
 
   TBizFamilia = class(TFamiliasDataTableRules, IBizFamilia)
+    procedure AfterOpen(Sender: TDADataTable); override;  
   end;
 
 implementation
 
+{ TBizFamilia }
+
+procedure TBizFamilia.AfterOpen(Sender: TDADataTable);
+begin
+  inherited;
+  DataTable.Sort([fld_FamiliasDESCRIPCION], [sdAscending]);
+end;
+
 initialization
   RegisterDataTableRules(BIZ_CLIENT_FAMILIA, TBizFamilia);