Estados de cuenta,cargar cxc, tipos de almacen en rep almacen

Ventas/Clientes.aspx.vb

@@ -3902,7 +3902,7 @@ Partial Class Clientes
                     End If
 
                     Try
-                        Dim Cuerpo As String = String.Format("Estimado cliente {0}, al presente se correo se anexa su estado actual de cartera en {1}.<br />
+                        Dim Cuerpo As String = String.Format("Estimado cliente {0}, al presente del correo se anexa su estado actual de cartera en {1}.<br />
                                                         <br />
                                                         Quedamos a sus ordenes para cualquier duda o aclaración con su agente de Ventas.<br />
                                                         <br />

Ventas/Ventas.aspx.vb

@@ -5331,6 +5331,11 @@ Partial Class Ventas
             DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor.ToString)
         End If
 
+        'SI LA VENTA YA ESTA REGISTRADA NO DEBE HABILITAR ACCIONES
+        If CveVenta <= 0 Then
+            LnkRemisiones.Visible = If(UsuarioActual.TienePermisoProceso(199), True, False) : LnkOCs.Visible = True : LnkCotizaciones.Visible = True : LnkPedido2SinFacturar.Visible = True : InicializaAplicarNCMasiva()
+        End If
+
         UPPVentas.Update()
         UpEstatus.Update()
         UPCondicionesPago.Update()