Merge branch 'master' of http://192.168.10.111:8383/SIG

2023-08-23 00:06:42 -07:00
parent cf37ee4ebe 4763aa8d91
commit 1ab4b815cd
16 changed files with 8729 additions and 8429 deletions
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -15533,8 +15533,12 @@ Partial Class Compras_Compras
        Else

            If UsuarioActual.CveEmpresa.Contiene({4, 7, 11, 12, 145}) Then
-                RegistraScript("$('#ModalPesos').modal('show');")
-                TxtConvertirPesos.Text = If(TipoCambio > 0, TipoCambio, GlobalTipoCambio(TxtFecha.Text.ToDate)).ToString.FormatoNumero
+
+                If CveMoneda > 1 AndAlso TipoCambio > 1 Then
+                    RegistraScript("$('#ModalPesos').modal('show');")
+                    TxtConvertirPesos.Text = If(TipoCambio > 0, TipoCambio, GlobalTipoCambio(TxtFecha.Text.ToDate)).ToString.FormatoNumero
+                End If
+
            End If

            TipoCambio = 1