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

unificación de GlobalDT Estados,Municipios

Browse Source 
cambios en para carta porte
This commit is contained in:
rrene
2021-12-12 09:12:20 -07:00
parent d58d6d0451
commit 09365748de
21 changed files with 215 additions and 277 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
General/CATIEPSxEntidadFed.aspx.cs
View File

@@ -45,8 +45,7 @@ public partial class General_CATIEPSxEntidadFed : ClsPaginas
{
if (!IsPostBack)
{
DdlEstado.DataSource = get_GlobalDTEstado("Mex");
DdlEstado.DataSource = get_GlobalDTGralEstados("MEX");
DdlEstado.DataBind();

6
General/SaldosIniciales.aspx.vb
View File

@@ -1033,7 +1033,7 @@ Partial Class General_SaldosIniciales
' Exit For
'End If
Else
Dim CveSATEstado As Integer = GlobalDTEstado("MEX").FiltroPrimeroValor("CveSATEstado", String.Format(" NombreEstado ='{0}'", Estado.ToUpper)).ToEntero
Dim CveSATEstado As Integer = GlobalDTGralEstados("MEX").FiltroPrimeroValor("CveSATEstado", String.Format(" NombreEstado ='{0}'", Estado.ToUpper)).ToEntero
If Not ObjClientes.AddCliente(RazonSocial, RazonSocial, Calle, NumExt.ToString, "", Colonia, Poblacion, Poblacion, Estado, Pais, RFC, CodigoPostal, Telefono, Contacto, "", "", "", "", "", -1, False, 0, 0, False, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, "", CveVendedor, PlazoCobranza, -1,
"-1", "-1", -1, "-1", -1, "0", -1, "0", 0, "", 0, "", 0, "", 0, "", "", Codigo, LimiteCredito, False, "", "", "", False, "", "", "", "", "", False, "", "", "", False, 0, -1, EsDistribuidor:=EsDistribuidor, CveClienteClasificacion:=CveClasificación, CargoUsado:=CargoUsado,
@@ -2152,7 +2152,7 @@ Partial Class General_SaldosIniciales
If (myarraystr.Length > 0) Then
CveEstado = myarraystr(0).ToEntero()
Else
CveEstado = GlobalDTGralEstados(1).FiltroPrimeroValor("CveEstado", $"Clave = '{Estado}'").ToString.ToEntero
CveEstado = GlobalDTGralEstados("MEX").FiltroPrimeroValor("CveEstado", $"Clave = '{Estado}'").ToString.ToEntero
End If
If CveEstado = 0 Then
CveEstado = -1
@@ -2465,7 +2465,7 @@ Partial Class General_SaldosIniciales
crow = 1
ccol = ccol + 1
Catalogos.Cell(crow, ccol).Value = "Estado"
For Each row As DataRow In GlobalDTGralEstados(1).Rows
For Each row As DataRow In GlobalDTGralEstados("MEX").Rows
crow = crow + 1
Catalogos.Cell(crow, ccol).Value = String.Format("{0}: {1}", row("CveEstado"), row("Estado"))
Next