agregado procesos y bd clases
This commit is contained in:
234
guia/presupuestos/AccidentesIndividualesAXA.vb
Normal file
234
guia/presupuestos/AccidentesIndividualesAXA.vb
Normal file
@@ -0,0 +1,234 @@
|
||||
<Serializable>
|
||||
Public Class AccidentesIndividualesAXA
|
||||
|
||||
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 _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 _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 _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 _capitalElegido As String
|
||||
Public Property CapitalElegido() As String
|
||||
Get
|
||||
Return _capitalElegido
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_capitalElegido = 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
|
||||
End Class
|
||||
224
guia/presupuestos/CasetasRiegoAxa.vb
Normal file
224
guia/presupuestos/CasetasRiegoAxa.vb
Normal file
@@ -0,0 +1,224 @@
|
||||
<Serializable>
|
||||
Public Class CasetasRiegoAxa
|
||||
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 _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 _casetaUbicacion As String
|
||||
Public Property CasetaUbicacion() As String
|
||||
Get
|
||||
Return _casetaUbicacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_casetaUbicacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _casetaLocalidad As String
|
||||
Public Property CasetaLocalidad() As String
|
||||
Get
|
||||
Return _casetaLocalidad
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_casetaLocalidad = value
|
||||
End Set
|
||||
End Property
|
||||
Private _casetaCodigoPostal As String
|
||||
Public Property CasetaCodigoPostal() As String
|
||||
Get
|
||||
Return _casetaCodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_casetaCodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _casetaProvincia As String
|
||||
Public Property CasetaProvincia() As String
|
||||
Get
|
||||
Return _casetaProvincia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_casetaProvincia = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _EdificiosDescripcion As String
|
||||
Public Property EdificiosDescripcion() As String
|
||||
Get
|
||||
Return _EdificiosDescripcion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_EdificiosDescripcion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _EdificiosCapital As String
|
||||
Public Property EdificiosCapital() As String
|
||||
Get
|
||||
Return _EdificiosCapital
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_EdificiosCapital = value
|
||||
End Set
|
||||
End Property
|
||||
Private _mobiliarioDescripcion As String
|
||||
Public Property MobiliarioDescripcion() As String
|
||||
Get
|
||||
Return _mobiliarioDescripcion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_mobiliarioDescripcion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _mobiliarioCapital As String
|
||||
Public Property MobiliarioCapital() As String
|
||||
Get
|
||||
Return _mobiliarioCapital
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_mobiliarioCapital = value
|
||||
End Set
|
||||
End Property
|
||||
Private _existenciasDescripcion As String
|
||||
Public Property ExistenciasDescripcion() As String
|
||||
Get
|
||||
Return _existenciasDescripcion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_existenciasDescripcion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _existenciasCapital As String
|
||||
Public Property ExistenciasCapital() As String
|
||||
Get
|
||||
Return _existenciasCapital
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_existenciasCapital = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _capitalElegido As String
|
||||
Public Property CapitalElegido() As String
|
||||
Get
|
||||
Return _capitalElegido
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_capitalElegido = 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
|
||||
|
||||
End Class
|
||||
261
guia/presupuestos/Patinetes.vb
Normal file
261
guia/presupuestos/Patinetes.vb
Normal file
@@ -0,0 +1,261 @@
|
||||
<Serializable>
|
||||
Public Class Patinetes
|
||||
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 _tomadorCorreo As String
|
||||
Public Property TomadorCorreo() As String
|
||||
Get
|
||||
Return _tomadorCorreo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorCorreo = 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 _propietarioCorreo As String
|
||||
Public Property PropietarioCorreo() As String
|
||||
Get
|
||||
Return _propietarioCorreo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_propietarioCorreo = 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 _producto As String
|
||||
Public Property Producto() As String
|
||||
Get
|
||||
Return _producto
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_producto = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _identificador As String
|
||||
Public Property Identificador() As String
|
||||
Get
|
||||
Return _identificador
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_identificador = value
|
||||
End Set
|
||||
End Property
|
||||
Private _fechaCompra As Date
|
||||
Public Property FechaCompra() As Date
|
||||
Get
|
||||
Return _fechaCompra
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_fechaCompra = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _primaAnualizada As Double
|
||||
Public Property PrimaAnualizada() As Double
|
||||
Get
|
||||
Return _primaAnualizada
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_primaAnualizada = 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 _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
|
||||
End Class
|
||||
139
guia/presupuestos/RCCaballos.vb
Normal file
139
guia/presupuestos/RCCaballos.vb
Normal file
@@ -0,0 +1,139 @@
|
||||
<Serializable>
|
||||
Public Class RCCaballos
|
||||
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 _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 _documentacionEquina As String
|
||||
Public Property DocumentacionEquina() As String
|
||||
Get
|
||||
Return _documentacionEquina
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_documentacionEquina = 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 _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
|
||||
End Class
|
||||
354
guia/presupuestos/RCCotosCazaCaser.vb
Normal file
354
guia/presupuestos/RCCotosCazaCaser.vb
Normal file
@@ -0,0 +1,354 @@
|
||||
<Serializable>
|
||||
Public Class RCCotosCazaCaser
|
||||
Private _numeroHectareas As Double
|
||||
Public Property NumeroHectareas() As Double
|
||||
Get
|
||||
Return _numeroHectareas
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_numeroHectareas = 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 _opcionElegida As String
|
||||
Public Property OpcionElegida() As String
|
||||
Get
|
||||
Return _opcionElegida
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_opcionElegida = value
|
||||
End Set
|
||||
End Property
|
||||
Private _totalOpcionElegida As String
|
||||
Public Property TotalOpcionElegida() As String
|
||||
Get
|
||||
Return _totalOpcionElegida
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_totalOpcionElegida = value
|
||||
End Set
|
||||
End Property
|
||||
Private _limitePorSiniestro As String
|
||||
Public Property LimitePorSiniestro() As String
|
||||
Get
|
||||
Return _limitePorSiniestro
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_limitePorSiniestro = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
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 _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 _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 _riesgoCodigoMunicipio As String
|
||||
Public Property RiesgoCodigoMunicipio() As String
|
||||
Get
|
||||
Return _riesgoCodigoMunicipio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgoCodigoMunicipio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riesgoSituacion As String
|
||||
Public Property RiesgoSituacion() As String
|
||||
Get
|
||||
Return _riesgoSituacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgoSituacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riegoCodigoPostal As String
|
||||
Public Property RiesgoCodigoPostal() As String
|
||||
Get
|
||||
Return _riegoCodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riegoCodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riesgoPoblacion As String
|
||||
Public Property RiesgoPoblacion() As String
|
||||
Get
|
||||
Return _riesgoPoblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgoPoblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riesgoProvincia As String
|
||||
Public Property RiesgoProvincia() As String
|
||||
Get
|
||||
Return _riesgoProvincia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgoProvincia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riesgoActividad As String
|
||||
Public Property RiesgoActividad() As String
|
||||
Get
|
||||
Return _riesgoActividad
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgoActividad = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riesgoEpigrafe As String
|
||||
Public Property RiesgoEpigrafe() As String
|
||||
Get
|
||||
Return _riesgoEpigrafe
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgoEpigrafe = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riesgoDescripcion As String
|
||||
Public Property RiesgoDescripcion() As String
|
||||
Get
|
||||
Return _riesgoDescripcion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgoDescripcion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aclaracionesDeLaActividad As String
|
||||
Public Property AclaracionesDeLaActividad() As String
|
||||
Get
|
||||
Return _aclaracionesDeLaActividad
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aclaracionesDeLaActividad = 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 _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 _IBAN As String
|
||||
Public Property IBAN() As String
|
||||
Get
|
||||
Return _IBAN
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_IBAN = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
End Class
|
||||
158
guia/presupuestos/RCMaquinariaAgricola.vb
Normal file
158
guia/presupuestos/RCMaquinariaAgricola.vb
Normal file
@@ -0,0 +1,158 @@
|
||||
<Serializable>
|
||||
Public Class RCMaquinariaAgricola
|
||||
Private _aseguradoCIF As String
|
||||
Public Property AseguradoCIF() As String
|
||||
Get
|
||||
Return _aseguradoCIF
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoCIF = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoNombre As String
|
||||
Public Property AseguradoNombre() As String
|
||||
Get
|
||||
Return _aseguradoNombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoNombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoApellidos As String
|
||||
Public Property AseguradoApellidos() As String
|
||||
Get
|
||||
Return _aseguradoApellidos
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoApellidos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoDireccion As String
|
||||
Public Property AseguradoDireccion() As String
|
||||
Get
|
||||
Return _aseguradoDireccion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoDireccion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoCodigoPostal As String
|
||||
Public Property AseguradoCodigoPostal() As String
|
||||
Get
|
||||
Return _aseguradoCodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoCodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _codigoMunicipio As String
|
||||
Public Property CodigoMunicipio() As String
|
||||
Get
|
||||
Return _codigoMunicipio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_codigoMunicipio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoPoblacion As String
|
||||
Public Property AseguradoPoblacion() As String
|
||||
Get
|
||||
Return _aseguradoPoblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoPoblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoTelefono1 As String
|
||||
Public Property AseguradoTelefono1() As String
|
||||
Get
|
||||
Return _aseguradoTelefono1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoTelefono1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoTelefono2 As String
|
||||
Public Property AseguradoTelefono2() As String
|
||||
Get
|
||||
Return _aseguradoTelefono2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoTelefono2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _aseguradoCorreo As String
|
||||
Public Property AseguradoCorreo() As String
|
||||
Get
|
||||
Return _aseguradoCorreo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_aseguradoCorreo = 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 String
|
||||
Public Property FechaVencimiento() As String
|
||||
Get
|
||||
Return _fechaVencimiento
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_fechaVencimiento = 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 _matricula As String
|
||||
Public Property Matricula() As String
|
||||
Get
|
||||
Return _matricula
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_matricula = value
|
||||
End Set
|
||||
End Property
|
||||
Private _cobertura As String
|
||||
Public Property Cobertura() As String
|
||||
Get
|
||||
Return _cobertura
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_cobertura = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _elegida As String
|
||||
Public Property Elegida() As String
|
||||
Get
|
||||
Return _elegida
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_elegida = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primaTotal As String
|
||||
Public Property PrimaTotal() As String
|
||||
Get
|
||||
Return _primaTotal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_primaTotal = value
|
||||
End Set
|
||||
End Property
|
||||
End Class
|
||||
413
guia/presupuestos/RCPerros.vb
Normal file
413
guia/presupuestos/RCPerros.vb
Normal file
@@ -0,0 +1,413 @@
|
||||
<Serializable>
|
||||
Public Class RCPerros
|
||||
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 _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 _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 _coberturaElegida As String
|
||||
Public Property CoberturaElegida() As String
|
||||
Get
|
||||
Return _coberturaElegida
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_coberturaElegida = value
|
||||
End Set
|
||||
End Property
|
||||
Private _precioCobertura As String
|
||||
Public Property PrecioCobertura() As String
|
||||
Get
|
||||
Return _precioCobertura
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_precioCobertura = value
|
||||
End Set
|
||||
End Property
|
||||
Private _numeroPerrosPeligrosos As Integer
|
||||
Public Property NumeroPerrosPeligrosos() As Integer
|
||||
Get
|
||||
Return _numeroPerrosPeligrosos
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_numeroPerrosPeligrosos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _numeroPerrosNoPeligrosos As Integer
|
||||
Public Property NumeroPerrosNoPeligrosos() As Integer
|
||||
Get
|
||||
Return _numeroPerrosNoPeligrosos
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_numeroPerrosNoPeligrosos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primaPerroPeligrosos As Double
|
||||
Public Property PrimaPerrosPeligrosos() As Double
|
||||
Get
|
||||
Return _primaPerroPeligrosos
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_primaPerroPeligrosos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primaPerrosNoPeligrosos As Double
|
||||
Public Property PrimaPerrosNoPeligrosos() As Double
|
||||
Get
|
||||
Return _primaPerrosNoPeligrosos
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_primaPerrosNoPeligrosos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _precioPerrosPeligrosos As Double
|
||||
Public Property PrecioPerrosPeligrosos() As Double
|
||||
Get
|
||||
Return _precioPerrosPeligrosos
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_precioPerrosPeligrosos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _precioPerrosNoPeligrosos As Double
|
||||
Public Property PrecioPerrosNoPeligrosos() As Double
|
||||
Get
|
||||
Return _precioPerrosNoPeligrosos
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_precioPerrosNoPeligrosos = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _primeroRaza As String
|
||||
Public Property PrimeroRaza() As String
|
||||
Get
|
||||
Return _primeroRaza
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_primeroRaza = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primeroMicrochip As String
|
||||
Public Property PrimeroMicrochip() As String
|
||||
Get
|
||||
Return _primeroMicrochip
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_primeroMicrochip = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primeroNombre As String
|
||||
Public Property PrimeroNombre() As String
|
||||
Get
|
||||
Return _primeroNombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_primeroNombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primeroFechaNacimiento As Date
|
||||
Public Property PrimeroFechaNacimiento() As Date
|
||||
Get
|
||||
Return _primeroFechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_primeroFechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _segundoRaza As String
|
||||
Public Property SegundoRaza() As String
|
||||
Get
|
||||
Return _segundoRaza
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_segundoRaza = value
|
||||
End Set
|
||||
End Property
|
||||
Private _segundoMicrochip As String
|
||||
Public Property SegundoMicrochip() As String
|
||||
Get
|
||||
Return _segundoMicrochip
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_segundoMicrochip = value
|
||||
End Set
|
||||
End Property
|
||||
Private _segundoNombre As String
|
||||
Public Property SegundoNombre() As String
|
||||
Get
|
||||
Return _segundoNombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_segundoNombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _segundoFechaNacimiento As Date
|
||||
Public Property SegundoFechaNacimiento() As Date
|
||||
Get
|
||||
Return _segundoFechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_segundoFechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _terceroRaza As String
|
||||
Public Property TerceroRaza() As String
|
||||
Get
|
||||
Return _terceroRaza
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_terceroRaza = value
|
||||
End Set
|
||||
End Property
|
||||
Private _terceroMicrochip As String
|
||||
Public Property TerceroMicrochip() As String
|
||||
Get
|
||||
Return _terceroMicrochip
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_terceroMicrochip = value
|
||||
End Set
|
||||
End Property
|
||||
Private _terceroNombre As String
|
||||
Public Property TerceroNombre() As String
|
||||
Get
|
||||
Return _terceroNombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_terceroNombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _terceroFechaNacimiento As Date
|
||||
Public Property TerceroFechaNacimiento() As Date
|
||||
Get
|
||||
Return _terceroFechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_terceroFechaNacimiento = 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 _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 _tipoPerro As String
|
||||
Public Property TipoPerro() As String
|
||||
Get
|
||||
Return _tipoPerro
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tipoPerro = value
|
||||
End Set
|
||||
End Property
|
||||
End Class
|
||||
1152
guia/presupuestos/RCSociosCaser.vb
Normal file
1152
guia/presupuestos/RCSociosCaser.vb
Normal file
File diff suppressed because it is too large
Load Diff
486
guia/presupuestos/RCSociosZurich.vb
Normal file
486
guia/presupuestos/RCSociosZurich.vb
Normal file
@@ -0,0 +1,486 @@
|
||||
<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
|
||||
980
guia/presupuestos/SaludMapfre.vb
Normal file
980
guia/presupuestos/SaludMapfre.vb
Normal file
@@ -0,0 +1,980 @@
|
||||
Public Class SaludMapfre
|
||||
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 _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 _tomadorFechaNacimiento As Date
|
||||
Public Property TomadorFechaNacimiento() As Date
|
||||
Get
|
||||
Return _tomadorFechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_tomadorFechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorSexo As String
|
||||
Public Property TomadorSexo() As String
|
||||
Get
|
||||
Return _tomadorSexo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorSexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorEstadoCivil As String
|
||||
Public Property TomadorEstadoCivil() As String
|
||||
Get
|
||||
Return _tomadorEstadoCivil
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorEstadoCivil = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
Private _asegurado1CIF As String
|
||||
Public Property Asegurado1CIF() As String
|
||||
Get
|
||||
Return _asegurado1CIF
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1CIF = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Nombre As String
|
||||
Public Property Asegurado1Nombre() As String
|
||||
Get
|
||||
Return _asegurado1Nombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Nombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Apellidos As String
|
||||
Public Property Asegurado1Apellidos() As String
|
||||
Get
|
||||
Return _asegurado1Apellidos
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Apellidos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Domicilio As String
|
||||
Public Property Asegurado1Domicilio() As String
|
||||
Get
|
||||
Return _asegurado1Domicilio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Domicilio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1CodigoPostal As String
|
||||
Public Property Asegurado1CodigoPostal() As String
|
||||
Get
|
||||
Return _asegurado1CodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1CodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Poblacion As String
|
||||
Public Property Asegurado1Poblacion() As String
|
||||
Get
|
||||
Return _asegurado1Poblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Poblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Provincia As String
|
||||
Public Property Asegurado1Provincia() As String
|
||||
Get
|
||||
Return _asegurado1Provincia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Provincia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1CodigoMunicipio As String
|
||||
Public Property Asegurado1CodigoMunicipio() As String
|
||||
Get
|
||||
Return _asegurado1CodigoMunicipio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1CodigoMunicipio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Telefono As String
|
||||
Public Property Asegurado1Telefono() As String
|
||||
Get
|
||||
Return _asegurado1Telefono
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Telefono = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Email As String
|
||||
Public Property Asegurado1Email() As String
|
||||
Get
|
||||
Return _asegurado1Email
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Email = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1FechaNacimiento As Date
|
||||
Public Property Asegurado1FechaNacimiento() As Date
|
||||
Get
|
||||
Return _asegurado1FechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_asegurado1FechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Sexo As String
|
||||
Public Property Asegurado1Sexo() As String
|
||||
Get
|
||||
Return _asegurado1Sexo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Sexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Peso As Integer
|
||||
Public Property Asegurado1Peso() As Integer
|
||||
Get
|
||||
Return _asegurado1Peso
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_asegurado1Peso = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Estatura As Integer
|
||||
Public Property Asegurado1Estatura() As Integer
|
||||
Get
|
||||
Return _asegurado1Estatura
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_asegurado1Estatura = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Profesion As String
|
||||
Public Property Asegurado1Profesion() As String
|
||||
Get
|
||||
Return _asegurado1Profesion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Profesion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado1Parentesco As String
|
||||
Public Property Asegurado1Parentesco() As String
|
||||
Get
|
||||
Return _asegurado1Parentesco
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado1Parentesco = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
Private _asegurado2CIF As String
|
||||
Public Property Asegurado2CIF() As String
|
||||
Get
|
||||
Return _asegurado2CIF
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2CIF = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Nombre As String
|
||||
Public Property Asegurado2Nombre() As String
|
||||
Get
|
||||
Return _asegurado2Nombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Nombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Apellidos As String
|
||||
Public Property Asegurado2Apellidos() As String
|
||||
Get
|
||||
Return _asegurado2Apellidos
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Apellidos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Domicilio As String
|
||||
Public Property Asegurado2Domicilio() As String
|
||||
Get
|
||||
Return _asegurado2Domicilio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Domicilio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2CodigoPostal As String
|
||||
Public Property Asegurado2CodigoPostal() As String
|
||||
Get
|
||||
Return _asegurado2CodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2CodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Poblacion As String
|
||||
Public Property Asegurado2Poblacion() As String
|
||||
Get
|
||||
Return _asegurado2Poblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Poblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Provincia As String
|
||||
Public Property Asegurado2Provincia() As String
|
||||
Get
|
||||
Return _asegurado2Provincia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Provincia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2CodigoMunicipio As String
|
||||
Public Property Asegurado2CodigoMunicipio() As String
|
||||
Get
|
||||
Return _asegurado2CodigoMunicipio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2CodigoMunicipio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Telefono As String
|
||||
Public Property Asegurado2Telefono() As String
|
||||
Get
|
||||
Return _asegurado2Telefono
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Telefono = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Email As String
|
||||
Public Property Asegurado2Email() As String
|
||||
Get
|
||||
Return _asegurado2Email
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Email = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2FechaNacimiento As Date
|
||||
Public Property Asegurado2FechaNacimiento() As Date
|
||||
Get
|
||||
Return _asegurado2FechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_asegurado2FechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Sexo As String
|
||||
Public Property Asegurado2Sexo() As String
|
||||
Get
|
||||
Return _asegurado2Sexo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Sexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Peso As Integer
|
||||
Public Property Asegurado2Peso() As Integer
|
||||
Get
|
||||
Return _asegurado2Peso
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_asegurado2Peso = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Estatura As Integer
|
||||
Public Property Asegurado2Estatura() As Integer
|
||||
Get
|
||||
Return _asegurado2Estatura
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_asegurado2Estatura = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Profesion As String
|
||||
Public Property Asegurado2Profesion() As String
|
||||
Get
|
||||
Return _asegurado2Profesion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Profesion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado2Parentesco As String
|
||||
Public Property Asegurado2Parentesco() As String
|
||||
Get
|
||||
Return _asegurado2Parentesco
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado2Parentesco = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _asegurado3CIF As String
|
||||
Public Property Asegurado3CIF() As String
|
||||
Get
|
||||
Return _asegurado3CIF
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3CIF = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Nombre As String
|
||||
Public Property Asegurado3Nombre() As String
|
||||
Get
|
||||
Return _asegurado3Nombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Nombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Apellidos As String
|
||||
Public Property Asegurado3Apellidos() As String
|
||||
Get
|
||||
Return _asegurado3Apellidos
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Apellidos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Domicilio As String
|
||||
Public Property Asegurado3Domicilio() As String
|
||||
Get
|
||||
Return _asegurado3Domicilio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Domicilio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3CodigoPostal As String
|
||||
Public Property Asegurado3CodigoPostal() As String
|
||||
Get
|
||||
Return _asegurado3CodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3CodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Poblacion As String
|
||||
Public Property Asegurado3Poblacion() As String
|
||||
Get
|
||||
Return _asegurado3Poblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Poblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Provincia As String
|
||||
Public Property Asegurado3Provincia() As String
|
||||
Get
|
||||
Return _asegurado3Provincia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Provincia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3CodigoMunicipio As String
|
||||
Public Property Asegurado3CodigoMunicipio() As String
|
||||
Get
|
||||
Return _asegurado3CodigoMunicipio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3CodigoMunicipio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Telefono As String
|
||||
Public Property Asegurado3Telefono() As String
|
||||
Get
|
||||
Return _asegurado3Telefono
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Telefono = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Email As String
|
||||
Public Property Asegurado3Email() As String
|
||||
Get
|
||||
Return _asegurado3Email
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Email = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3FechaNacimiento As Date
|
||||
Public Property Asegurado3FechaNacimiento() As Date
|
||||
Get
|
||||
Return _asegurado3FechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_asegurado3FechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Sexo As String
|
||||
Public Property Asegurado3Sexo() As String
|
||||
Get
|
||||
Return _asegurado3Sexo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Sexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Peso As Integer
|
||||
Public Property Asegurado3Peso() As Integer
|
||||
Get
|
||||
Return _asegurado3Peso
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_asegurado3Peso = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Estatura As Integer
|
||||
Public Property Asegurado3Estatura() As Integer
|
||||
Get
|
||||
Return _asegurado3Estatura
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_asegurado3Estatura = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Profesion As String
|
||||
Public Property Asegurado3Profesion() As String
|
||||
Get
|
||||
Return _asegurado3Profesion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Profesion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado3Parentesco As String
|
||||
Public Property Asegurado3Parentesco() As String
|
||||
Get
|
||||
Return _asegurado3Parentesco
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado3Parentesco = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _asegurado4CIF As String
|
||||
Public Property Asegurado4CIF() As String
|
||||
Get
|
||||
Return _asegurado4CIF
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4CIF = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Nombre As String
|
||||
Public Property Asegurado4Nombre() As String
|
||||
Get
|
||||
Return _asegurado4Nombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Nombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Apellidos As String
|
||||
Public Property Asegurado4Apellidos() As String
|
||||
Get
|
||||
Return _asegurado4Apellidos
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Apellidos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Domicilio As String
|
||||
Public Property Asegurado4Domicilio() As String
|
||||
Get
|
||||
Return _asegurado4Domicilio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Domicilio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4CodigoPostal As String
|
||||
Public Property Asegurado4CodigoPostal() As String
|
||||
Get
|
||||
Return _asegurado4CodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4CodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Poblacion As String
|
||||
Public Property Asegurado4Poblacion() As String
|
||||
Get
|
||||
Return _asegurado4Poblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Poblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Provincia As String
|
||||
Public Property Asegurado4Provincia() As String
|
||||
Get
|
||||
Return _asegurado4Provincia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Provincia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4CodigoMunicipio As String
|
||||
Public Property Asegurado4CodigoMunicipio() As String
|
||||
Get
|
||||
Return _asegurado4CodigoMunicipio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4CodigoMunicipio = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Telefono As String
|
||||
Public Property Asegurado4Telefono() As String
|
||||
Get
|
||||
Return _asegurado4Telefono
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Telefono = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Email As String
|
||||
Public Property Asegurado4Email() As String
|
||||
Get
|
||||
Return _asegurado4Email
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Email = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4FechaNacimiento As Date
|
||||
Public Property Asegurado4FechaNacimiento() As Date
|
||||
Get
|
||||
Return _asegurado4FechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_asegurado4FechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Sexo As String
|
||||
Public Property Asegurado4Sexo() As String
|
||||
Get
|
||||
Return _asegurado4Sexo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Sexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Peso As Integer
|
||||
Public Property Asegurado4Peso() As Integer
|
||||
Get
|
||||
Return _asegurado4Peso
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_asegurado4Peso = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Estatura As String
|
||||
Public Property Asegurado4Estatura() As String
|
||||
Get
|
||||
Return _asegurado4Estatura
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Estatura = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Profesion As String
|
||||
Public Property Asegurado4Profesion() As String
|
||||
Get
|
||||
Return _asegurado4Profesion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Profesion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _asegurado4Parentesco As String
|
||||
Public Property Asegurado4Parentesco() As String
|
||||
Get
|
||||
Return _asegurado4Parentesco
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_asegurado4Parentesco = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _pregunta1Asegurado1 As Boolean
|
||||
Public Property Pregunta1Asegurado1() As Boolean
|
||||
Get
|
||||
Return _pregunta1Asegurado1
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta1Asegurado1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta1Asegurado2 As Boolean
|
||||
Public Property Pregunta1Asegurado2() As Boolean
|
||||
Get
|
||||
Return _pregunta1Asegurado2
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta1Asegurado2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta1Asegurado3 As Boolean
|
||||
Public Property Pregunta1Asegurado3() As Boolean
|
||||
Get
|
||||
Return _pregunta1Asegurado3
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta1Asegurado3 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta1Asegurado4 As Boolean
|
||||
Public Property Pregunta1Asegurado4() As Boolean
|
||||
Get
|
||||
Return _pregunta1Asegurado4
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta1Asegurado4 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _pregunta2Asegurado1 As Boolean
|
||||
Public Property Pregunta2Asegurado1() As Boolean
|
||||
Get
|
||||
Return _pregunta2Asegurado1
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta2Asegurado1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta2Asegurado2 As Boolean
|
||||
Public Property Pregunta2Asegurado2() As Boolean
|
||||
Get
|
||||
Return _pregunta2Asegurado2
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta2Asegurado2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta2Asegurado3 As Boolean
|
||||
Public Property Pregunta2Asegurado3() As Boolean
|
||||
Get
|
||||
Return _pregunta2Asegurado3
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta2Asegurado3 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta2Asegurado4 As Boolean
|
||||
Public Property Pregunta2Asegurado4() As Boolean
|
||||
Get
|
||||
Return _pregunta2Asegurado4
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta2Asegurado4 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _pregunta3Asegurado1 As Boolean
|
||||
Public Property Pregunta3Asegurado1() As Boolean
|
||||
Get
|
||||
Return _pregunta3Asegurado1
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta3Asegurado1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta3Asegurado2 As Boolean
|
||||
Public Property Pregunta3Asegurado2() As Boolean
|
||||
Get
|
||||
Return _pregunta3Asegurado2
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta3Asegurado2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta3Asegurado3 As Boolean
|
||||
Public Property Pregunta3Asegurado3() As Boolean
|
||||
Get
|
||||
Return _pregunta3Asegurado3
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta3Asegurado3 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta3Asegurado4 As Boolean
|
||||
Public Property Pregunta3Asegurado4() As Boolean
|
||||
Get
|
||||
Return _pregunta3Asegurado4
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta3Asegurado4 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _pregunta4Asegurado1 As Boolean
|
||||
Public Property Pregunta4Asegurado1() As Boolean
|
||||
Get
|
||||
Return _pregunta4Asegurado1
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta4Asegurado1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta4Asegurado2 As Boolean
|
||||
Public Property Pregunta4Asegurado2() As Boolean
|
||||
Get
|
||||
Return _pregunta4Asegurado2
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta4Asegurado2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta4Asegurado3 As Boolean
|
||||
Public Property Pregunta4Asegurado3() As Boolean
|
||||
Get
|
||||
Return _pregunta4Asegurado3
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta4Asegurado3 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta4Asegurado4 As Boolean
|
||||
Public Property Pregunta4Asegurado4() As Boolean
|
||||
Get
|
||||
Return _pregunta4Asegurado4
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta4Asegurado4 = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _pregunta5Asegurado1 As Boolean
|
||||
Public Property Pregunta5Asegurado1() As Boolean
|
||||
Get
|
||||
Return _pregunta5Asegurado1
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta5Asegurado1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta5Asegurado2 As Boolean
|
||||
Public Property Pregunta5Asegurado2() As Boolean
|
||||
Get
|
||||
Return _pregunta5Asegurado2
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta5Asegurado2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta5Asegurado3 As Boolean
|
||||
Public Property Pregunta5Asegurado3() As Boolean
|
||||
Get
|
||||
Return _pregunta5Asegurado3
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta5Asegurado3 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _pregunta5Asegurado4 As Boolean
|
||||
Public Property Pregunta5Asegurado4() As Boolean
|
||||
Get
|
||||
Return _pregunta5Asegurado4
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_pregunta5Asegurado4 = 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 _asistenciaSanitaria As Boolean
|
||||
Public Property AsistenciaSanitaria() As Boolean
|
||||
Get
|
||||
Return _asistenciaSanitaria
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_asistenciaSanitaria = value
|
||||
End Set
|
||||
End Property
|
||||
Private _garantiaBucodental As Boolean
|
||||
Public Property GarantiaBucodental() As Boolean
|
||||
Get
|
||||
Return _garantiaBucodental
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_garantiaBucodental = value
|
||||
End Set
|
||||
End Property
|
||||
Private _reembolsoGastosCompletos As Boolean
|
||||
Public Property ReembolsoGastosCompletos() As Boolean
|
||||
Get
|
||||
Return _reembolsoGastosCompletos
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_reembolsoGastosCompletos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _reembolsoGastosHospitalarios As Boolean
|
||||
Public Property ReembolsoGastosHospitalarios() As Boolean
|
||||
Get
|
||||
Return _reembolsoGastosHospitalarios
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_reembolsoGastosHospitalarios = value
|
||||
End Set
|
||||
End Property
|
||||
Private _reembolsoGranCobertura As Boolean
|
||||
Public Property ReembolsoGranCobertura() As Boolean
|
||||
Get
|
||||
Return _reembolsoGranCobertura
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
_reembolsoGranCobertura = 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 _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
|
||||
End Class
|
||||
148
guia/presupuestos/TarificadorGenerico.vb
Normal file
148
guia/presupuestos/TarificadorGenerico.vb
Normal file
@@ -0,0 +1,148 @@
|
||||
Public Class TarificadorGenerico
|
||||
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 _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 _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 _total As String
|
||||
Public Property Total() As String
|
||||
Get
|
||||
Return _total
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_total = 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
|
||||
End Class
|
||||
306
guia/presupuestos/TarificadorMaquinariaPlusUltra.vb
Normal file
306
guia/presupuestos/TarificadorMaquinariaPlusUltra.vb
Normal file
@@ -0,0 +1,306 @@
|
||||
<Serializable>
|
||||
Public Class TarificadorMaquinariaPlusUltra
|
||||
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 _TipoMaquinaria As String
|
||||
Public Property TipoMaquinaria() As String
|
||||
Get
|
||||
Return _TipoMaquinaria
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_TipoMaquinaria = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _UsoAlQueSeDestina As String
|
||||
Public Property UsoAlQueSeDestina() As String
|
||||
Get
|
||||
Return _UsoAlQueSeDestina
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_UsoAlQueSeDestina = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _ValorMaquinaria As Double
|
||||
Public Property ValorMaquinaria() As Double
|
||||
Get
|
||||
Return _ValorMaquinaria
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_ValorMaquinaria = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _valorAccesorios As Double
|
||||
Public Property ValorAccesorios() As Double
|
||||
Get
|
||||
Return _valorAccesorios
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_valorAccesorios = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _ExistenciasProductoRecolectado As String
|
||||
Public Property ExistenciasProductoRecolectado() As String
|
||||
Get
|
||||
Return _ExistenciasProductoRecolectado
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_ExistenciasProductoRecolectado = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _marca As String
|
||||
Public Property Marca() As String
|
||||
Get
|
||||
Return _marca
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_marca = value
|
||||
End Set
|
||||
End Property
|
||||
Private _modelo As String
|
||||
Public Property Modelo() As String
|
||||
Get
|
||||
Return _modelo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_modelo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _fechaMatriculacion As Date
|
||||
Public Property FechaMatriculacion() As Date
|
||||
Get
|
||||
Return _fechaMatriculacion
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_fechaMatriculacion = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _Antiguedad As String
|
||||
Public Property Antiguedad() As String
|
||||
Get
|
||||
Return _Antiguedad
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Antiguedad = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _estado As String
|
||||
Public Property Estado() As String
|
||||
Get
|
||||
Return _estado
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_estado = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _garantiaIncendio As String
|
||||
Public Property GarantiaIncendio() As String
|
||||
Get
|
||||
Return _garantiaIncendio
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_garantiaIncendio = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _garantiaResponsabilidadCivil As String
|
||||
Public Property GarantiaResponsabilidadCivil() As String
|
||||
Get
|
||||
Return _garantiaResponsabilidadCivil
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_garantiaResponsabilidadCivil = value
|
||||
End Set
|
||||
End Property
|
||||
Private _riesgosExtensivos As String
|
||||
Public Property RiesgosExtensivos() As String
|
||||
Get
|
||||
Return _riesgosExtensivos
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_riesgosExtensivos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _paralizacion As String
|
||||
Public Property Paralizacion() As String
|
||||
Get
|
||||
Return _paralizacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_paralizacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _RoboExpoliacion As String
|
||||
Public Property RoboExpoliacion() As String
|
||||
Get
|
||||
Return _RoboExpoliacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_RoboExpoliacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _lunas As String
|
||||
Public Property Lunas() As String
|
||||
Get
|
||||
Return _lunas
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_lunas = 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 _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 _total As String
|
||||
Public Property Total() As String
|
||||
Get
|
||||
Return _total
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_total = 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
|
||||
End Class
|
||||
441
guia/presupuestos/TarificiadorMaquinaria.vb
Normal file
441
guia/presupuestos/TarificiadorMaquinaria.vb
Normal file
@@ -0,0 +1,441 @@
|
||||
Public Class TarificadorMaquinaria
|
||||
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 _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 _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 _matricula As String
|
||||
Public Property Matricula() As String
|
||||
Get
|
||||
Return _matricula
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_matricula = value
|
||||
End Set
|
||||
End Property
|
||||
Private _usoAlQueSeDestina As String
|
||||
Public Property UsoAlQueSeDestina() As String
|
||||
Get
|
||||
Return _usoAlQueSeDestina
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_usoAlQueSeDestina = value
|
||||
End Set
|
||||
End Property
|
||||
Private _antiguedadMaquinaria As Integer
|
||||
Public Property AntiguedadMaquinaria() As Integer
|
||||
Get
|
||||
Return _antiguedadMaquinaria
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_antiguedadMaquinaria = value
|
||||
End Set
|
||||
End Property
|
||||
Private _NumeroMaquinasAseguradas As Integer
|
||||
Public Property NumeroMaquinasAseguradas() As Integer
|
||||
Get
|
||||
Return _NumeroMaquinasAseguradas
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_NumeroMaquinasAseguradas = value
|
||||
End Set
|
||||
End Property
|
||||
Private _cosechadoras As Integer
|
||||
Public Property Cosechadoras() As Integer
|
||||
Get
|
||||
Return _cosechadoras
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_cosechadoras = value
|
||||
End Set
|
||||
End Property
|
||||
Private _cosechadorasRotura As Integer
|
||||
Public Property CosechadorasRotura() As Integer
|
||||
Get
|
||||
Return _cosechadorasRotura
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_cosechadorasRotura = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tractoresAgricolas As Integer
|
||||
Public Property TractoresAgricolas() As Integer
|
||||
Get
|
||||
Return _tractoresAgricolas
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_tractoresAgricolas = value
|
||||
End Set
|
||||
End Property
|
||||
Private _empacadoras As Integer
|
||||
Public Property Empacadoras() As Integer
|
||||
Get
|
||||
Return _empacadoras
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_empacadoras = value
|
||||
End Set
|
||||
End Property
|
||||
Private _vendimiadoras As Integer
|
||||
Public Property Vendimiadoras() As Integer
|
||||
Get
|
||||
Return _vendimiadoras
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_vendimiadoras = value
|
||||
End Set
|
||||
End Property
|
||||
Private _noAutoPropulsados As Integer
|
||||
Public Property NoAutoPropulsados() As Integer
|
||||
Get
|
||||
Return _noAutoPropulsados
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_noAutoPropulsados = value
|
||||
End Set
|
||||
End Property
|
||||
Private _vibradoresOlivos As Integer
|
||||
Public Property VibradoresOlivos() As Integer
|
||||
Get
|
||||
Return _vibradoresOlivos
|
||||
End Get
|
||||
Set(ByVal value As Integer)
|
||||
_vibradoresOlivos = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _cosechadorasCalculado As Double
|
||||
Public Property CosechadorasCalculado() As Double
|
||||
Get
|
||||
Return _cosechadorasCalculado
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_cosechadorasCalculado = value
|
||||
End Set
|
||||
End Property
|
||||
Private _cosechadorasRoturaCalculado As Double
|
||||
Public Property CosechadorasRoturaCalculado() As Double
|
||||
Get
|
||||
Return _cosechadorasRoturaCalculado
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_cosechadorasRoturaCalculado = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tractoresAgricolasCalculado As Double
|
||||
Public Property TractoresAgricolasCalculado() As Double
|
||||
Get
|
||||
Return _tractoresAgricolasCalculado
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_tractoresAgricolasCalculado = value
|
||||
End Set
|
||||
End Property
|
||||
Private _empacadorasCalculado As Double
|
||||
Public Property EmpacadorasCalculado() As Double
|
||||
Get
|
||||
Return _empacadorasCalculado
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_empacadorasCalculado = value
|
||||
End Set
|
||||
End Property
|
||||
Private _vendimiadorasCalculado As Double
|
||||
Public Property VendimiadorasCalculado() As Double
|
||||
Get
|
||||
Return _vendimiadorasCalculado
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_vendimiadorasCalculado = value
|
||||
End Set
|
||||
End Property
|
||||
Private _noAutoPropulsadosCalculado As Double
|
||||
Public Property NoAutoPropulsadosCalculado() As Double
|
||||
Get
|
||||
Return _noAutoPropulsadosCalculado
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_noAutoPropulsadosCalculado = value
|
||||
End Set
|
||||
End Property
|
||||
Private _vibradoresOlivosCalculado As Double
|
||||
Public Property VibradoresOlivosCalculado() As Double
|
||||
Get
|
||||
Return _vibradoresOlivosCalculado
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_vibradoresOlivosCalculado = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _primaNetaMinima As Double
|
||||
Public Property PrimaNetaMinima() As Double
|
||||
Get
|
||||
Return _primaNetaMinima
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_primaNetaMinima = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primaNeta As Double
|
||||
Public Property PrimaNeta() As Double
|
||||
Get
|
||||
Return _primaNeta
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_primaNeta = value
|
||||
End Set
|
||||
End Property
|
||||
Private _impuestos As Double
|
||||
Public Property Impuestos() As Double
|
||||
Get
|
||||
Return _impuestos
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_impuestos = value
|
||||
End Set
|
||||
End Property
|
||||
Private _primaTotal As Double
|
||||
Public Property PrimaTotal() As Double
|
||||
Get
|
||||
Return _primaTotal
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_primaTotal = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _condicionantes As String
|
||||
Public Property Condicionantes() As String
|
||||
Get
|
||||
Return _condicionantes
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_condicionantes = 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 _daniosLuna As String
|
||||
Public Property DaniosLuna() As String
|
||||
Get
|
||||
Return _daniosLuna
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_daniosLuna = 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
|
||||
End Class
|
||||
432
guia/presupuestos/Tractores.vb
Normal file
432
guia/presupuestos/Tractores.vb
Normal file
@@ -0,0 +1,432 @@
|
||||
<Serializable>
|
||||
Public Class Tractores
|
||||
|
||||
Private _peso As Double
|
||||
Public Property Peso() As Double
|
||||
Get
|
||||
Return _peso
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
_peso = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Marca As String
|
||||
Public Property Marca() As String
|
||||
Get
|
||||
Return _Marca
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Marca = value
|
||||
End Set
|
||||
End Property
|
||||
Private _modelo As String
|
||||
Public Property Modelo() As String
|
||||
Get
|
||||
Return _modelo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_modelo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _version As String
|
||||
Public Property Version() As String
|
||||
Get
|
||||
Return _version
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_version = value
|
||||
End Set
|
||||
End Property
|
||||
Private _fechaPrimeraMatriculacion As DateTime
|
||||
Public Property FechaPrimeraMatriculacion() As DateTime
|
||||
Get
|
||||
Return _fechaPrimeraMatriculacion
|
||||
End Get
|
||||
Set(ByVal value As DateTime)
|
||||
_fechaPrimeraMatriculacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tipoVehiculo As String
|
||||
Public Property TipoVehiculo() As String
|
||||
Get
|
||||
Return _tipoVehiculo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tipoVehiculo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _matricula As String
|
||||
Public Property Matricula() As String
|
||||
Get
|
||||
Return _matricula
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_matricula = 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 _tomadorDocumento As String
|
||||
Public Property TomadorDocumento() As String
|
||||
Get
|
||||
Return _tomadorDocumento
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorDocumento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorTipoDocumento As String
|
||||
Public Property TomadorTipoDocumento() As String
|
||||
Get
|
||||
Return _tomadorTipoDocumento
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorTipoDocumento = 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 _tomadorApellido1 As String
|
||||
Public Property TomadorApellido1() As String
|
||||
Get
|
||||
Return _tomadorApellido1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorApellido1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorApellido2 As String
|
||||
Public Property TomadorApellido2() As String
|
||||
Get
|
||||
Return _tomadorApellido2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorApellido2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorFechaNacimiento As Date
|
||||
Public Property TomadorFechaNacimiento() As Date
|
||||
Get
|
||||
Return _tomadorFechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_tomadorFechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _estadoCivil As String
|
||||
Public Property EstadoCivil() As String
|
||||
Get
|
||||
Return _estadoCivil
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_estadoCivil = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorSexo As Int32
|
||||
Public Property TomadorSexo() As Int32
|
||||
Get
|
||||
Return _tomadorSexo
|
||||
End Get
|
||||
Set(ByVal value As Int32)
|
||||
_tomadorSexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorVia As String
|
||||
Public Property TomadorVia() As String
|
||||
Get
|
||||
Return _tomadorVia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorVia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorNombreVia As String
|
||||
Public Property TomadorNombreVia() As String
|
||||
Get
|
||||
Return _tomadorNombreVia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorNombreVia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorNumeroVia As String
|
||||
Public Property TomadorNumeroVia() As String
|
||||
Get
|
||||
Return _tomadorNumeroVia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorNumeroVia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorRestoVia As String
|
||||
Public Property TomadorRestoVia() As String
|
||||
Get
|
||||
Return _tomadorRestoVia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorRestoVia = 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 _tomadorTelefono1 As String
|
||||
Public Property Telefono1() As String
|
||||
Get
|
||||
Return _tomadorTelefono1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorTelefono1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tomadorTelefono2 As String
|
||||
Public Property Telefono2() As String
|
||||
Get
|
||||
Return _tomadorTelefono2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tomadorTelefono2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _correoElectronico As String
|
||||
Public Property CorreoElectronico() As String
|
||||
Get
|
||||
Return _correoElectronico
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_correoElectronico = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tipoPropietario As String
|
||||
Public Property TipoPropietario() As String
|
||||
Get
|
||||
Return _tipoPropietario
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tipoPropietario = value
|
||||
End Set
|
||||
End Property
|
||||
Private _propietarioDocumento As String
|
||||
Public Property PropietarioDocumento() As String
|
||||
Get
|
||||
Return _propietarioDocumento
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_propietarioDocumento = value
|
||||
End Set
|
||||
End Property
|
||||
'Private _propietarioIdEntidad As String
|
||||
'Public Property PropietarioIdEntidad() As String
|
||||
' Get
|
||||
' Return _propietarioIdEntidad
|
||||
' End Get
|
||||
' Set(ByVal value As String)
|
||||
' _propietarioIdEntidad = 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 _propietarioApellido1 As String
|
||||
Public Property PropietarioApellido1() As String
|
||||
Get
|
||||
Return _propietarioApellido1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_propietarioApellido1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _propietarioApellido2 As String
|
||||
Public Property PropietarioApellido2() As String
|
||||
Get
|
||||
Return _propietarioApellido2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_propietarioApellido2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _propietarioFechaNacimiento As Date
|
||||
Public Property PropietarioFechaNacimiento() As Date
|
||||
Get
|
||||
Return _propietarioFechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_propietarioFechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _propietarioSexo As Int32
|
||||
Public Property PropietarioSexo() As Int32
|
||||
Get
|
||||
Return _propietarioSexo
|
||||
End Get
|
||||
Set(ByVal value As Int32)
|
||||
_propietarioSexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _tipoConductor As String
|
||||
Public Property TipoConductor() As String
|
||||
Get
|
||||
Return _tipoConductor
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_tipoConductor = value
|
||||
End Set
|
||||
End Property
|
||||
Private _fechaPermisoConduccion As Date
|
||||
Public Property FechaPermisoConduccion() As Date
|
||||
Get
|
||||
Return _fechaPermisoConduccion
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_fechaPermisoConduccion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _conductorIdEntidad As String
|
||||
Public Property ConductorIdEntidad() As String
|
||||
Get
|
||||
Return _conductorIdEntidad
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_conductorIdEntidad = value
|
||||
End Set
|
||||
End Property
|
||||
Private _conductorDocumento As String
|
||||
Public Property ConductorDocumento() As String
|
||||
Get
|
||||
Return _conductorDocumento
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_conductorDocumento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _conductorNombre As String
|
||||
Public Property ConductorNombre() As String
|
||||
Get
|
||||
Return _conductorNombre
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_conductorNombre = value
|
||||
End Set
|
||||
End Property
|
||||
Private _conductorApellido1 As String
|
||||
Public Property ConductorApellido1() As String
|
||||
Get
|
||||
Return _conductorApellido1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_conductorApellido1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _conductorApellido2 As String
|
||||
Public Property ConductorApellido2() As String
|
||||
Get
|
||||
Return _conductorApellido2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_conductorApellido2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _conductorSexo As Int32
|
||||
Public Property ConductorSexo() As Int32
|
||||
Get
|
||||
Return _conductorSexo
|
||||
End Get
|
||||
Set(ByVal value As Int32)
|
||||
_conductorSexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _conductorFechaNacimiento As Date
|
||||
Public Property ConductorFechaNacimiento() As Date
|
||||
Get
|
||||
Return _conductorFechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_conductorFechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _fechaEfecto As String
|
||||
Public Property FechaEfecto() As String
|
||||
Get
|
||||
Return _fechaEfecto
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_fechaEfecto = 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 _combinacionAccidentes As String
|
||||
Public Property CombinacionAccidentes() As String
|
||||
Get
|
||||
Return _combinacionAccidentes
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_combinacionAccidentes = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _usoVehiculo As String
|
||||
Public Property UsoVehiculo() As String
|
||||
Get
|
||||
Return _usoVehiculo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_usoVehiculo = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _primaTotal As String
|
||||
Public Property PrimaTotal() As String
|
||||
Get
|
||||
Return _primaTotal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_primaTotal = value
|
||||
End Set
|
||||
End Property
|
||||
End Class
|
||||
268
guia/presupuestos/TractoresEuropAssistance.vb
Normal file
268
guia/presupuestos/TractoresEuropAssistance.vb
Normal file
@@ -0,0 +1,268 @@
|
||||
<Serializable>
|
||||
Public Class TractoresEuropAssistance
|
||||
Private _Matricula As String
|
||||
Public Property Matricula() As String
|
||||
Get
|
||||
Return _Matricula
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Matricula = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Marca As String
|
||||
Public Property Marca() As String
|
||||
Get
|
||||
Return _Marca
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Marca = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _Modelo As String
|
||||
Public Property Modelo() As String
|
||||
Get
|
||||
Return _Modelo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Modelo = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _Version As String
|
||||
Public Property Version() As String
|
||||
Get
|
||||
Return _Version
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Version = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _FechaMatriculacion As Date
|
||||
Public Property FechaMatriculacion() As Date
|
||||
Get
|
||||
Return _FechaMatriculacion
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_FechaMatriculacion = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
|
||||
Private _CIF As String
|
||||
Public Property CIF() As String
|
||||
Get
|
||||
Return _CIF
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_CIF = value
|
||||
End Set
|
||||
End Property
|
||||
Private _RazonSocial As String
|
||||
Public Property RazonSocial() As String
|
||||
Get
|
||||
Return _RazonSocial
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_RazonSocial = value
|
||||
End Set
|
||||
End Property
|
||||
'Private _Nombre As String
|
||||
'Public Property Nombre() As String
|
||||
' Get
|
||||
' Return _Nombre
|
||||
' End Get
|
||||
' Set(ByVal value As String)
|
||||
' _Nombre = value
|
||||
' End Set
|
||||
'End Property
|
||||
'Private _Apellido1 As String
|
||||
'Public Property Apellido1() As String
|
||||
' Get
|
||||
' Return _Apellido1
|
||||
' End Get
|
||||
' Set(ByVal value As String)
|
||||
' _Apellido1 = value
|
||||
' End Set
|
||||
'End Property
|
||||
'Private _Apellido2 As String
|
||||
'Public Property Apellido2() As String
|
||||
' Get
|
||||
' Return _Apellido2
|
||||
' End Get
|
||||
' Set(ByVal value As String)
|
||||
' _Apellido2 = value
|
||||
' End Set
|
||||
'End Property
|
||||
Private _FechaNacimiento As Date
|
||||
Public Property FechaNacimiento() As Date
|
||||
Get
|
||||
Return _FechaNacimiento
|
||||
End Get
|
||||
Set(ByVal value As Date)
|
||||
_FechaNacimiento = value
|
||||
End Set
|
||||
End Property
|
||||
Private _EstadoCivil As String
|
||||
Public Property EstadoCivil() As String
|
||||
Get
|
||||
Return _EstadoCivil
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_EstadoCivil = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Sexo As String
|
||||
Public Property Sexo() As String
|
||||
Get
|
||||
Return _Sexo
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Sexo = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Telefono1 As String
|
||||
Public Property Telefono1() As String
|
||||
Get
|
||||
Return _Telefono1
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Telefono1 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Telefono2 As String
|
||||
Public Property Telefono2() As String
|
||||
Get
|
||||
Return _Telefono2
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Telefono2 = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Email As String
|
||||
Public Property Email() As String
|
||||
Get
|
||||
Return _Email
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Email = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _fechaEfecto As String
|
||||
Public Property FechaEfecto() As String
|
||||
Get
|
||||
Return _fechaEfecto
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_fechaEfecto = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private _fechaVencimiento As String
|
||||
Public Property FechaVencimiento() As String
|
||||
Get
|
||||
Return _fechaVencimiento
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_fechaVencimiento = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
'Private _TipoVia As String
|
||||
'Public Property TipoVia() As String
|
||||
' Get
|
||||
' Return _TipoVia
|
||||
' End Get
|
||||
' Set(ByVal value As String)
|
||||
' _TipoVia = value
|
||||
' End Set
|
||||
'End Property
|
||||
'Private _NombreVia As String
|
||||
'Public Property NombreVia() As String
|
||||
' Get
|
||||
' Return _NombreVia
|
||||
' End Get
|
||||
' Set(ByVal value As String)
|
||||
' _NombreVia = value
|
||||
' End Set
|
||||
'End Property
|
||||
'Private _RestoVia As String
|
||||
'Public Property RestoVia() As String
|
||||
' Get
|
||||
' Return _RestoVia
|
||||
' End Get
|
||||
' Set(ByVal value As String)
|
||||
' _RestoVia = value
|
||||
' End Set
|
||||
'End Property
|
||||
Private _Direccion As String
|
||||
Public Property Direccion() As String
|
||||
Get
|
||||
Return _Direccion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Direccion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _CodigoPostal As String
|
||||
Public Property CodigoPostal() As String
|
||||
Get
|
||||
Return _CodigoPostal
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_CodigoPostal = value
|
||||
End Set
|
||||
End Property
|
||||
Private _CodigoPoblacion As String
|
||||
Public Property CodigoPoblacion() As String
|
||||
Get
|
||||
Return _CodigoPoblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_CodigoPoblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Poblacion As String
|
||||
Public Property Poblacion() As String
|
||||
Get
|
||||
Return _Poblacion
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Poblacion = value
|
||||
End Set
|
||||
End Property
|
||||
Private _CodigoProvincia As String
|
||||
Public Property CodigoProvincia() As String
|
||||
Get
|
||||
Return _CodigoProvincia
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_CodigoProvincia = value
|
||||
End Set
|
||||
End Property
|
||||
Private _Provinica As String
|
||||
Public Property Provincia() As String
|
||||
Get
|
||||
Return _Provinica
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_Provinica = 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
|
||||
|
||||
End Class
|
||||
161
guia/presupuestos/TransportexAXA.vb
Normal file
161
guia/presupuestos/TransportexAXA.vb
Normal file
@@ -0,0 +1,161 @@
|
||||
<Serializable>
|
||||
Public Class TransportexAXA
|
||||
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 _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 _matriculaRemolque As String
|
||||
Public Property MatriculaRemolque() As String
|
||||
Get
|
||||
Return _matriculaRemolque
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_matriculaRemolque = value
|
||||
End Set
|
||||
End Property
|
||||
Private _calidadTomador As String
|
||||
Public Property CalidadTomador() As String
|
||||
Get
|
||||
Return _calidadTomador
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_calidadTomador = value
|
||||
End Set
|
||||
End Property
|
||||
Private _medioTransporte As String
|
||||
Public Property MedioTransporte() As String
|
||||
Get
|
||||
Return _medioTransporte
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_medioTransporte = value
|
||||
End Set
|
||||
End Property
|
||||
Private _capitalElegido As String
|
||||
Public Property CapitalElegido() As String
|
||||
Get
|
||||
Return _capitalElegido
|
||||
End Get
|
||||
Set(ByVal value As String)
|
||||
_capitalElegido = 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
|
||||
End Class
|
||||
Reference in New Issue
Block a user