diff --git a/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas b/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas index 5dc4cbf9..cc242d21 100644 --- a/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas +++ b/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas @@ -81,9 +81,6 @@ type private FOnClienteChanged : TNotifyEvent; FMsgElegirCliente: String; - function GetMsgElegirCliente: String; - procedure SetMsgElegirCliente(const Value: String); - protected FClientesController : IClientesController; FDireccionesController : IDireccionesContactoController; @@ -277,11 +274,6 @@ begin Result := FCliente.ID; end; -function TfrViewDatosYSeleccionClienteFacturaCliente.GetMsgElegirCliente: String; -begin - // -end; - procedure TfrViewDatosYSeleccionClienteFacturaCliente.SetCliente(Value: IBizCliente); begin FCliente := Value; @@ -312,12 +304,6 @@ begin Self.Cliente := IBizCliente(FClientesController.Buscar(Value)); end; -procedure TfrViewDatosYSeleccionClienteFacturaCliente.SetMsgElegirCliente( - const Value: String); -begin - // -end; - function TfrViewDatosYSeleccionClienteFacturaCliente.GetOnClienteChanged: TNotifyEvent; begin Result := FOnClienteChanged;