cambio en ventas, TC no editable

- popupaxiliar.  generar póliza cancelada apartir de otra

Ventas/Ventas.aspx.vb

@@ -20758,13 +20758,19 @@ Partial Class Ventas
         CalculaTotalesVenta(True)
 
 
+
         'condicióon, en la que se verifica que el importe total de aplicación de la nota de crédito sea igual al del total de la nota de crédito, ej. saldo de la factura 1000.01 y la nota de crédito se generó po 1000.00
         If Not AplicaNCMasiva Then
             Dim TT As Decimal = TxtNCImporte.Text.ToDecimal
             If TT > TxtTotal.Text.ToDecimal Then TT = TxtTotal.Text.ToDecimal
             CargaNCDT(CveVenta, TT)
-        End If
 
+        End If
+        'verifica el tipo de cambio que se actualice
+        If DdlMoneda.SelectedValue <> "1" Then
+            TxtTipoCambio.Text = GlobalTipoCambio(Now).ToString
+        End If
+        LblTCValuacion.Visible = False
         UpPS.Update()
 
         LBNotaCredito.Visible = False