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