Contratos

Contratos/ContratoAvance.aspx.vb

@@ -136,10 +136,8 @@ Partial Class Contratos_ContratoAvance
 
     Private Sub CargaContrato()
         DdlContratos.DataSource = GlobalDTContratos.FiltraParametros(String.Format($"CveContratoTipo in (30,31) AND CveEmpresa = {UsuarioActual.CveEmpresa}"))
-        DdlContratos.DataBind()
-
-        'DDlContratosEstimaciones.DataSource = GlobalDTContratos.FiltraParametros(String.Format($"CveContratoTipo in (30,31) AND CveEmpresa = {UsuarioActual.CveEmpresa}"))
-        'DDlContratosEstimaciones.DataBind()
+        DdlContratos.DataBind()
+
     End Sub
 
 
@@ -189,8 +187,16 @@ Partial Class Contratos_ContratoAvance
             e.Row.FCTextBox("TxtCantidad").Visible = (fecha = "")
             e.Row.FCLinkButton("LnkAnexo").Visible = Not (fecha = "")
 
-            If e.Row.DBCampo("CveContratoDetalle").ToString.ToEntero = 0 Then
+            If e.Row.DBCampo("CveContratoDetalle").ToString.ToEntero = 0 Then
+
                 e.Row.FCTextBox("TxtCantidad").Visible = False
+                e.Row.FCTextBox("TxtImporte").Visible = False
+                e.Row.FCTextBox("TxtPorcentaje").Visible = False
+
+
+
+
+                'txtimporte
                 e.Row.FCLinkButton("LnkAnexo").Visible = False
 
                 If e.Row.DBCampo("CveSubFamilias").ToString.ToEntero = 0 Then
@@ -221,9 +227,17 @@ Partial Class Contratos_ContratoAvance
                 LnkGuardarAvance.Visible = True
 
 
+                e.Row.FCTextBox("TxtCantidad").Attributes.Add("onkeyup", $"ValidateCant(1,{e.Row.DataKey("CveContratoDetalle")})")
+                e.Row.FCTextBox("TxtImporte").Attributes.Add("onkeyup", $"ValidateCant(2,{e.Row.DataKey("CveContratoDetalle")})")
+                e.Row.FCTextBox("TxtPorcentaje").Attributes.Add("onkeyup", $"ValidateCant(3,{e.Row.DataKey("CveContratoDetalle")})")
+
+
                 If e.Row.DataKey("CantidadMax").ToDouble = 0 Then
                     LnkAnexo.Visible = False
                     e.Row.FCTextBox("TxtCantidad").Visible = False
+                    e.Row.FCTextBox("TxtImporte").Visible = False
+                    e.Row.FCTextBox("TxtPorcentaje").Visible = False
+
                     LnkGuardarAvance.Visible = False
 
                 End If