--

2024-02-09 16:29:30 -07:00
parent 6f7d9e0953 2f406887cd
commit 22cbf5a523
24 changed files with 886 additions and 260 deletions
--- a/Transportes/RepContratos.aspx.vb
+++ b/Transportes/RepContratos.aspx.vb
@@ -21,6 +21,11 @@ Partial Class ListadoContratos
        DdlTipoAF.DataSource = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa)
        DdlTipoAF.DataBind()
        DdlTipoAF.Items.Insert(0, New ListItem("-", ""))
+        'Lista Chofer'
+        DdlChofer.DataSource = GlobalDTRHPersonal(UsuarioActual.CveEmpresa) 'solo puesto operador.y activos
+        DdlChofer.DataBind()
+        DdlChofer.Items.Insert(0, New ListItem("-", ""))
+        UpModal.Update()
    End Sub
    Private Sub CargaDatos()
        Dim ObjContratos As New ClsContratos