diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 4ab55aa65..779f48636 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -12239,7 +12239,7 @@ Partial Class Ventas
         ObjFactura.Det_OrdenCompra = TxtDet_OrdenCompra.Text.Trim
         ObjFactura.Det_FechaOrdenCompra = TxtDet_FechaOrdenCompra.Text.Trim
         ObjFactura.Det_ContraRecibo = TxtDet_ContraRecibo.Text.Trim
-        ObjFactura.MonedaAbreviatura = ""
+        ObjFactura.MonedaAbreviatura = DdlMoneda.SelectedItem.Text
 
         If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso DvModalRequiereOSFecha.Visible Then
             ObjFactura.FechaEjecucion = TxtFechaOS.Text.Trim.ToDateTime