validacion de cancelacion

2021-06-18 19:08:51 -07:00
parent f8e2d2ea4b
commit 1b8e431e13
2 changed files with 11 additions and 3 deletions
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -5970,9 +5970,13 @@ Partial Class Bancos_IE

    Protected Sub LnkCancelar_Click(sender As Object, e As EventArgs)
        If ChkConciliado.Checked Then
-            TxtFechaDesconciliado.Text = Now.ToShortDateString
-            UpDesconciliar.Update()
-            RegistraScript("$('#DModalDesconciliar').modal()")
+            'TxtFechaDesconciliado.Text = Now.ToShortDateString
+            'UpDesconciliar.Update()
+            'RegistraScript("$('#DModalDesconciliar').modal()")
+            Dim fechaCancelacion As String = DateTime.Now.AddMonths(1).FirstDayOfMonth.ToShortDateString
+            RVTxtFechaCancelacion.MinimumValue = fechaCancelacion
+            CalendarioCancelacion.StartDate = fechaCancelacion.ToDate
+            UpEliminarCotizacion.Update()
        End If
        RegistraScript("ShowDivCancelarIE();")
    End Sub