Se comenta porque el cierre y apertura de la tabla porque ocasiona el recuperar todos los registros del servidor nuevamente.
git-svn-id: https://192.168.0.254/svn/Proyectos.Noviseda_FactuGES2/trunk@137 f33bb606-9f5c-448d-9c99-757f00063c96
This commit is contained in:
parent
89a87e5287
commit
0b5e8ef6af
@ -86,8 +86,9 @@ begin
|
||||
|
||||
{ Si la tabla está abierta, la cerramos antes de aplicar los filtros
|
||||
porque por cada cambio en el filtro se hacen llamadas internas de TDADataTable. }
|
||||
if ASource.Active then
|
||||
ASource.Close;
|
||||
//Se comenta porque el cierre y apertura de la tabla ocasiona el recuperar todos los registros nuevamente
|
||||
// if ASource.Active then
|
||||
// ASource.Close;
|
||||
|
||||
// Si la tabla origen viene con un filtro, lo guardamos para luego restablecerlo.
|
||||
if ASource.Filtered then
|
||||
@ -121,8 +122,9 @@ begin
|
||||
ATarget.LogicalName := ASource.LogicalName; // We need to specify new dataset LogicalName
|
||||
ATarget.RemoteFetchEnabled := False; // "Desconectamos" la tabla destino del servidor
|
||||
|
||||
if not ASource.Active then
|
||||
ASource.Open;
|
||||
//Se comenta porque el cierre y apertura de la tabla ocasiona el recuperar todos los registros nuevamente
|
||||
// if not ASource.Active then
|
||||
// ASource.Open;
|
||||
|
||||
ASource.First;
|
||||
|
||||
|
||||
@ -1,6 +1,7 @@
|
||||
program FactuGES;
|
||||
|
||||
uses
|
||||
ExceptionLog,
|
||||
Forms,
|
||||
Windows,
|
||||
SysUtils,
|
||||
|
||||
Reference in New Issue
Block a user