Clientes se retiran campos CveMetodoPago, NumCtaPago, ConvenioCIE desde base de datos, Validacion fecha de pago no debe ser menor a factura, ProveedoresAbonar, ClientesAbonar, PooIEVentas, PopIECopmpras

Bancos/PopIECompras.aspx.vb

@@ -1382,12 +1382,21 @@ Partial Class Bancos_PopIECompras
 
             Dim rv As RangeValidator = CType(e.Row.FindControl("RVSaldoDeudor"), RangeValidator)
         End If
-    End Sub
+    End Sub
 #End Region
-
+
 #Region "G U A R D A R"
     Private Sub BtnGuardar_Click(sender As Object, e As EventArgs) Handles BtnGuardar.Click
-        'VALIDACION PARA LOS IMPORTES CUANDO SE QUIERE PAGAR EN DIFERENTE MONEDA
+
+
+        If FechaCompra.ToString("dd/MM/yyyy").ToDate > TxtFechaDocumento.Text.ToDate Then
+            Alert($"La fecha de compra no puede ser mayor que la fecha de pago  <br/> Fecha de compra: {  FechaCompra.ToString("dd/MM/yyyy") } ", TipoMensaje.MsgAdvertencia)
+            Exit Sub
+        End If
+
+
+
+        'VALIDACION PARA LOS IMPORTES CUANDO SE QUIERE PAGAR EN DIFERENTE MONEDA
         If Not Page.IsValid Then
             Exit Sub
         End If