From 0e64e0957e0a1e3739bf6f2a6a4bb9deb8b68b76 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 29 Sep 2022 17:06:32 -0700
Subject: [PATCH] -- globals - tipo global

---
 Contabilidad2/CatCuentasAsignaciones.aspx    | 33 +++++++++++++-------
 Contabilidad2/CatCuentasAsignaciones.aspx.vb | 16 ++++++++--
 2 files changed, 35 insertions(+), 14 deletions(-)

diff --git a/Contabilidad2/CatCuentasAsignaciones.aspx b/Contabilidad2/CatCuentasAsignaciones.aspx
index 7c71c6558..2c8963058 100644
--- a/Contabilidad2/CatCuentasAsignaciones.aspx
+++ b/Contabilidad2/CatCuentasAsignaciones.aspx
@@ -102,9 +102,10 @@
                 DataKeyNames="CveEmpresa,CveCuenta,CveConceptoContable,CveCuentaAsignacion,CveConceptoNomina, CveProveedor,CveClasificacion,CveAlmacen, IdCuenta, PorcentajeIVA, CveBancoCuenta, CveCliente, CvePersonal" AutoGenerateColumns="False" 
                 Style=" width:100%" GridLines="None" Caption="Globales">
                 <Columns>
-                    <asp:BoundField DataField="ConceptoContable" ItemStyle-Width="150px" HeaderText="Concepto Contable" ItemStyle-HorizontalAlign="Left"/>                  
-                     <asp:BoundField DataField="CuentaCodigo" ItemStyle-Width="100px"  HeaderText="Código Cuenta" ItemStyle-HorizontalAlign="Left"/>      
-                    <asp:BoundField DataField="CuentaNombre" HeaderText="Nombre Cuenta" ItemStyle-HorizontalAlign="Left"/>                   
+                    <asp:BoundField DataField="ConceptoContable" ItemStyle-Width="250px" HeaderText="Concepto Contable" />    
+                    <asp:BoundField DataField="TipoGlobalStr" ItemStyle-Width="50px" HeaderText="Tipo Global" /> 
+                    <asp:BoundField DataField="CuentaCodigo" ItemStyle-Width="100px"  HeaderText="Código Cuenta" />      
+                    <asp:BoundField DataField="CuentaNombre" HeaderText="Nombre Cuenta" />                   
                        
                     <asp:TemplateField ItemStyle-Width="49px">
                         <ItemTemplate>
@@ -231,20 +232,28 @@
                                             <asp:HiddenField ID="HiddenField1" runat="server" />
                                             <asp:DropDownList ID="DdlConceptoGlobal" CssClass="form-control input-sm select2me js-cuenta-programmatic select2me" runat="server" AppendDataBoundItems="true" DataTextField="ConceptoContable" DataValueField="CveConceptoContable" Width="240px" ValidationGroup="GrpModulo2" ></asp:DropDownList>
                                             <label for="<%= DdlConceptoGlobal.ClientID.ToString()%>">Concepto Contable: </label>
-                                        </div>
-                                        <div class="form-group form-md-line-input input-iconright">
-                                            <asp:DropDownList ID="DdlCuentaGlobal" CssClass="form-control input-sm select2me js-cuenta-programmatic select2me" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="CveCuenta" Width="240px" ValidationGroup="GrpModulo2"></asp:DropDownList>
-                                            <label for="<%= DdlCuentaGlobal.ClientID.ToString()%>">Cuenta Contable: </label>
-                                        </div> 
-                                        <div class="form-group form-md-line-input input-iconright" id="div3" runat="server" >
-                                            <asp:DropDownList ID="DdlTipoGlobal" CssClass="form-control input-sm select2me js-cuenta-programmatic select2me" runat="server"   Width="240px" ValidationGroup="GrpModulo2" >
+                                        </div>                                        
+                                    </div>
+                                    </div>
+                                <div class="row">
+                                     <div class="col-md-6" style="width:50%;text-align:left">
+                                    <div class="form-group form-md-line-input input-iconright" id="div3" runat="server" >
+                                            <asp:DropDownList ID="DdlTipoGlobal" CssClass="form-control input-sm select2me js-cuenta-programmatic select2me" runat="server" autopostback="true"  Width="240px" ValidationGroup="GrpModulo2" >
                                                 <asp:ListItem Text="Mayor" Value="1"></asp:ListItem>
                                                 <asp:ListItem Text="Desglosado" Value="2"></asp:ListItem>
                                             </asp:DropDownList>
                                             <label for="<%= DdlTipoGlobal.ClientID.ToString()%>">Tipo Global: </label>
                                         </div> 
-                                    </div>
-                                </div>
+                                         </div> 
+                                     </div>   
+                                <div class="row">
+                                     <div class="col-md-6" style="width:50%;text-align:left">
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList ID="DdlCuentaGlobal" CssClass="form-control input-sm select2me js-cuenta-programmatic select2me" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="CveCuenta" Width="240px" ValidationGroup="GrpModulo2"></asp:DropDownList>
+                                            <label for="<%= DdlCuentaGlobal.ClientID.ToString()%>">Cuenta Contable: </label>
+                                        </div> 
+                                    </div>    
+                                 </div>   
                             </div>
                             <div class="modal-footer">
                                 <asp:LinkButton ID="LBAgregaGlobal" runat="server" class="btn btn-success" Text="Agregar" OnClick="LBAgregaGlobal_Click" ValidationGroup="GrpModulo2" />
diff --git a/Contabilidad2/CatCuentasAsignaciones.aspx.vb b/Contabilidad2/CatCuentasAsignaciones.aspx.vb
index 3e26bae19..2ae4ea7c8 100644
--- a/Contabilidad2/CatCuentasAsignaciones.aspx.vb
+++ b/Contabilidad2/CatCuentasAsignaciones.aspx.vb
@@ -47,12 +47,10 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
         GvDatos.Columns(5).Visible = ObjConta.DtResultados.MAX("PorcentajeIVA").ToDecimal > 0
         GvDatos.Columns(6).Visible = ObjConta.DtResultados.MAX("TipoGasto") <> ""
 
-
         If ObjConta.GetCuentasGlobales(UsuarioActual.CveEmpresa) Then
             GvGlobal.DataSource = ObjConta.DtResultados
         End If
 
-
         ObjConta.Dispose()
         GvDatos.DataBind()
         GvGlobal.DataBind()
@@ -334,4 +332,18 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
     Private Sub DdlCconceptosContables_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlCconceptosContables.SelectedIndexChanged
         RecargaConcepto(DdlCconceptosContables.SelectedValue.ToEntero)
     End Sub
+
+    Private Sub DdlTipoGlobal_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTipoGlobal.SelectedIndexChanged
+        Dim Afectables As Integer = 1
+        If DdlTipoGlobal.SelectedValue = "2" Then 'cuando es detallado, que de la opción de seleccionar una de mayor y/o no afectable
+            Afectables = -1
+        End If
+
+        Dim ObjConta As New ClsContabilidad
+        If ObjConta.GetCuentas(-1, "-1", Afectables, UsuarioActual.CveEmpresa) Then
+            DdlCuentaGlobal.DataSource = ObjConta.DtResultados.FiltraParametros("", Orderby:="Codigo")
+        End If
+        ObjConta.Dispose()
+        DdlCuentaGlobal.DataBind()
+    End Sub
 End Class