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

Documetos parametros, Alamacenes, RepEstado resultados(General)

Browse Source
This commit is contained in:
Rakcsle Supertramp
2020-07-31 19:44:55 -07:00
parent 1d295026ad
commit 6039aba253
20 changed files with 2151 additions and 328 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Inventarios/CatAlmacenes.aspx.vb
View File

@@ -86,7 +86,12 @@ Partial Class Inventarios_CatAlmacenes
Private Sub CargaUsuarios()
DdlUsuariosAutoriza.DataSource = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa).FiltraParametros(" Estatus = 1 ")
Dim DT As DataTable = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa).FiltraParametros(" Estatus = 1 ").Copy
DT.DefaultView.Sort = "Nombre ASC"
DT = DT.DefaultView.ToTable
DdlUsuariosAutoriza.DataSource = DT
DdlUsuariosAutoriza.DataBind()
DdlUsuariosAutoriza.Items.Insert(0, New ListItem("Seleccione uno", "-1"))
@@ -275,7 +280,7 @@ Partial Class Inventarios_CatAlmacenes
DdlCuentasContables.Visible = True
End If
BtnAgregarAlmacen.Text = "Agregar"
myModalLabel.InnerText = "Agregar Almacen"
myModalLabel.InnerText = "Agregar Almacén"
TxtAlmacen.Text = ""
TxtOrden.Text = ""
ChkEstatus.Checked = True
@@ -307,7 +312,7 @@ Partial Class Inventarios_CatAlmacenes
HdnID.Value = GvRow.DataKey("CveAlmacen")
UpDatos.Update()
BtnAgregarAlmacen.Text = "Actualizar"
myModalLabel.InnerText = "Actualizar Almacen"
myModalLabel.InnerText = "Actualizar Almacén"
DdlInventariable.SelectedValue = If((GvRow.DataKey("Inventariable")) = "True", 1, 0)
DdlModalidad.SelectedValue = If((GvRow.DataKey("Modalidad")) = "Solo Existencia", 0, 1)
divddlcc.Visible = If((DdlModalidad.SelectedValue) = 1, True, False)