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

agregando nueva columna personalizable

Browse Source
This commit is contained in:
Antonio Gonzalez
2020-09-17 17:51:55 -07:00
parent 53545003f2
commit 7e268f5f1f
2 changed files with 24 additions and 48 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Compras/RepComprasDetalle.aspx
View File

@@ -401,6 +401,15 @@
<asp:Literal ID="LtlFechaInv" runat="server" Text='<%# Eval("FechaInv", "{0:d}") %>'></asp:Literal> <asp:Literal ID="LtlFechaInv" runat="server" Text='<%# Eval("FechaInv", "{0:d}") %>'></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-Width="60">
<HeaderTemplate>
Observaciones
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlObs" runat="server" Text='<%# Eval("Observaciones") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</ContentTemplate> </ContentTemplate>
@@ -464,24 +473,29 @@
<asp:CheckBox ID="ChkIVA" runat="server" Text="IVA" /></td> <asp:CheckBox ID="ChkIVA" runat="server" Text="IVA" /></td>
<td> <td>
<asp:CheckBox ID="ChkIEPS" runat="server" Text="IEPS" /></td> <asp:CheckBox ID="ChkIEPS" runat="server" Text="IEPS" /></td>
<td>
<asp:CheckBox ID="ChkObs" runat="server" Text="Observaciones"/></td>
</tr> </tr>
<tr> <tr>
<td> <td>
<asp:CheckBox ID="ChkDesc" runat="server" Text="Descuentos" /></td> <asp:CheckBox ID="ChkDesc" runat="server" Text="Descuentos" /></td>
<td> <td>
<asp:CheckBox ID="ChkTotal" runat="server" Text="Total" /></td> <asp:CheckBox ID="ChkTotal" runat="server" Text="Total" /></td>
<td></td>
</tr> </tr>
<tr> <tr>
<td> <td>
<asp:CheckBox ID="ChkAbre" runat="server" Text="Moneda" /></td> <asp:CheckBox ID="ChkAbre" runat="server" Text="Moneda" /></td>
<td> <td>
<asp:CheckBox ID="ChkRazon" runat="server" Text="Proveedor" /></td> <asp:CheckBox ID="ChkRazon" runat="server" Text="Proveedor" /></td>
<td></td>
</tr> </tr>
<tr> <tr>
<td> <td>
<asp:CheckBox ID="ChkFolio" runat="server" Text="Folio Inv" /></td> <asp:CheckBox ID="ChkFolio" runat="server" Text="Folio Inv" /></td>
<td> <td>
<asp:CheckBox ID="ChkFecha" runat="server" Text="Fecha Movimiento" /></td> <asp:CheckBox ID="ChkFecha" runat="server" Text="Fecha Movimiento" /></td>
<td></td>
</tr> </tr>
</table> </table>
</div> </div>

58
Compras/RepComprasDetalle.aspx.vb
View File

@@ -168,6 +168,7 @@ Partial Class Compras_RepComprasDetalle
ChkRazon.Checked = True ChkRazon.Checked = True
ChkFolio.Checked = True ChkFolio.Checked = True
ChkFecha.Checked = True ChkFecha.Checked = True
ChkObs.Checked = True
End Sub End Sub
@@ -597,54 +598,15 @@ Partial Class Compras_RepComprasDetalle
#End Region #End Region
Protected Sub BtnPersonalizar_Click(sender As Object, e As System.EventArgs) Handles BtnPersonalizar.Click Protected Sub BtnPersonalizar_Click(sender As Object, e As System.EventArgs) Handles BtnPersonalizar.Click
If ChkIVA.Checked Then GvDatos.Columns(4).Visible = ChkIVA.Checked
GvDatos.Columns(4).Visible = True GvDatos.Columns(5).Visible = ChkIEPS.Checked
Else GvDatos.Columns(6).Visible = ChkDesc.Checked
GvDatos.Columns(4).Visible = False GvDatos.Columns(7).Visible = ChkTotal.Checked
End If GvDatos.Columns(8).Visible = ChkAbre.Checked
GvDatos.Columns(9).Visible = ChkRazon.Checked
If ChkIEPS.Checked Then GvDatos.Columns(10).Visible = ChkFolio.Checked
GvDatos.Columns(5).Visible = True GvDatos.Columns(11).Visible = ChkFecha.Checked
Else GvDatos.Columns(12).Visible = ChkObs.Checked
GvDatos.Columns(5).Visible = False
End If
If ChkDesc.Checked Then
GvDatos.Columns(6).Visible = True
Else
GvDatos.Columns(6).Visible = False
End If
If ChkTotal.Checked Then
GvDatos.Columns(7).Visible = True
Else
GvDatos.Columns(7).Visible = False
End If
If ChkAbre.Checked Then
GvDatos.Columns(8).Visible = True
Else
GvDatos.Columns(8).Visible = False
End If
If ChkRazon.Checked Then
GvDatos.Columns(9).Visible = True
Else
GvDatos.Columns(9).Visible = False
End If
If ChkFolio.Checked Then
GvDatos.Columns(10).Visible = True
Else
GvDatos.Columns(10).Visible = False
End If
If ChkFecha.Checked Then
GvDatos.Columns(11).Visible = True
Else
GvDatos.Columns(11).Visible = False
End If
UPDatos.Update() UPDatos.Update()
End Sub End Sub