Bancos/DepositosCaja.aspx.vb

@@ -70,6 +70,7 @@ Partial Class Bancos_DepositosCaja
         UpGvFacturas.Update()
         GvFacturas.DataBind()
         lblValorTotal.Text = "0.00"
+        TxtComision.text = ""
         divLabelTotal.Visible = True
     End Sub
 
@@ -93,8 +94,8 @@ Partial Class Bancos_DepositosCaja
         TotalImportePrePoliza = TotalImporte
         If Comision <> 0 Then
             TotalImporte = TotalImporte + Comision + Descuento
-            Comision = -(Comision) ' se inverte el valor, va cargada
-            Descuento = -(Descuento) ' se inverte el valor, va cargada
+            'Comision = -(Comision) ' se inverte el valor, va cargada
+            'Descuento = -(Descuento) ' se inverte el valor, va cargada
             If DdlSubProyectoDeposito.SelectedValue.ToEntero = -1 Or DdlClasificacion.SelectedValue.ToEntero = -1 Then
                 Alert("Debes Seleccionar un Subproyecto y una Clasificación", TipoMensaje.MsgAdvertencia)
                 Exit Sub
@@ -121,7 +122,6 @@ Partial Class Bancos_DepositosCaja
         Dim CveSubProyecto As Integer = 0
         Dim CveClasificacion As Integer = 0
         Dim CveClasificacionDescuento As Integer = 0
-
         Dim documentos As String = "Los Depósitos se realizaron exitósamente<br/><br/>"
         Dim imprimirFolios As String = ""
         If drOrigen IsNot Nothing Then