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:
roberto 2010-07-20 11:23:00 +00:00
parent 89a87e5287
commit 0b5e8ef6af
2 changed files with 7 additions and 4 deletions

View File

@ -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;

View File

@ -1,6 +1,7 @@
program FactuGES;
uses
ExceptionLog,
Forms,
Windows,
SysUtils,