From beb48d6132709308a26119bb662f0ac8fe5c00f7 Mon Sep 17 00:00:00 2001 From: david Date: Wed, 3 Sep 2008 09:33:57 +0000 Subject: [PATCH] =?UTF-8?q?En=20los=20detalles=20con=20art=C3=ADculos,=20n?= =?UTF-8?q?o=20se=20copiaba=20la=20unidad=20de=20medida=20al=20elegir=20un?= =?UTF-8?q?=20art=C3=ADculo=20del=20cat=C3=A1logo.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@553 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- .../Articulos/Controller/uControllerDetallesArticulos.pas | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/Source/Modulos/Articulos/Controller/uControllerDetallesArticulos.pas b/Source/Modulos/Articulos/Controller/uControllerDetallesArticulos.pas index 64754248..e911ba6f 100644 --- a/Source/Modulos/Articulos/Controller/uControllerDetallesArticulos.pas +++ b/Source/Modulos/Articulos/Controller/uControllerDetallesArticulos.pas @@ -56,7 +56,11 @@ implementation { TControllerDetallesArticulos } -uses DB, Dialogs, cxControls, SysUtils, uDAInterfaces, uCalculosUtils, schArticulosClient_Intf; +uses + DB, Dialogs, cxControls, SysUtils, uDAInterfaces, uCalculosUtils, schArticulosClient_Intf; + +const + CAMPO_UNIDADMEDIDA = 'UNIDAD_MEDIDA'; { TControllerDetallesArticulos } @@ -370,6 +374,7 @@ begin ADetalles.DataTable.FieldByName(CAMPO_REFERENCIA).AsVariant := AArticulos.REFERENCIA; ADetalles.DataTable.FieldByName(CAMPO_REFERENCIA_PROVEEDOR).AsVariant := AArticulos.REFERENCIA_PROV; ADetalles.DataTable.FieldByName(CAMPO_CONCEPTO).AsVariant := AArticulos.DESCRIPCION; + ADetalles.DataTable.FieldByName(CAMPO_UNIDADMEDIDA).AsVariant := AArticulos.UNIDAD_MEDIDA; end; end;