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

-- cambio de GlobalDTSubProyectos

Browse Source 
- cambio en GlobalDTUsuarios
This commit is contained in:
rrene
2024-08-01 05:46:28 -07:00
parent 14f053bc86
commit 1c14bceea9
240 changed files with 692 additions and 689 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Acarreos/AcarreosConcluidos.aspx.vb
View File

@@ -91,13 +91,13 @@ Partial Class Acarreos_AcarreosAutoConciliacion
Private Sub CargaDdlSubProyectoOrigen()
DdlSubProyectoOrigen.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa, Estatus:=1)
DdlSubProyectoOrigen.DataBind()
UPDatos.Update()
End Sub
Private Sub CargaDdlSubProyectoDestino()
DdlSubProyectoDestino.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa, Estatus:=1)
DdlSubProyectoDestino.DataBind()
UPDatos.Update()
End Sub

4
Acarreos/RegistroContratosAcarreos.aspx.vb
View File

@@ -182,14 +182,14 @@ Partial Class Acarreos_ContratosAcarreos
Private Sub CargaDdlSubProyectoOrigen()
DdlSubProyectoOrigen.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa, Estatus:=1)
DdlSubProyectoOrigen.DataBind()
UpProyecto.Update()
End Sub
Private Sub CargaDdlSubProyectoDestino()
DdlSubProyectoDestino.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa, Estatus:=1)
DdlSubProyectoDestino.DataBind()
UpProyecto.Update()
End Sub

4
Acarreos/RepAcarreos.aspx.vb
View File

@@ -76,13 +76,13 @@ Partial Class Acarreos_RepAcarreos
Private Sub CargaDdlSubProyectoOrigen()
DdlSubProyectoOrigen.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
DdlSubProyectoOrigen.DataBind()
UPDatos.Update()
End Sub
Private Sub CargaDdlSubProyectoDestino()
DdlSubProyectoDestino.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
DdlSubProyectoDestino.DataBind()
UPDatos.Update()
End Sub

4
Acarreos/RepAcarreosDetalle.aspx.vb
View File

@@ -108,14 +108,14 @@ Partial Class Acarreos_RepAcarreosDetalle
Private Sub CargaDdlSubProyectoOrigen()
DdlSubProyectoOrigen.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
DdlSubProyectoOrigen.DataBind()
UPDatos.Update()
End Sub
Private Sub CargaDdlSubProyectoDestino()
DdlSubProyectoDestino.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
DdlSubProyectoDestino.DataBind()
UPDatos.Update()
End Sub

4
Acarreos/RepContratosAcarreos.aspx.vb
View File

@@ -59,13 +59,13 @@ Partial Class Acarreos_RepContratosAcarreos
Private Sub CargaDdlSubProyectoOrigen()
DdlSubProyectoOrigen.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoOrigen.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
DdlSubProyectoOrigen.DataBind()
UPDatos.Update()
End Sub
Private Sub CargaDdlSubProyectoDestino()
DdlSubProyectoDestino.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1)
DdlSubProyectoDestino.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
DdlSubProyectoDestino.DataBind()
UPDatos.Update()
End Sub