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

-contratos tipos

Browse Source
This commit is contained in:
Rene Molina
2020-01-23 20:06:47 -07:00
parent 0093cd82da
commit 9178a8d77d
3 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Contratos/Contrato.aspx.vb
View File

@@ -664,10 +664,10 @@ Partial Class Contratos_Default
Private Sub loadComboTipoContrato(venta As Boolean) Private Sub loadComboTipoContrato(venta As Boolean)
Try Try
If venta Then If venta Then
DdlTipoContrato.DataSource = GlobalDTContratosTipos.FiltraParametros($" CveEmpresa = {UsuarioActual.CveEmpresa} And TipoMovimiento = 1") DdlTipoContrato.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros(" TipoMovimiento = 1")
Else Else
DdlTipoContrato.DataSource = GlobalDTContratosTipos.FiltraParametros($" CveEmpresa = {UsuarioActual.CveEmpresa} And TipoMovimiento = 0") DdlTipoContrato.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros(" TipoMovimiento = 0")
End If End If
dvDetContrato.Visible = True dvDetContrato.Visible = True
' DdlTipoContrato.Visible = True ' DdlTipoContrato.Visible = True
@@ -705,7 +705,7 @@ Partial Class Contratos_Default
End If End If
TipoContrato = DdlTipoContrato.SelectedValue.ToEntero TipoContrato = DdlTipoContrato.SelectedValue.ToEntero
TxtDescripcionTipoContrato.Text = GlobalDTContratosTipos.FiltraParametros("CveContratoTipo = " & DdlTipoContrato.SelectedValue)(0)("Descripcion").ToString() TxtDescripcionTipoContrato.Text = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros("CveContratoTipo = " & DdlTipoContrato.SelectedValue)(0)("Descripcion").ToString()
TxtDescripcionTipoContrato.Visible = True TxtDescripcionTipoContrato.Visible = True
CargaContratoPadre() CargaContratoPadre()

2
Contratos/PopUpBuscarContrato.aspx.vb
View File

@@ -86,7 +86,7 @@ Partial Class Contratos_PopUpBuscarContrato
UPDatos.Update() UPDatos.Update()
Try Try
DdlTipoContrato.DataSource = GlobalDTContratosTipos.FiltraParametros($" CveEmpresa = {UsuarioActual.CveEmpresa} AND TipoMovimiento = {DdlTipo.SelectedValue }") DdlTipoContrato.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros($" TipoMovimiento = {DdlTipo.SelectedValue }")
DdlTipoContrato.DataBind() DdlTipoContrato.DataBind()
DdlTipoContrato.Items.Insert(0, New ListItem("Seleccione una opción", "-1")) DdlTipoContrato.Items.Insert(0, New ListItem("Seleccione una opción", "-1"))

2
Contratos/RepContratosAvancesCP.aspx.vb
View File

@@ -32,7 +32,7 @@ Partial Class Contratos_RepContratosAvancesCP
DdlClientes.Items.Insert(0, New ListItem("Todos", "-1")) DdlClientes.Items.Insert(0, New ListItem("Todos", "-1"))
DdlClientes.DataBind() DdlClientes.DataBind()
DdlTipo.DataSource = GlobalDTContratosTipos().FiltraParametros($"CveEmpresa={UsuarioActual.CveEmpresa}") DdlTipo.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa)
DdlTipo.Items.Insert(0, New ListItem("Todos", "-1")) DdlTipo.Items.Insert(0, New ListItem("Todos", "-1"))
DdlTipo.DataBind() DdlTipo.DataBind()