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

Cat Folios Garantia acualizar Area

Browse Source
This commit is contained in:
rakcsle
2024-05-18 09:56:35 -07:00
parent b7e7060a30
commit 991a1b0548
5 changed files with 61 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Acumuladores/CatFoliosGarantia.aspx.vb
View File

@@ -131,7 +131,7 @@ Partial Class Acumuladores_CatFoliosGarantia
End If
Else
If ObjAcum.FoliosGarantiaUpdate(CveFolioGarantia, TxtFolioGarantia.Text, DdlEstatusEditar.SelectedValue.ToEntero, UsuarioActual.CveUsuario, DdlSubProyectos.SelectedValue.ToEntero,
DdlTipoFolioModal.SelectedValue, TxtLimite.Text.ToEntero) Then
DdlTipoFolioModal.SelectedValue, TxtLimite.Text.ToEntero, DdlArea.SelectedValue.ToEntero) Then
TxtFolioGarantia.Text = ""
DdlEstatusEditar.SelectedValueExist("1")
@@ -197,8 +197,10 @@ Partial Class Acumuladores_CatFoliosGarantia
DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyectos.DataBind()
DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectos.SelectedValueExist(GvRow.DataKey("CveSubProyecto").ToEntero)
DdlSubProyectos.SelectedValueExist(GvRow.DataKey("CveSubProyecto").ToEntero)
DdlArea.SelectedValueExist(GvRow.DataKey("Area"))
BtnAgregarFolioGarantiaModal.Text = "Actualizar"
UpModalFolioGarantia.Update()