RegPrePolziasS ProcentajeImpuesto

Contabilidad/RegPrePolizaS.aspx.vb

@@ -1123,7 +1123,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                                                            CvePersonal:=gvr.DataKey("CvePersonal").ToEntero, CveClasificacion:=gvr.DataKey("CveClasificacion").ToEntero,
                                                             ImporteMX:=Importe, ImporteME:=ImporteME, TipoCambio:=TipoCambio,
                                                             CveTipoGasto:=tCveTipoGasto,
-                                                            CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, CveCuenta:=tCveCuenta) Then
+                                                            CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, CveCuenta:=tCveCuenta, PorcentajeImpuesto:=gvr.DataKey("PorcentajeImpuesto").ToDecimal) Then
                                 ContRegInsertados = ContRegInsertados + 1
 
                             Else
@@ -1494,12 +1494,19 @@ Partial Class ContabilidadC_RegPrePolizaS
             AplicaTC = Boolean.Parse(DT_Concepto.Rows(0)("AplicaTC").ToString)
             AplicaVenta = Boolean.Parse(DT_Concepto.Rows(0)("AplicaVenta").ToString)
             AplicaComplementaria = Boolean.Parse(DT_Concepto.Rows(0)("EsComplementaria").ToString)
+
+
+
+
+
             'AplicaME = Boolean.Parse(DT_Concepto.Rows(0)("EsMonedaExtranjera").ToString)
 
 
             If AplicaImpuesto Then
+                DvModalconceptoProcentajeIVA.Visible = True
                 DdlPorcentajeIVAE.Visible = True
             Else
+                DvModalconceptoProcentajeIVA.Visible = False
                 DdlPorcentajeIVAE.Visible = False
             End If