From 8f00bdc403c2f6f8a07a8c1c9a5fec926862e9c7 Mon Sep 17 00:00:00 2001 From: roberto Date: Wed, 11 Jul 2012 08:57:09 +0000 Subject: [PATCH] Se cambia para que si no tiene valor la propiedad no se pongan los : separando propiedad de concepto git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@569 f4e31baf-9722-1c47-927c-6f952f962d4b --- .../uGenerarFacturasCliUtils.pas | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/Source/Modulos/Relaciones/Contratos de cliente - Facturas de cliente/uGenerarFacturasCliUtils.pas b/Source/Modulos/Relaciones/Contratos de cliente - Facturas de cliente/uGenerarFacturasCliUtils.pas index 6e02a914..aad7aba0 100644 --- a/Source/Modulos/Relaciones/Contratos de cliente - Facturas de cliente/uGenerarFacturasCliUtils.pas +++ b/Source/Modulos/Relaciones/Contratos de cliente - Facturas de cliente/uGenerarFacturasCliUtils.pas @@ -116,12 +116,7 @@ begin ADetalles.Edit; ADetalles.REFERENCIA := AArticulos.REFERENCIA; ADetalles.ID_ARTICULO := AArticulos.ID_ARTICULO; - if ((AArticulos.TIPO_ARTICULO = TIPO_CAPITULO_C) - or (AArticulos.TIPO_ARTICULO = TIPO_CAPITULO_AF) - or (AArticulos.TIPO_ARTICULO = TIPO_CAPITULO_AI) - or (AArticulos.TIPO_ARTICULO = TIPO_CAPITULO_O) - or (AArticulos.TIPO_ARTICULO = TIPO_CAPITULO_B)) - and (AArticulos.TIPO_DETALLE = TIPO_DETALLE_CONCEPTO) then + if (AArticulos.PROPIEDAD <> '') then ADetalles.CONCEPTO := AArticulos.PROPIEDAD + ': '+ AArticulos.CONCEPTO else ADetalles.CONCEPTO := AArticulos.CONCEPTO;