AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Mostrar impuestos locales en refacturacion

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2023-07-14 16:45:27 -07:00
parent 991ea5c1d1
commit 2064bfd13c
2 changed files with 13 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Ventas/Ventas.aspx
View File

@@ -1551,7 +1551,7 @@
<tr align="right"> <tr align="right">
<td style="border: 1px none white"><b>SubTotal 2:</b></td> <td style="border: 1px none white"><b>SubTotal 2:</b></td>
<td> <td>
<asp:TextBox ID="TxtSubTotal2" ClientIDMode="Static" runat="server" BorderStyle="None" Style="text-align: right;" Text="0.00" Width="78px"></asp:TextBox></td> <asp:TextBox ID="TxtSubTotal2" ClientIDMode="Static" runat="server" BorderStyle="None" Style="text-align: right;" Text="0.00" Width="78px" Enabled="false"></asp:TextBox></td>
<td> <td>
<%-- <asp:LinkButton ID="LkbAgregarComplementos" runat="server" CssClass="btn btn-circle btn-xs gray" Text="<i class='fa fa-bell '></i>"></asp:LinkButton>--%> <%-- <asp:LinkButton ID="LkbAgregarComplementos" runat="server" CssClass="btn btn-circle btn-xs gray" Text="<i class='fa fa-bell '></i>"></asp:LinkButton>--%>
</td> </td>

31
Ventas/Ventas.aspx.vb
View File

@@ -2939,6 +2939,7 @@ Partial Class Ventas
End If End If
ObjInv.Dispose() ObjInv.Dispose()
End If End If
'regenrea el tipo de cambio 'regenrea el tipo de cambio
CargaNuevaFactura(Nothing) CargaNuevaFactura(Nothing)
@@ -3199,15 +3200,6 @@ Partial Class Ventas
TxtRetIVA.Attributes.Add("onKeyUp", "FnSuma()") TxtRetIVA.Attributes.Add("onKeyUp", "FnSuma()")
TxtRetISR.Attributes.Add("onKeyUp", "FnSuma()") TxtRetISR.Attributes.Add("onKeyUp", "FnSuma()")
'Permitir Edicion de Iva
If UsuarioActual.Empresa.Funcionalidad(509) = "1" Then
TxtIVA.Enabled = True
'TxtTotal.Enabled = True
RegistraScript("SetDisabledTxtTotal(false);")
TxtSubTotal.Enabled = True
TxtSubTotal2.Enabled = True
End If
'Cortes de Caja 'Cortes de Caja
If UsuarioActual.TienePermisoProceso(160) Then If UsuarioActual.TienePermisoProceso(160) Then
CargaCorteCaja() CargaCorteCaja()
@@ -6031,7 +6023,12 @@ Partial Class Ventas
GvImpuestosLocales2.DataSource = ObjVentas.DtResultados GvImpuestosLocales2.DataSource = ObjVentas.DtResultados
GvImpuestosLocales2.DataBind() GvImpuestosLocales2.DataBind()
GvImpuestosLocales2.Enabled = False If (NuevaFactura = 1) Then
GvImpuestosLocales2.Enabled = True
Else
GvImpuestosLocales2.Enabled = False
End If
GvImpuestosLocales2.Visible = True GvImpuestosLocales2.Visible = True
End If End If
End If End If
@@ -24264,14 +24261,6 @@ Partial Class Ventas
RegistraScript("SetDisabledTxtTotal(true);") RegistraScript("SetDisabledTxtTotal(true);")
If TxtFolio.Text.Trim = "" Then TxtFolio.Enabled = True If TxtFolio.Text.Trim = "" Then TxtFolio.Enabled = True
If UsuarioActual.TienePermisoProceso(112) Then
TxtSubTotal.Enabled = True
TxtSubTotal2.Enabled = True
TxtIVA.Enabled = True
'TxtTotal.Enabled = True
RegistraScript("SetDisabledTxtTotal(false);")
End If
TxtIVA.Text = IVA.FormatoNumero TxtIVA.Text = IVA.FormatoNumero
TxtRetIVA.Text = RetencionIVA.FormatoNumero TxtRetIVA.Text = RetencionIVA.FormatoNumero
LblDescuentos.Text = Descuentos.FormatoNumero LblDescuentos.Text = Descuentos.FormatoNumero
@@ -29104,7 +29093,11 @@ Partial Class Ventas
GvImpuestosLocales2.DataSource = ObjVentas.DtResultados GvImpuestosLocales2.DataSource = ObjVentas.DtResultados
GvImpuestosLocales2.DataBind() GvImpuestosLocales2.DataBind()
GvImpuestosLocales2.Enabled = False If (NuevaFactura = 1) Then
GvImpuestosLocales2.Enabled = True
Else
GvImpuestosLocales2.Enabled = False
End If
GvImpuestosLocales2.Visible = True GvImpuestosLocales2.Visible = True
End If End If
End If End If