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

-- mejora

Browse Source
This commit is contained in:
rrene
2024-02-08 09:10:04 -07:00
parent 8494df34fc
commit 550ae176d9
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Inventarios/EntradasSalidas.aspx.vb
View File

@@ -83,7 +83,7 @@ Partial Class Inventarios_EntradasSalidas
End Property End Property
Public Property CveConcepto() As Integer Public Property CveConcepto() As Integer
Get Get
Return ViewState("CveConcepto").ToString.ToEntero Return IfNull(ViewState("CveConcepto"), "").ToString.ToEntero
End Get End Get
Set(value As Integer) Set(value As Integer)
ViewState("CveConcepto") = value ViewState("CveConcepto") = value
@@ -1249,6 +1249,8 @@ Partial Class Inventarios_EntradasSalidas
DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlAlmacen.DataBind() DdlAlmacen.DataBind()
DdlAlmacen.SelectedIndex = 1 'toma el primer renglón DdlAlmacen.SelectedIndex = 1 'toma el primer renglón
DdlConcepto.Items.Insert(0, New ListItem("Entrada Usados", "42"))
DdlConcepto.SelectedValue = "42"
Dim ObjGenerales As New ClsGenerales() Dim ObjGenerales As New ClsGenerales()