Files
Asegasa.NET/guia/Extensiones/DatosRecibosExportacion.vb
2026-04-28 11:52:16 +02:00

97 lines
3.8 KiB
VB.net

<Serializable>
Public Class DatosRecibosExportacion
Public Sub New()
End Sub
Public Sub New(Recibo As vf_recibosextendidos)
CodigoRecibo = Recibo.CodigoRecibo
NumeroPoliza = Recibo.NumeroPoliza
Tomador = Recibo.Tomador
Matricula = Recibo.Matricula
FechaEfecto = Recibo.FechaEfecto
FechaVencimiento = Recibo.FechaVencimiento
Compania = Recibo.Compania
Agente = Recibo.Agente
SubAgente = Recibo.SubAgente
Ramo = Recibo.Ramo
FechaExpedicion = Recibo.FechaExpedicion
BienesAsegurados = Recibo.BienesAsegurados
FechaBaja = Recibo.FechaBaja
CausaBaja = Recibo.CausaBaja
TipoRecibo = Recibo.TipoRecibo
TipoPago = Recibo.TipoPago
Oficina = Recibo.Oficina
PrimaNeta = Recibo.PrimaNeta
BonificacionORecargo = Recibo.BonificacionORecargo
Consorcio = Recibo.Consorcio
Impuesto = Recibo.Impuesto
RecargoExterno = Recibo.RecargoExterno
TotalRecibo = Recibo.TotalRecibo
ComisionReciboPrimaNeta = Recibo.ComisionReciboPrimaNeta
PorcentajeReciboPrimaNeta = Recibo.PorcentajeReciboPrimaNeta
TotalComision = Recibo.TotalComision
PorcentajeComisionAgente = Recibo.PorcentajeComisionAgente
ComisionAgente = Recibo.ComisionAgente
End Sub
Public Sub New(Recibo As ve_recibos)
CodigoRecibo = Recibo.CodigoRecibo
NumeroPoliza = Recibo.NumeroPoliza
Tomador = Recibo.Tomador
Matricula = Recibo.Matricula
FechaEfecto = Recibo.FechaEfecto
FechaRecepcionCia = Recibo.FechaRecepcionCia
FechaVencimiento = Recibo.FechaVencimiento
Compania = Recibo.Compania
Agente = Recibo.Agente
SubAgente = Recibo.SubAgente
Ramo = Recibo.Ramo
FechaExpedicion = Recibo.FechaExpedicion
BienesAsegurados = Recibo.BienesAsegurados
FechaBaja = Recibo.FechaBaja
CausaBaja = Recibo.CausaBaja
TipoRecibo = Recibo.TipoRecibo
TipoPago = Recibo.TipoPago
Oficina = Recibo.Oficina
PrimaNeta = Recibo.PrimaNeta
BonificacionORecargo = Recibo.BonificacionORecargo
Consorcio = Recibo.Consorcio
Impuesto = Recibo.Impuesto
RecargoExterno = Recibo.RecargoExterno
TotalRecibo = Recibo.TotalRecibo
ComisionReciboPrimaNeta = Recibo.ComisionReciboPrimaNeta
PorcentajeReciboPrimaNeta = Recibo.PorcentajeReciboPrimaNeta
TotalComision = Recibo.TotalComision
PorcentajeComisionAgente = Recibo.PorcentajeComisionAgente
ComisionAgente = Recibo.ComisionAgente
End Sub
Public Property CodigoRecibo As String
Public Property NumeroPoliza As String
Public Property Tomador As String
Public Property Matricula As String
Public Property FechaEfecto As Date
Public Property FechaRecepcionCia As Date?
Public Property FechaVencimiento As Date
Public Property Compania As String
Public Property Agente As String
Public Property SubAgente As String
Public Property Ramo As String
Public Property FechaExpedicion As Date?
Public Property BienesAsegurados As String
Public Property FechaBaja As Date?
Public Property CausaBaja As String
Public Property TipoRecibo As String
Public Property TipoPago As String
Public Property Oficina As String
Public Property PrimaNeta As Double?
Public Property BonificacionORecargo As Double?
Public Property Consorcio As Double?
Public Property Impuesto As Double?
Public Property RecargoExterno As Double?
Public Property TotalRecibo As Double?
Public Property ComisionReciboPrimaNeta As Double?
Public Property PorcentajeReciboPrimaNeta As Double?
Public Property TotalComision As Double?
Public Property PorcentajeComisionAgente As Double?
Public Property ComisionAgente As Double?
End Class