diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index c80df0e69..8b3a784ff 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -13499,6 +13499,7 @@ Partial Class Ventas
             End If
 
             If EsVentaMedica AndAlso ErrorList.Count = 0 AndAlso ChkRequiereTecnico.Checked Then
+
                 GeneraOS(ObjVentas.IniciaTransacSQL, ErrorList)
 
                 If ErrorList.Count = 0 Then
@@ -13507,6 +13508,10 @@ Partial Class Ventas
                     End If
                 End If
 
+                If ObjVentas.SincronizacionProcedimientoProducto(DdlProcedimiento.SelectedValue.ToEntero, factura.CveVenta, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+                    ErrorList.Add("Ocurrió un error al guardar la los productos al procedimiento")
+                End If
+
             End If