Se arregla que al elegir un agente daba un error al actualizar los datos de objetivos de facturas
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@174 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
parent
42f205aaf1
commit
27fc684823
@ -193,6 +193,7 @@ begin
|
|||||||
frxReport.EngineOptions.NewSilentMode := simReThrow;
|
frxReport.EngineOptions.NewSilentMode := simReThrow;
|
||||||
|
|
||||||
FListaNombresClientes := TStringList.Create;
|
FListaNombresClientes := TStringList.Create;
|
||||||
|
FListaNombresAgentes := TStringList.Create;
|
||||||
|
|
||||||
frxDBCabecera.DataSource := DADSCabecera;
|
frxDBCabecera.DataSource := DADSCabecera;
|
||||||
frxDBCabecera.CloseDataSource := False;
|
frxDBCabecera.CloseDataSource := False;
|
||||||
@ -211,6 +212,7 @@ begin
|
|||||||
tbl_Vencimientos.Active := False;
|
tbl_Vencimientos.Active := False;
|
||||||
|
|
||||||
FreeANDNIL(FListaNombresClientes);
|
FreeANDNIL(FListaNombresClientes);
|
||||||
|
FreeANDNIL(FListaNombresAgentes);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TRptFacturasCliente.frxReportGetValue(const VarName: string; var Value: Variant);
|
procedure TRptFacturasCliente.frxReportGetValue(const VarName: string; var Value: Variant);
|
||||||
|
|||||||
Reference in New Issue
Block a user