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

DdlPlantillas cargar todo en 120

Browse Source
This commit is contained in:
Rakcsle Supertramp
2019-10-08 12:27:29 -07:00
parent 00c02d2641
commit 7b383e30c1
1 changed files with 84 additions and 76 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Contabilidad/RegPrePoliza.aspx.vb
View File

@@ -218,6 +218,7 @@ Partial Class ContabilidadC_RegPrePoliza
TipoPlantilla = 0
If IfNull(Request("Tipo"), "").ToString = "Ing" Then
TipoPlantilla = 1
LblEncabezado.Text = "Otros Ingresos"
@@ -271,6 +272,7 @@ Partial Class ContabilidadC_RegPrePoliza
End Sub
Private Sub CreaDT()
DtMovimientos = New DataTable("Movimientos")
Dim IDMov As DataColumn = DtMovimientos.Columns.Add("IdMov", Type.GetType("System.Int32")) : IDMov.AutoIncrement = True
@@ -502,7 +504,13 @@ Partial Class ContabilidadC_RegPrePoliza
'GvPlantillas.DataSource = GlobalDTContaPlantillasPolizas(UsuarioActual.CveEmpresa, TipoPlantilla)
'GvPlantillas.DataBind()
If UsuarioActual.CveEmpresa.Contiene(120) Then
DdlPlantilla.DataSource = GlobalDTContaPlantillasPolizas(UsuarioActual.CveEmpresa, -1)
Else
DdlPlantilla.DataSource = GlobalDTContaPlantillasPolizas(UsuarioActual.CveEmpresa, TipoPlantilla)
End If
DdlPlantilla.DataBind()
DdlPlantilla.Items.Insert(0, New ListItem("Plantilla Personalizada", "53"))
End Sub