Arreglo de rute de informe para que lo encuentre siempre

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@352 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2008-12-03 18:53:22 +00:00
parent 6f694485e1
commit e9015c46fe

View File

@ -210,7 +210,7 @@ begin
tbl_InformeListadoRecibos.Active := True;
AInforme := DarRutaFichero(DarRutaInformes, TipoInforme, tbl_InformeListadoRecibos.FieldByName('ID_EMPRESA').AsString);
AInforme := DarRutaFichero(DarRutaInformes, TipoInforme, IntToStr(IDEmpresa));
if VarIsNull(AInforme) then
raise Exception.Create (('Error Servidor: _GenerarInforme, no encuentra informe' + TipoInforme));