From 70aa94ee938aa101bbc331b7bbf9477ca4162535 Mon Sep 17 00:00:00 2001 From: roberto Date: Mon, 29 Jun 2009 16:28:53 +0000 Subject: [PATCH] Se arregla para que siempre se asigne la persona de contacto ya sea una de las direcciones del contacto o la de ID_Direccion=0 que es la principal de la ficha git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@957 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- .../Views/uViewDatosYSeleccionClienteAlbaran.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas b/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas index a0b7b631..abcf12dd 100644 --- a/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas +++ b/Source/Modulos/Albaranes de cliente/Views/uViewDatosYSeleccionClienteAlbaran.pas @@ -262,8 +262,9 @@ begin else begin FAlbaran.ID_DIRECCION := FDireccion.ID; FAlbaran.IMPORTE_PORTE := FDireccion.PORTE; - FAlbaran.PERSONA_CONTACTO := FDireccion.PERSONA_CONTACTO; end; + //Siempre asignaremos la persona de contacto ya sea de las direcciones del contacto o la ID_Direccion=0 que es la principal de la ficha + FPresupuesto.PERSONA_CONTACTO := FDireccion.PERSONA_CONTACTO; EscribirTextoDireccion; end; end;