Lineas adicionales, Cat Empresas Visible para usuarios
This commit is contained in:
Oscar Irigoyen
@@ -45,7 +45,7 @@ Partial Class Sistemas_CatEmpresas
|
||||
#End Region
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
If UsuarioActual.CveRol <> 1 Then Response.Redirect("/Inicio.aspx")
|
||||
'If UsuarioActual.CveRol <> 1 Then Response.Redirect("/Inicio.aspx")
|
||||
ViewState("Orden") = "CveEmpresa ASC"
|
||||
ViewState("CveRol") = -1
|
||||
|
||||
@@ -117,16 +117,20 @@ Partial Class Sistemas_CatEmpresas
|
||||
End Sub
|
||||
|
||||
Private Sub CargaGrid(Orden As String)
|
||||
If Orden <> String.Empty Then
|
||||
Dim DV As New DataView(GlobalDTEmpresas, "", Orden, DataViewRowState.CurrentRows)
|
||||
GvDatos.DataSource = DV.ToTable()
|
||||
DV.Dispose()
|
||||
Else
|
||||
GvDatos.DataSource = GlobalDTEmpresas
|
||||
End If
|
||||
|
||||
Using ObjEmpresas As New ClsSisEmpresas()
|
||||
|
||||
If ObjEmpresas.GetEmpresas(-1, "-1", "-1", "-1", "-1", UsuarioActual.CveUsuario) Then
|
||||
GvDatos.DataSource = ObjEmpresas.DtResultados
|
||||
Else
|
||||
GvDatos.DataSource = Nothing
|
||||
End If
|
||||
|
||||
End Using
|
||||
|
||||
GvDatos.DataBind()
|
||||
UpDatos.Update()
|
||||
|
||||
End Sub
|
||||
#End Region
|
||||
End Class
|
||||
|
||||
@@ -948,6 +948,7 @@
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body">
|
||||
|
||||
<asp:TabContainer runat="server" ID="TabPadres">
|
||||
<asp:TabPanel ID="ContPAQ" runat="server" HeaderText="ContPAQ">
|
||||
<ContentTemplate>
|
||||
@@ -1048,7 +1049,8 @@
|
||||
</table>
|
||||
</ContentTemplate>
|
||||
</asp:TabPanel>
|
||||
<ajax:TabPanel ID="TabContSIG" runat="server" HeaderText="ContSIG">
|
||||
|
||||
<%--<ajax:TabPanel ID="TabContSIG" runat="server" HeaderText="ContSIG">
|
||||
<ContentTemplate>
|
||||
<table border="0" width="100%">
|
||||
|
||||
@@ -1146,8 +1148,13 @@
|
||||
</tr>
|
||||
</table>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
</ajax:TabPanel>--%>
|
||||
|
||||
|
||||
|
||||
</asp:TabContainer>
|
||||
|
||||
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -426,30 +426,30 @@ Partial Class Sistemas_Empresa
|
||||
CargaFuncionalidad(221, DdlActivoFijo)
|
||||
|
||||
|
||||
CargaFuncionalidad(232, DdlProveedoresSIG)
|
||||
CargaFuncionalidad(233, DdlClientesSIG)
|
||||
CargaFuncionalidad(234, DdlDeudoresSIG)
|
||||
CargaFuncionalidad(235, DdlAcreedoresSIG)
|
||||
CargaFuncionalidad(236, DdlDocxPagarSIG)
|
||||
CargaFuncionalidad(237, DdlAnticipoClienteSIG)
|
||||
CargaFuncionalidad(238, DdlAnticipoProveedoresSIG)
|
||||
CargaFuncionalidad(239, DdlInventarioSIG)
|
||||
CargaFuncionalidad(240, DdlGastoSIG)
|
||||
CargaFuncionalidad(241, DdlBancosSIG)
|
||||
CargaFuncionalidad(242, DdlCajaSIG)
|
||||
CargaFuncionalidad(243, DdlFyESIG)
|
||||
CargaFuncionalidad(244, DdlActivoFijoSIG)
|
||||
'CargaFuncionalidad(232, DdlProveedoresSIG)
|
||||
'CargaFuncionalidad(233, DdlClientesSIG)
|
||||
'CargaFuncionalidad(234, DdlDeudoresSIG)
|
||||
'CargaFuncionalidad(235, DdlAcreedoresSIG)
|
||||
'CargaFuncionalidad(236, DdlDocxPagarSIG)
|
||||
'CargaFuncionalidad(237, DdlAnticipoClienteSIG)
|
||||
'CargaFuncionalidad(238, DdlAnticipoProveedoresSIG)
|
||||
'CargaFuncionalidad(239, DdlInventarioSIG)
|
||||
'CargaFuncionalidad(240, DdlGastoSIG)
|
||||
'CargaFuncionalidad(241, DdlBancosSIG)
|
||||
'CargaFuncionalidad(242, DdlCajaSIG)
|
||||
'CargaFuncionalidad(243, DdlFyESIG)
|
||||
'CargaFuncionalidad(244, DdlActivoFijoSIG)
|
||||
|
||||
LbBannerDescarga.OnClientClick = "javascript:AbrirVentana('/Banners/" & .Banner & "', 500, 500, 'N', 'Banner Empresa');"
|
||||
Session("FileUpload") = .Banner
|
||||
|
||||
'LbArchivoKeyDescarga.OnClientClick = "javascript:AbrirVentana('/Key/" & .ArchivoKey & "', 500, 500, 'N', 'ArchivoKey Empresa');"
|
||||
|
||||
Session("FileUpload") = .ArchivoKey
|
||||
|
||||
LbBannerDescarga.OnClientClick = "javascript:AbrirVentana('/Cer/" & .ArchivoCer & "', 500, 500, 'N', 'ArchivoCer Empresa');"
|
||||
Session("FileUpload") = .ArchivoCer
|
||||
|
||||
'LbArchivoPfxDescarga.OnClientClick = "javascript:AbrirVentana('/Pfx/" & .ArchivoPfx & "', 500, 500, 'N', 'ArchivoPfx Empresa');"
|
||||
|
||||
Session("FileUpload") = .ArchivoPfx
|
||||
End With
|
||||
|
||||
@@ -665,20 +665,20 @@ Partial Class Sistemas_Empresa
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 246, DdlClientes)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 237, DdlAnticipoCliente)
|
||||
|
||||
'AGREGAR FUNCIONALIDADES
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 232, DdlProveedoresSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 233, DdlClientesSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 239, DdlInventarioSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 240, DdlGastoSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 241, DdlBancosSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 234, DdlDeudoresSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 235, DdlAcreedoresSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 236, DdlDocxPagarSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 237, DdlAnticipoClienteSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 238, DdlAnticipoProveedoresSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 242, DdlCajaSIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 243, DdlFyESIG)
|
||||
If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 244, DdlActivoFijoSIG)
|
||||
''AGREGAR FUNCIONALIDADES
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 232, DdlProveedoresSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 233, DdlClientesSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 239, DdlInventarioSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 240, DdlGastoSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 241, DdlBancosSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 234, DdlDeudoresSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 235, DdlAcreedoresSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 236, DdlDocxPagarSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 237, DdlAnticipoClienteSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 238, DdlAnticipoProveedoresSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 242, DdlCajaSIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 243, DdlFyESIG)
|
||||
'If TextoError = "" Then TextoError = AgregarFuncionalidad(ObjEmpresas, 244, DdlActivoFijoSIG)
|
||||
|
||||
|
||||
'TRIGGER
|
||||
@@ -1057,85 +1057,86 @@ Partial Class Sistemas_Empresa
|
||||
DdlCuentaOtrosIngresos.AutoPostBack = False : DdlCuentaOtrosIngresos.Attributes.Remove("onclick") : DdlCuentaOtrosIngresos.CssClass &= " select2me"
|
||||
|
||||
|
||||
'PADRES SIG
|
||||
Case "42"
|
||||
If DdlProveedoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlProveedoresSIG.SelectedValue
|
||||
DdlProveedoresSIG.Items.Clear() : DdlProveedoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlProveedoresSIG.DataSource = DtCuentasContablesSIG : DdlProveedoresSIG.DataBind() : DdlProveedoresSIG.SelectedValue = Seleccionado
|
||||
DdlProveedoresSIG.AutoPostBack = False : DdlProveedoresSIG.Attributes.Remove("onclick") : DdlProveedoresSIG.CssClass &= " select2me"
|
||||
Case "43"
|
||||
If DdlClientesSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlClientesSIG.SelectedValue
|
||||
DdlClientesSIG.Items.Clear() : DdlClientesSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlClientesSIG.DataSource = DtCuentasContablesSIG : DdlClientesSIG.DataBind() : DdlClientesSIG.SelectedValue = Seleccionado
|
||||
DdlClientesSIG.AutoPostBack = False : DdlClientesSIG.Attributes.Remove("onclick") : DdlClientesSIG.CssClass &= " select2me"
|
||||
Case "44"
|
||||
If DdlInventarioSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlInventarioSIG.SelectedValue
|
||||
DdlInventarioSIG.Items.Clear() : DdlInventarioSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlInventarioSIG.DataSource = DtCuentasContablesSIG : DdlInventarioSIG.DataBind() : DdlInventarioSIG.SelectedValue = Seleccionado
|
||||
DdlInventarioSIG.AutoPostBack = False : DdlInventarioSIG.Attributes.Remove("onclick") : DdlInventarioSIG.CssClass &= " select2me"
|
||||
Case "45"
|
||||
If DdlGastoSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlGasto.SelectedValue
|
||||
DdlGastoSIG.Items.Clear() : DdlGastoSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlGastoSIG.DataSource = DtCuentasContablesSIG : DdlGastoSIG.DataBind() : DdlGastoSIG.SelectedValue = Seleccionado
|
||||
DdlGastoSIG.AutoPostBack = False : DdlGastoSIG.Attributes.Remove("onclick") : DdlGastoSIG.CssClass &= " select2me"
|
||||
Case "46"
|
||||
If DdlBancosSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlBancosSIG.SelectedValue
|
||||
DdlBancosSIG.Items.Clear() : DdlBancosSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlBancosSIG.DataSource = DtCuentasContablesSIG : DdlBancosSIG.DataBind() : DdlBancosSIG.SelectedValue = Seleccionado
|
||||
DdlBancosSIG.AutoPostBack = False : DdlBancosSIG.Attributes.Remove("onclick") : DdlBancosSIG.CssClass &= " select2me"
|
||||
Case "47"
|
||||
If DdlDeudoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlDeudoresSIG.SelectedValue
|
||||
DdlDeudoresSIG.Items.Clear() : DdlDeudoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlDeudoresSIG.DataSource = DtCuentasContablesSIG : DdlDeudoresSIG.DataBind() : DdlDeudoresSIG.SelectedValue = Seleccionado
|
||||
DdlDeudoresSIG.AutoPostBack = False : DdlDeudoresSIG.Attributes.Remove("onclick") : DdlDeudoresSIG.CssClass &= " select2me"
|
||||
Case "48"
|
||||
If DdlAcreedoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlAcreedoresSIG.SelectedValue
|
||||
DdlAcreedoresSIG.Items.Clear() : DdlAcreedoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlAcreedoresSIG.DataSource = DtCuentasContablesSIG : DdlAcreedoresSIG.DataBind() : DdlAcreedoresSIG.SelectedValue = Seleccionado
|
||||
DdlAcreedoresSIG.AutoPostBack = False : DdlAcreedoresSIG.Attributes.Remove("onclick") : DdlAcreedoresSIG.CssClass &= " select2me"
|
||||
Case "49"
|
||||
If DdlDocxPagarSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlDocxPagarSIG.SelectedValue
|
||||
DdlDocxPagarSIG.Items.Clear() : DdlDocxPagarSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlDocxPagarSIG.DataSource = DtCuentasContablesSIG : DdlDocxPagarSIG.DataBind() : DdlDocxPagarSIG.SelectedValue = Seleccionado
|
||||
DdlDocxPagarSIG.AutoPostBack = False : DdlDocxPagarSIG.Attributes.Remove("onclick") : DdlDocxPagarSIG.CssClass &= " select2me"
|
||||
Case "50"
|
||||
If DdlAnticipoClienteSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlAnticipoClienteSIG.SelectedValue
|
||||
DdlAnticipoClienteSIG.Items.Clear() : DdlAnticipoClienteSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlAnticipoClienteSIG.DataSource = DtCuentasContablesSIG : DdlAnticipoClienteSIG.DataBind() : DdlAnticipoClienteSIG.SelectedValue = Seleccionado
|
||||
DdlAnticipoClienteSIG.AutoPostBack = False : DdlAnticipoClienteSIG.Attributes.Remove("onclick") : DdlAnticipoClienteSIG.CssClass &= " select2me"
|
||||
Case "51"
|
||||
If DdlAnticipoProveedoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlAnticipoProveedoresSIG.SelectedValue
|
||||
DdlAnticipoProveedoresSIG.Items.Clear() : DdlAnticipoProveedoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlAnticipoProveedoresSIG.DataSource = DtCuentasContablesSIG : DdlAnticipoProveedoresSIG.DataBind() : DdlAnticipoProveedoresSIG.SelectedValue = Seleccionado
|
||||
DdlAnticipoProveedoresSIG.AutoPostBack = False : DdlAnticipoProveedoresSIG.Attributes.Remove("onclick") : DdlAnticipoProveedoresSIG.CssClass &= " select2me"
|
||||
Case "52"
|
||||
If DdlCajaSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlCajaSIG.SelectedValue
|
||||
DdlCajaSIG.Items.Clear() : DdlCajaSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlCajaSIG.DataSource = DtCuentasContablesSIG : DdlCajaSIG.DataBind() : DdlCajaSIG.SelectedValue = Seleccionado
|
||||
DdlCajaSIG.AutoPostBack = False : DdlCajaSIG.Attributes.Remove("onclick") : DdlCajaSIG.CssClass &= " select2me"
|
||||
Case "53"
|
||||
If DdlFyESIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlFyESIG.SelectedValue
|
||||
DdlFyESIG.Items.Clear() : DdlFyESIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlFyESIG.DataSource = DtCuentasContablesSIG : DdlFyESIG.DataBind() : DdlFyESIG.SelectedValue = Seleccionado
|
||||
DdlFyESIG.AutoPostBack = False : DdlFyESIG.Attributes.Remove("onclick") : DdlFyESIG.CssClass &= " select2me"
|
||||
Case "54"
|
||||
If DdlActivoFijoSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
Seleccionado = DdlActivoFijoSIG.SelectedValue
|
||||
DdlActivoFijoSIG.Items.Clear() : DdlActivoFijoSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
DdlActivoFijoSIG.DataSource = DtCuentasContablesSIG : DdlActivoFijoSIG.DataBind() : DdlActivoFijoSIG.SelectedValue = Seleccionado
|
||||
DdlActivoFijoSIG.AutoPostBack = False : DdlActivoFijoSIG.Attributes.Remove("onclick") : DdlActivoFijoSIG.CssClass &= " select2me"
|
||||
' 'PADRES SIG
|
||||
'Case "42"
|
||||
' If DdlProveedoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlProveedoresSIG.SelectedValue
|
||||
' DdlProveedoresSIG.Items.Clear() : DdlProveedoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlProveedoresSIG.DataSource = DtCuentasContablesSIG : DdlProveedoresSIG.DataBind() : DdlProveedoresSIG.SelectedValue = Seleccionado
|
||||
' DdlProveedoresSIG.AutoPostBack = False : DdlProveedoresSIG.Attributes.Remove("onclick") : DdlProveedoresSIG.CssClass &= " select2me"
|
||||
'Case "43"
|
||||
' If DdlClientesSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlClientesSIG.SelectedValue
|
||||
' DdlClientesSIG.Items.Clear() : DdlClientesSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlClientesSIG.DataSource = DtCuentasContablesSIG : DdlClientesSIG.DataBind() : DdlClientesSIG.SelectedValue = Seleccionado
|
||||
' DdlClientesSIG.AutoPostBack = False : DdlClientesSIG.Attributes.Remove("onclick") : DdlClientesSIG.CssClass &= " select2me"
|
||||
'Case "44"
|
||||
' If DdlInventarioSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlInventarioSIG.SelectedValue
|
||||
' DdlInventarioSIG.Items.Clear() : DdlInventarioSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlInventarioSIG.DataSource = DtCuentasContablesSIG : DdlInventarioSIG.DataBind() : DdlInventarioSIG.SelectedValue = Seleccionado
|
||||
' DdlInventarioSIG.AutoPostBack = False : DdlInventarioSIG.Attributes.Remove("onclick") : DdlInventarioSIG.CssClass &= " select2me"
|
||||
'Case "45"
|
||||
' If DdlGastoSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlGasto.SelectedValue
|
||||
' DdlGastoSIG.Items.Clear() : DdlGastoSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlGastoSIG.DataSource = DtCuentasContablesSIG : DdlGastoSIG.DataBind() : DdlGastoSIG.SelectedValue = Seleccionado
|
||||
' DdlGastoSIG.AutoPostBack = False : DdlGastoSIG.Attributes.Remove("onclick") : DdlGastoSIG.CssClass &= " select2me"
|
||||
'Case "46"
|
||||
' If DdlBancosSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlBancosSIG.SelectedValue
|
||||
' DdlBancosSIG.Items.Clear() : DdlBancosSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlBancosSIG.DataSource = DtCuentasContablesSIG : DdlBancosSIG.DataBind() : DdlBancosSIG.SelectedValue = Seleccionado
|
||||
' DdlBancosSIG.AutoPostBack = False : DdlBancosSIG.Attributes.Remove("onclick") : DdlBancosSIG.CssClass &= " select2me"
|
||||
'Case "47"
|
||||
' If DdlDeudoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlDeudoresSIG.SelectedValue
|
||||
' DdlDeudoresSIG.Items.Clear() : DdlDeudoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlDeudoresSIG.DataSource = DtCuentasContablesSIG : DdlDeudoresSIG.DataBind() : DdlDeudoresSIG.SelectedValue = Seleccionado
|
||||
' DdlDeudoresSIG.AutoPostBack = False : DdlDeudoresSIG.Attributes.Remove("onclick") : DdlDeudoresSIG.CssClass &= " select2me"
|
||||
'Case "48"
|
||||
' If DdlAcreedoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlAcreedoresSIG.SelectedValue
|
||||
' DdlAcreedoresSIG.Items.Clear() : DdlAcreedoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlAcreedoresSIG.DataSource = DtCuentasContablesSIG : DdlAcreedoresSIG.DataBind() : DdlAcreedoresSIG.SelectedValue = Seleccionado
|
||||
' DdlAcreedoresSIG.AutoPostBack = False : DdlAcreedoresSIG.Attributes.Remove("onclick") : DdlAcreedoresSIG.CssClass &= " select2me"
|
||||
'Case "49"
|
||||
' If DdlDocxPagarSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlDocxPagarSIG.SelectedValue
|
||||
' DdlDocxPagarSIG.Items.Clear() : DdlDocxPagarSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlDocxPagarSIG.DataSource = DtCuentasContablesSIG : DdlDocxPagarSIG.DataBind() : DdlDocxPagarSIG.SelectedValue = Seleccionado
|
||||
' DdlDocxPagarSIG.AutoPostBack = False : DdlDocxPagarSIG.Attributes.Remove("onclick") : DdlDocxPagarSIG.CssClass &= " select2me"
|
||||
'Case "50"
|
||||
' If DdlAnticipoClienteSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlAnticipoClienteSIG.SelectedValue
|
||||
' DdlAnticipoClienteSIG.Items.Clear() : DdlAnticipoClienteSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlAnticipoClienteSIG.DataSource = DtCuentasContablesSIG : DdlAnticipoClienteSIG.DataBind() : DdlAnticipoClienteSIG.SelectedValue = Seleccionado
|
||||
' DdlAnticipoClienteSIG.AutoPostBack = False : DdlAnticipoClienteSIG.Attributes.Remove("onclick") : DdlAnticipoClienteSIG.CssClass &= " select2me"
|
||||
'Case "51"
|
||||
' If DdlAnticipoProveedoresSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlAnticipoProveedoresSIG.SelectedValue
|
||||
' DdlAnticipoProveedoresSIG.Items.Clear() : DdlAnticipoProveedoresSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlAnticipoProveedoresSIG.DataSource = DtCuentasContablesSIG : DdlAnticipoProveedoresSIG.DataBind() : DdlAnticipoProveedoresSIG.SelectedValue = Seleccionado
|
||||
' DdlAnticipoProveedoresSIG.AutoPostBack = False : DdlAnticipoProveedoresSIG.Attributes.Remove("onclick") : DdlAnticipoProveedoresSIG.CssClass &= " select2me"
|
||||
'Case "52"
|
||||
' If DdlCajaSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlCajaSIG.SelectedValue
|
||||
' DdlCajaSIG.Items.Clear() : DdlCajaSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlCajaSIG.DataSource = DtCuentasContablesSIG : DdlCajaSIG.DataBind() : DdlCajaSIG.SelectedValue = Seleccionado
|
||||
' DdlCajaSIG.AutoPostBack = False : DdlCajaSIG.Attributes.Remove("onclick") : DdlCajaSIG.CssClass &= " select2me"
|
||||
'Case "53"
|
||||
' If DdlFyESIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlFyESIG.SelectedValue
|
||||
' DdlFyESIG.Items.Clear() : DdlFyESIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlFyESIG.DataSource = DtCuentasContablesSIG : DdlFyESIG.DataBind() : DdlFyESIG.SelectedValue = Seleccionado
|
||||
' DdlFyESIG.AutoPostBack = False : DdlFyESIG.Attributes.Remove("onclick") : DdlFyESIG.CssClass &= " select2me"
|
||||
'Case "54"
|
||||
' If DdlActivoFijoSIG.Attributes("onclick") <> "" Then CargaCuentasContablesSIG()
|
||||
' Seleccionado = DdlActivoFijoSIG.SelectedValue
|
||||
' DdlActivoFijoSIG.Items.Clear() : DdlActivoFijoSIG.Items.Add(New ListItem("Seleccione", "0"))
|
||||
' DdlActivoFijoSIG.DataSource = DtCuentasContablesSIG : DdlActivoFijoSIG.DataBind() : DdlActivoFijoSIG.SelectedValue = Seleccionado
|
||||
' DdlActivoFijoSIG.AutoPostBack = False : DdlActivoFijoSIG.Attributes.Remove("onclick") : DdlActivoFijoSIG.CssClass &= " select2me"
|
||||
|
||||
|
||||
End Select
|
||||
|
||||
@@ -1171,20 +1172,20 @@ Partial Class Sistemas_Empresa
|
||||
DdlCuentaDescuentoVenta.AutoPostBack = True
|
||||
DdlCuentaOtrosIngresos.AutoPostBack = True
|
||||
|
||||
'CUENTAS PADRES SIG
|
||||
DdlProveedoresSIG.AutoPostBack = True
|
||||
DdlClientesSIG.AutoPostBack = True
|
||||
DdlInventarioSIG.AutoPostBack = True
|
||||
DdlGastoSIG.AutoPostBack = True
|
||||
DdlBancosSIG.AutoPostBack = True
|
||||
DdlDeudoresSIG.AutoPostBack = True
|
||||
DdlAcreedoresSIG.AutoPostBack = True
|
||||
DdlDocxPagarSIG.AutoPostBack = True
|
||||
DdlAnticipoClienteSIG.AutoPostBack = True
|
||||
DdlAnticipoProveedoresSIG.AutoPostBack = True
|
||||
DdlCajaSIG.AutoPostBack = True
|
||||
DdlFyESIG.AutoPostBack = True
|
||||
DdlActivoFijoSIG.AutoPostBack = True
|
||||
''CUENTAS PADRES SIG
|
||||
'DdlProveedoresSIG.AutoPostBack = True
|
||||
'DdlClientesSIG.AutoPostBack = True
|
||||
'DdlInventarioSIG.AutoPostBack = True
|
||||
'DdlGastoSIG.AutoPostBack = True
|
||||
'DdlBancosSIG.AutoPostBack = True
|
||||
'DdlDeudoresSIG.AutoPostBack = True
|
||||
'DdlAcreedoresSIG.AutoPostBack = True
|
||||
'DdlDocxPagarSIG.AutoPostBack = True
|
||||
'DdlAnticipoClienteSIG.AutoPostBack = True
|
||||
'DdlAnticipoProveedoresSIG.AutoPostBack = True
|
||||
'DdlCajaSIG.AutoPostBack = True
|
||||
'DdlFyESIG.AutoPostBack = True
|
||||
'DdlActivoFijoSIG.AutoPostBack = True
|
||||
|
||||
|
||||
DdlIVAxAcreditar.Attributes.Add("onclick", "CargaCuentas(1);")
|
||||
@@ -1217,20 +1218,20 @@ Partial Class Sistemas_Empresa
|
||||
DdlCuentaDescuentoVenta.Attributes.Add("onclick", "CargaCuentas(40);")
|
||||
DdlCuentaOtrosIngresos.Attributes.Add("onclick", "CargaCuentas(41);")
|
||||
|
||||
'CUENTAS PADRES
|
||||
DdlProveedoresSIG.Attributes.Add("onclick", "CargaCuentas(42);")
|
||||
DdlClientesSIG.Attributes.Add("onclick", "CargaCuentas(43);")
|
||||
DdlInventarioSIG.Attributes.Add("onclick", "CargaCuentas(44);")
|
||||
DdlGastoSIG.Attributes.Add("onclick", "CargaCuentas(45);")
|
||||
DdlBancosSIG.Attributes.Add("onclick", "CargaCuentas(46);")
|
||||
DdlDeudoresSIG.Attributes.Add("onclick", "CargaCuentas(47);")
|
||||
DdlAcreedoresSIG.Attributes.Add("onclick", "CargaCuentas(48);")
|
||||
DdlDocxPagarSIG.Attributes.Add("onclick", "CargaCuentas(49);")
|
||||
DdlAnticipoClienteSIG.Attributes.Add("onclick", "CargaCuentas(50);")
|
||||
DdlAnticipoProveedoresSIG.Attributes.Add("onclick", "CargaCuentas(51);")
|
||||
DdlCajaSIG.Attributes.Add("onclick", "CargaCuentas(52);")
|
||||
DdlFyESIG.Attributes.Add("onclick", "CargaCuentas(53);")
|
||||
DdlActivoFijoSIG.Attributes.Add("onclick", "CargaCuentas(54);")
|
||||
''CUENTAS PADRES
|
||||
'DdlProveedoresSIG.Attributes.Add("onclick", "CargaCuentas(42);")
|
||||
'DdlClientesSIG.Attributes.Add("onclick", "CargaCuentas(43);")
|
||||
'DdlInventarioSIG.Attributes.Add("onclick", "CargaCuentas(44);")
|
||||
'DdlGastoSIG.Attributes.Add("onclick", "CargaCuentas(45);")
|
||||
'DdlBancosSIG.Attributes.Add("onclick", "CargaCuentas(46);")
|
||||
'DdlDeudoresSIG.Attributes.Add("onclick", "CargaCuentas(47);")
|
||||
'DdlAcreedoresSIG.Attributes.Add("onclick", "CargaCuentas(48);")
|
||||
'DdlDocxPagarSIG.Attributes.Add("onclick", "CargaCuentas(49);")
|
||||
'DdlAnticipoClienteSIG.Attributes.Add("onclick", "CargaCuentas(50);")
|
||||
'DdlAnticipoProveedoresSIG.Attributes.Add("onclick", "CargaCuentas(51);")
|
||||
'DdlCajaSIG.Attributes.Add("onclick", "CargaCuentas(52);")
|
||||
'DdlFyESIG.Attributes.Add("onclick", "CargaCuentas(53);")
|
||||
'DdlActivoFijoSIG.Attributes.Add("onclick", "CargaCuentas(54);")
|
||||
|
||||
UpDatos.Update()
|
||||
|
||||
|
||||
Reference in New Issue
Block a user