unificación de GlobalDT Estados,Municipios

cambios en para carta porte
This commit is contained in:
2021-12-12 09:12:20 -07:00
parent d58d6d0451
commit 09365748de
21 changed files with 215 additions and 277 deletions

View File

@@ -2754,7 +2754,7 @@ Partial Class Contratos_Default
Private Sub CargaGVGastos()
Dim objContrato As New ClsContratos
If objContrato.GetContratoGastos(CveContrato) Then
If objContrato.GetContratoGastos(CveContrato, UsuarioActual.cveempresa) Then
DtGastos = objContrato.DtResultados
GvContratosGastos.DataSource = DtGastos
SumaGasto = objContrato.DtResultados.SUM("Importe", "CveContratoGasto IS NULL")

View File

@@ -2808,7 +2808,7 @@ Partial Class Contratos_ContratoObra
Private Sub CargaGVGastos()
Dim objContrato As New ClsContratos
If objContrato.GetContratoGastos(CveContrato) Then
If objContrato.GetContratoGastos(CveContrato, UsuarioActual.CveEmpresa) Then
DtGastos = objContrato.DtResultados
GvContratosGastos.DataSource = DtGastos
SumaGasto = objContrato.DtResultados.SUM("Importe", "CveContratoGasto IS NULL")