ClsConpaQi consuta y eFacturas complemetnos validacion CveIE

This commit is contained in:
rakcsle
2022-05-26 17:29:54 -07:00
parent 65368ceb2e
commit eacf3ff394
2 changed files with 4 additions and 1 deletions

View File

@@ -6644,6 +6644,7 @@ Public Class ClsContPAQi
StrSQL.Append(" CodigoSup5 VARCHAR(100), Sup5 VARCHAR(200), CodigoSup6 VARCHAR(100), Sup6 VARCHAR(200),")
StrSQL.Append(" CodigoSup7 VARCHAR(100), Sup7 VARCHAR(200), CodigoSup8 VARCHAR(100), Sup8 VARCHAR(100),")
StrSQL.Append(" SaldoActual FLOAT);")
StrSQL.Append(" CREATE NONClUSTERED INDEX IDX ON #TEMP (ID); ")
StrSQL.Append(" ")
'StrSQL.AppendLine(" -- RECOLECCION DE DATOS RECORRIENDO TODO EL ARBOL")
StrSQL.Append(" WITH Rec(IdCtaSup, IdSubCtade, CtaSup, SubCtade, Level, Orden) AS ")
@@ -6782,6 +6783,8 @@ Public Class ClsContPAQi
SqlDataAdapter(StrSQL.ToString, CommandType.Text)
SqlAdapter.SelectCommand.CommandTimeout = 0
With SqlAdapter.SelectCommand.Parameters
.Add("@FechaI", SqlDbType.Date).Value = FechaI
.Add("@FechaF", SqlDbType.Date).Value = FechaF

View File

@@ -3037,7 +3037,7 @@ Partial Class Compras_eFacturas
ObjCompraFolios.Dispose()
DTDocumentosRelacionados = DTDocumentosRelacionados.FiltraParametros("CveIE > 0 AND LEN(IdDocumento) > 0")
DTDocumentosRelacionados = DTDocumentosRelacionados.FiltraParametros(" LEN(IdDocumento) > 0 ")
GVPDocumentosRelacionadosPagos.DataSource = DTDocumentosRelacionados
GVPDocumentosRelacionadosPagos.DataBind()