Acana_Interiorismo/FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Tiendas: excepción al entrar a modificar una tienda y salir sin hacer ningún cambio.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@247 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2008-06-23 10:42:39 +00:00
parent f6aaca1676
commit 41446ac742
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Source/ApplicationBase/Empresas/Views/uViewTiendas.pas
View File

@ -84,14 +84,16 @@ begin
end; end;
procedure TfrViewTiendas.ModificarInterno; procedure TfrViewTiendas.ModificarInterno;
var
AController : ITiendasEmpresaController;
begin begin
inherited; inherited;
with TTiendasEmpresaController.Create do AController := TTiendasEmpresaController.Create;
try try
VerTienda((dsDetalles.DataTable) as IBizEmpresasTiendas); AController.VerTienda((dsDetalles.DataTable) as IBizEmpresasTiendas);
finally finally
Free; AController := NIL;
end; end;
end; end;
end. end.