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
This commit is contained in:
roberto 2012-07-11 08:57:09 +00:00
parent 5fd909c130
commit 8f00bdc403

View File

@ -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;