diff --git a/Source/Modulos/Unidades de medida/Model/uBizUnidadesMedida.pas b/Source/Modulos/Unidades de medida/Model/uBizUnidadesMedida.pas index b0fa09e4..a55bf991 100644 --- a/Source/Modulos/Unidades de medida/Model/uBizUnidadesMedida.pas +++ b/Source/Modulos/Unidades de medida/Model/uBizUnidadesMedida.pas @@ -53,6 +53,7 @@ type // function GetDetalles : IBizDetalles; procedure OnNewRecord(Sender: TDADataTable); override; + procedure AfterOpen(Sender: TDADataTable); override; public procedure IniciarValoresUnidadMedidaNuevo; function EsNuevo : Boolean; @@ -88,6 +89,12 @@ uses // EnlazarMaestroDetalle(FDetallesLink, FDetalles); // end; +procedure TBizUnidadMedida.AfterOpen(Sender: TDADataTable); +begin + inherited; + DataTable.Sort([fld_UnidadesMedidaDESCRIPCION], [sdAscending]); +end; + constructor TBizUnidadMedida.Create(aDataTable: TDADataTable); begin inherited;