Completamos el subformulario anterior con los campos de IVA y RE y también que actualice de forma automática la suma de bases, cuotas de iva, de recargo de equivalencia y de IRPF.
Private Sub Form_AfterUpdate()
Form_F_CabecerasFacturasVenta_LineasFacturasVenta.Recalc
Form_F_CabecerasFacturasVenta.base.Value = Form_F_CabecerasFacturasVenta_LineasFacturasVenta.STotal.Value
Form_F_CabecerasFacturasVenta.iva.Value = Form_F_CabecerasFacturasVenta_LineasFacturasVenta.SIVA.Value
Form_F_CabecerasFacturasVenta.re.Value = Form_F_CabecerasFacturasVenta_LineasFacturasVenta.SRe.Value
Form_F_CabecerasFacturasVenta.irpf.Value = Form_F_CabecerasFacturasVenta_LineasFacturasVenta.SIrpf.Value
End Sub
No hay comentarios:
Publicar un comentario