agregado procesos y bd clases

guia/presupuestos/TarificiadorMaquinaria.vb

@@ -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