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;