From 87e0a4acc56c8ffd4c110251c8c7171a70fcf386 Mon Sep 17 00:00:00 2001 From: roberto Date: Mon, 29 Jun 2009 16:22:34 +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@956 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- .../Views/uViewDatosYSeleccionClientePresupuesto.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewDatosYSeleccionClientePresupuesto.pas b/Source/Modulos/Presupuestos de cliente/Views/uViewDatosYSeleccionClientePresupuesto.pas index 14149061..c2e2e88f 100644 --- a/Source/Modulos/Presupuestos de cliente/Views/uViewDatosYSeleccionClientePresupuesto.pas +++ b/Source/Modulos/Presupuestos de cliente/Views/uViewDatosYSeleccionClientePresupuesto.pas @@ -261,8 +261,9 @@ begin else begin FPresupuesto.ID_DIRECCION := FDireccion.ID; FPresupuesto.IMPORTE_PORTE := FDireccion.PORTE; - FPresupuesto.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;