Se arregla fallo en la clase de negocio de recibos de cliente y proveedor, ya que se hacia apertura de la tabla de recibis compensados, antes de asignar la clausula where que nos permitiria no hacer fech de todos los elementos.
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@530 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
parent
c0e8884303
commit
b11ba9df75
@ -186,10 +186,6 @@ procedure TBizRecibosCliente.SetRecibosCompensados(const Value: IBizRecibosCompe
|
||||
begin
|
||||
FRecibosCompensados := Value;
|
||||
EnlazarMaestroDetalle(FRecibosCompensadosLink, FRecibosCompensados);
|
||||
|
||||
if Assigned(FRecibosCompensados) then
|
||||
if not FRecibosCompensados.DataTable.Active then
|
||||
FRecibosCompensados.DataTable.Active := True;
|
||||
end;
|
||||
|
||||
function TBizRecibosCliente._GetCliente: IBizCliente;
|
||||
|
||||
@ -187,10 +187,6 @@ procedure TBizRecibosProveedor.SetRecibosCompensados(const Value: IBizRecibosCom
|
||||
begin
|
||||
FRecibosCompensados := Value;
|
||||
EnlazarMaestroDetalle(FRecibosCompensadosLink, FRecibosCompensados);
|
||||
|
||||
if Assigned(FRecibosCompensados) then
|
||||
if not FRecibosCompensados.DataTable.Active then
|
||||
FRecibosCompensados.DataTable.Active := True;
|
||||
end;
|
||||
|
||||
function TBizRecibosProveedor.SinFactura: Boolean;
|
||||
|
||||
@ -16,7 +16,7 @@ BEGIN
|
||||
VALUE "FileVersion", "2.4.4.0\0"
|
||||
VALUE "ProductName", "FactuGES (Servidor)\0"
|
||||
VALUE "ProductVersion", "2.4.4.0\0"
|
||||
VALUE "CompileDate", "martes, 22 de junio de 2010 21:37\0"
|
||||
VALUE "CompileDate", "viernes, 16 de julio de 2010 13:56\0"
|
||||
END
|
||||
END
|
||||
BLOCK "VarFileInfo"
|
||||
|
||||
Binary file not shown.
Loading…
Reference in New Issue
Block a user