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

GDiaz Pendientes de implementación 2025-01-10

Browse Source
This commit is contained in:
rakcsle
2025-01-11 01:48:19 -07:00
parent 52e672ac61
commit c2bde9a97c
10 changed files with 244 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
OC/OC.aspx.vb
View File

@@ -734,6 +734,7 @@ Partial Class OC_OC
DdlSubProyectoGral.DataBind()
DdlSubProyectoGral.Items.Insert(0, New ListItem("-", "-1"))
DdlSubProyectoGral.SelectedValueExist(UsuarioActual.CveSubProyecto)
DdlSubProyectoEntrega.SelectedValueExist(UsuarioActual.CveSubProyecto)
ModalidadSubProyectoGeneral = True
TdProyectoSubPrpyectoDdl.Visible = False
TdProyectoSubPrpyecto.Visible = False
@@ -4117,7 +4118,8 @@ Partial Class OC_OC
If e.Row.RowType = DataControlRowType.DataRow Then
If TienePermisoKardex AndAlso e.Row.RowState = DataControlRowState.Normal Then
'If TienePermisoKardex AndAlso e.Row.RowState = DataControlRowState.Normal Then
If TienePermisoKardex AndAlso (e.Row.RowState = DataControlRowState.Normal Or e.Row.RowState = DataControlRowState.Alternate) Then
e.Row.FCLabel("LblPS").Visible = False
e.Row.FCHyperLink("HlPS").Visible = True
e.Row.FCHyperLink("HLPS").NavigateUrl = $"../Inventarios/Kardex.aspx?CvePS={e.Row.DBCampo("CvePS").ToString}"