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

ClientesAbonar icono complemento, Creditos

Browse Source
This commit is contained in:
rakcsle
2021-04-08 17:59:30 -07:00
parent 67697be233
commit 23f8e38a33
5 changed files with 36 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Compras/eFacturas.aspx
View File

@@ -216,10 +216,20 @@
</asp:TemplateField>
<asp:TemplateField HeaderText="Importe" ItemStyle-Width="125px">
<ItemTemplate>
<asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0} {1}", Eval("Total", "{0:N2}"), Eval("Abreviatura")) %>'></asp:Literal>
<%-- <table>
<tr>
<td><asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0}", Eval("Total", "{0:N2}")) %>'></asp:Literal></td>
<td><asp:Literal ID="LtlAbre" runat="server" Text='<%# String.Format("{0}", Eval("Abreviatura")) %>'></asp:Literal></td>
</tr>
</table>--%>
<%--<asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0} {1}", Eval("Total", "{0:N2}"), Eval("Abreviatura")) %>'></asp:Literal>--%>
<asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0}", Eval("Total", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
<ItemStyle HorizontalAlign="Right" />
</asp:TemplateField>
<asp:BoundField DataField="Abreviatura" Visible="true" HeaderText="" ItemStyle-Width="30px" />
<asp:BoundField DataField="CantidadOC" Visible="false" HeaderText="# OC" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:#,##0.##}" />
<asp:TemplateField HeaderText="XML">
<ItemTemplate>

24
Compras/eFacturas.aspx.vb
View File

@@ -719,9 +719,15 @@ Partial Class Compras_eFacturas
If UsuarioActual.Sesion("eFact-FF").ToString <> "" Then txtFechaF.Text = UsuarioActual.Sesion("eFact-FF").ToString.Trim
If UsuarioActual.CveUsuario = 100 Then lbDescargar.Visible = True
If UsuarioActual.TienePermisoProceso(81) Then GvD.Columns(11).Visible = True : GvD.Columns(12).Visible = True
If UsuarioActual.TienePermisoProceso(206) Then GvD.Columns(10).Visible = False
If UsuarioActual.Empresa.Funcionalidad(156) = "1" Then GvD.Columns(5).Visible = True
'If UsuarioActual.TienePermisoProceso(81) Then GvD.Columns(11).Visible = True : GvD.Columns(12).Visible = True
'If UsuarioActual.TienePermisoProceso(206) Then GvD.Columns(10).Visible = False
'If UsuarioActual.Empresa.Funcionalidad(156) = "1" Then GvD.Columns(5).Visible = True
If UsuarioActual.TienePermisoProceso(81) Then GvD.Columns(12).Visible = True : GvD.Columns(13).Visible = True
If UsuarioActual.TienePermisoProceso(206) Then GvD.Columns(11).Visible = False
If UsuarioActual.Empresa.Funcionalidad(156) = "1" Then GvD.Columns(6).Visible = True
CargaGvBitacora()
CargaDatos()
End If
@@ -913,6 +919,11 @@ Partial Class Compras_eFacturas
#Region "G V D A T O S"
Protected Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvD.RowDataBound
If e.Row.RowType = DataControlRowType.Header Then
e.Row.Cells(4).Attributes.Add("data-tipodato", "numeric")
End If
If e.Row.RowType = DataControlRowType.DataRow Then
e.Row.FindControl("lnkRegenerarPDF").Visible = True ' (UsuarioActual.CveRol = 1)
'e.Row.FindControl("lnkDownPdf").Visible = (UsuarioActual.CveRol = 1)
@@ -937,6 +948,13 @@ Partial Class Compras_eFacturas
e.Row.Cells(2).Attributes.Add("data-order", e.Row.DBCampo("FechaFactura").ToDate.Ticks.ToString)
'e.Row.Cells(4).Attributes.Add("data-order", Convert.ToInt64(e.Row.DBCampo("Total").ToDecimal).ToString.PadLeft(10, "0"c))
If File.Exists(String.Format("{0}{1}\{2}", Destino, e.Row.DBCampo("RFCDe"), e.Row.DBCampo("XML"))) Then
e.Row.FCLiteral("LtlXML").Text = String.Format("<a class=""Texto"" href=""/Compras/PopUpVerFactura.aspx?RFC={0}&File={1}"">Ver</a>", HttpUtility.UrlEncode(e.Row.DBCampo("RFCDe")), HttpUtility.UrlEncode(e.Row.DBCampo("XML")))
If e.Row.DBCampo("TipoComprobante") = "P" Then