Asegasa.NET/guia/presupuestos/RCSociosZurich.vb

<Serializable>
Public Class RCSociosZurich
    Private _tomadorCIF As String
    Public Property TomadorCIF() As String
        Get
            Return _tomadorCIF
        End Get
        Set(ByVal value As String)
            _tomadorCIF = value
        End Set
    End Property
    Private _tomadorNombre As String
    Public Property TomadorNombre() As String
        Get
            Return _tomadorNombre
        End Get
        Set(ByVal value As String)
            _tomadorNombre = value
        End Set
    End Property
    Private _tomadorApellidos As String
    Public Property TomadorApellidos() As String
        Get
            Return _tomadorApellidos
        End Get
        Set(ByVal value As String)
            _tomadorApellidos = value
        End Set
    End Property
    Private _tomadorTelefono As String
    Public Property TomadorTelefono() As String
        Get
            Return _tomadorTelefono
        End Get
        Set(ByVal value As String)
            _tomadorTelefono = value
        End Set
    End Property
    Private _tomadorTelefono2 As String
    Public Property TomadorTelefono2() As String
        Get
            Return _tomadorTelefono2
        End Get
        Set(ByVal value As String)
            _tomadorTelefono2 = value
        End Set
    End Property
    Private _tomadorEmail As String
    Public Property TomadorEmail() As String
        Get
            Return _tomadorEmail
        End Get
        Set(ByVal value As String)
            _tomadorEmail = value
        End Set
    End Property
    Private _tomadorDomicilio As String
    Public Property TomadorDomicilio() As String
        Get
            Return _tomadorDomicilio
        End Get
        Set(ByVal value As String)
            _tomadorDomicilio = value
        End Set
    End Property
    Private _tomadorCodigoPostal As String
    Public Property TomadorCodigoPostal() As String
        Get
            Return _tomadorCodigoPostal
        End Get
        Set(ByVal value As String)
            _tomadorCodigoPostal = value
        End Set
    End Property
    Private _tomadorPoblacion As String
    Public Property TomadorPoblacion() As String
        Get
            Return _tomadorPoblacion
        End Get
        Set(ByVal value As String)
            _tomadorPoblacion = value
        End Set
    End Property
    Private _tomadorProvincia As String
    Public Property TomadorProvincia() As String
        Get
            Return _tomadorProvincia
        End Get
        Set(ByVal value As String)
            _tomadorProvincia = value
        End Set
    End Property
    Private _tomadorCodigoMunicipio As String
    Public Property TomadorCodigoMunicipio() As String
        Get
            Return _tomadorCodigoMunicipio
        End Get
        Set(ByVal value As String)
            _tomadorCodigoMunicipio = value
        End Set
    End Property


    Private _propietarioCIF As String
    Public Property PropietarioCIF() As String
        Get
            Return _propietarioCIF
        End Get
        Set(ByVal value As String)
            _propietarioCIF = value
        End Set
    End Property
    Private _propietarioNombre As String
    Public Property PropietarioNombre() As String
        Get
            Return _propietarioNombre
        End Get
        Set(ByVal value As String)
            _propietarioNombre = value
        End Set
    End Property
    Private _propietarioApellidos As String
    Public Property PropietarioApellidos() As String
        Get
            Return _propietarioApellidos
        End Get
        Set(ByVal value As String)
            _propietarioApellidos = value
        End Set
    End Property
    Private _propietarioTelefono As String
    Public Property PropietarioTelefono() As String
        Get
            Return _propietarioTelefono
        End Get
        Set(ByVal value As String)
            _propietarioTelefono = value
        End Set
    End Property
    Private _propietarioTelefono2 As String
    Public Property PropietarioTelefono2() As String
        Get
            Return _propietarioTelefono2
        End Get
        Set(ByVal value As String)
            _propietarioTelefono2 = value
        End Set
    End Property
    Private _propietarioEmail As String
    Public Property PropietarioEmail() As String
        Get
            Return _propietarioEmail
        End Get
        Set(ByVal value As String)
            _propietarioEmail = value
        End Set
    End Property
    Private _propietarioDomicilio As String
    Public Property PropietarioDomicilio() As String
        Get
            Return _propietarioDomicilio
        End Get
        Set(ByVal value As String)
            _propietarioDomicilio = value
        End Set
    End Property
    Private _propietarioCodigoPostal As String
    Public Property PropietarioCodigoPostal() As String
        Get
            Return _propietarioCodigoPostal
        End Get
        Set(ByVal value As String)
            _propietarioCodigoPostal = value
        End Set
    End Property
    Private _propietarioPoblacion As String
    Public Property PropietarioPoblacion() As String
        Get
            Return _propietarioPoblacion
        End Get
        Set(ByVal value As String)
            _propietarioPoblacion = value
        End Set
    End Property
    Private _propietarioProvincia As String
    Public Property PropietarioProvincia() As String
        Get
            Return _propietarioProvincia
        End Get
        Set(ByVal value As String)
            _propietarioProvincia = value
        End Set
    End Property
    Private _propietarioCodigoMunicipio As String
    Public Property PropietarioCodigoMunicipio() As String
        Get
            Return _propietarioCodigoMunicipio
        End Get
        Set(ByVal value As String)
            _propietarioCodigoMunicipio = value
        End Set
    End Property


    Private _dehesa As Double
    Public Property Dehesa() As Double
        Get
            Return _dehesa
        End Get
        Set(ByVal value As Double)
            _dehesa = value
        End Set
    End Property
    Private _superficieCosechable As Double
    Public Property SuperficieCosechable() As Double
        Get
            Return _superficieCosechable
        End Get
        Set(ByVal value As Double)
            _superficieCosechable = value
        End Set
    End Property
    Private _cotoDeCaza As Double
    Public Property CotoDeCaza() As Double
        Get
            Return _cotoDeCaza
        End Get
        Set(ByVal value As Double)
            _cotoDeCaza = value
        End Set
    End Property
    Private _vidaPrivada As Double
    Public Property VidaPrivada() As Double
        Get
            Return _vidaPrivada
        End Get
        Set(ByVal value As Double)
            _vidaPrivada = value
        End Set
    End Property
    Private _cabezasVacuno As Double
    Public Property CabezasVacuno() As Integer
        Get
            Return _cabezasVacuno
        End Get
        Set(ByVal value As Integer)
            _cabezasVacuno = value
        End Set
    End Property
    Private _cabezasOvino As Integer
    Public Property CabezasOvino() As Integer
        Get
            Return _cabezasOvino
        End Get
        Set(ByVal value As Integer)
            _cabezasOvino = value
        End Set
    End Property
    Private _cabezasPorcino As Integer
    Public Property CabezasPorcino() As Integer
        Get
            Return _cabezasPorcino
        End Get
        Set(ByVal value As Integer)
            _cabezasPorcino = value
        End Set
    End Property
    Private _cabezasEquino As Integer
    Public Property CabezasEquino() As Integer
        Get
            Return _cabezasEquino
        End Get
        Set(ByVal value As Integer)
            _cabezasEquino = value
        End Set
    End Property
    Private _cabezasGanadoBravo As Integer
    Public Property CabezasGanadoBravo() As Integer
        Get
            Return _cabezasGanadoBravo
        End Get
        Set(ByVal value As Integer)
            _cabezasGanadoBravo = value
        End Set
    End Property

    Private _numeroRega As String
    Public Property NumeroRega() As String
        Get
            Return _numeroRega
        End Get
        Set(ByVal value As String)
            _numeroRega = value
        End Set
    End Property
    Private _codGanadero As String
    Public Property CodigoGanadero() As String
        Get
            Return _codGanadero
        End Get
        Set(ByVal value As String)
            _codGanadero = value
        End Set
    End Property
    Private _observaciones As String
    Public Property Observaciones() As String
        Get
            Return _observaciones
        End Get
        Set(ByVal value As String)
            _observaciones = value
        End Set
    End Property
    Private _sumaContratar As String
    Public Property SumaContratar() As String
        Get
            Return _sumaContratar
        End Get
        Set(ByVal value As String)
            _sumaContratar = value
        End Set
    End Property


    Private _IBAN As String
    Public Property IBAN() As String
        Get
            Return _IBAN
        End Get
        Set(ByVal value As String)
            _IBAN = value
        End Set
    End Property
    Private _fechaEfecto As Date
    Public Property FechaEfecto() As Date
        Get
            Return _fechaEfecto
        End Get
        Set(ByVal value As Date)
            _fechaEfecto = value
        End Set
    End Property
    Private _fechaVencimiento As Date
    Public Property FechaVencimiento() As Date
        Get
            Return _fechaVencimiento
        End Get
        Set(ByVal value As Date)
            _fechaVencimiento = value
        End Set
    End Property

    Private _formaPago As String
    Public Property FormaPago() As String
        Get
            Return _formaPago
        End Get
        Set(ByVal value As String)
            _formaPago = value
        End Set
    End Property

    Private _TipoRC As String
    Public Property TipoRC() As String
        Get
            Return _TipoRC
        End Get
        Set(ByVal value As String)
            _TipoRC = value
        End Set
    End Property

    Private _opcionA As Double
    Public Property OpcionA() As Double
        Get
            Return _opcionA
        End Get
        Set(ByVal value As Double)
            _opcionA = value
        End Set
    End Property
    Private _opcionB As Double
    Public Property OpcionB() As Double
        Get
            Return _opcionB
        End Get
        Set(ByVal value As Double)
            _opcionB = value
        End Set
    End Property
    Private _opcionC As Double
    Public Property OpcionC() As Double
        Get
            Return _opcionC
        End Get
        Set(ByVal value As Double)
            _opcionC = value
        End Set
    End Property

    Private _pnetaA As Double
    Public Property PrimaNetaA() As Double
        Get
            Return _pnetaA
        End Get
        Set(ByVal value As Double)
            _pnetaA = value
        End Set
    End Property

    Private _pnetaB As Double
    Public Property PrimaNetaB() As Double
        Get
            Return _pnetaB
        End Get
        Set(ByVal value As Double)
            _pnetaB = value
        End Set
    End Property
    Private _pnetaC As Double
    Public Property PrimaNetaC() As Double
        Get
            Return _pnetaC
        End Get
        Set(ByVal value As Double)
            _pnetaC = value
        End Set
    End Property

    Private _impuestosA As Double
    Public Property ImpuestosA() As Double
        Get
            Return _impuestosA
        End Get
        Set(ByVal value As Double)
            _impuestosA = value
        End Set
    End Property
    Private _impuestoB As Double
    Public Property ImpuestosB() As Double
        Get
            Return _impuestoB
        End Get
        Set(ByVal value As Double)
            _impuestoB = value
        End Set
    End Property
    Private _impuestosC As String
    Public Property ImpuestosC() As String
        Get
            Return _impuestosC
        End Get
        Set(ByVal value As String)
            _impuestosC = value
        End Set
    End Property

    Private _pTotalA As Double
    Public Property PrimaTotalA() As Double
        Get
            Return _pTotalA
        End Get
        Set(ByVal value As Double)
            _pTotalA = value
        End Set
    End Property
    Private _pTotalB As Double
    Public Property PrimaTotalB() As Double
        Get
            Return _pTotalB
        End Get
        Set(ByVal value As Double)
            _pTotalB = value
        End Set
    End Property
    Private _pTotalC As Double
    Public Property PrimaTotalC() As Double
        Get
            Return _pTotalC
        End Get
        Set(ByVal value As Double)
            _pTotalC = value
        End Set
    End Property

End Class