From 754a3d38405074e4818b19ef27ac5d81d46c7c9c Mon Sep 17 00:00:00 2001 From: david Date: Wed, 3 Dec 2008 18:52:38 +0000 Subject: [PATCH] Arreglo de rute de informe para que lo encuentre siempre git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@350 f4e31baf-9722-1c47-927c-6f952f962d4b --- .../Reports/uRptPresupuestosCliente_Server.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.pas b/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.pas index 34ae60f8..94f92cdf 100644 --- a/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.pas +++ b/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.pas @@ -205,7 +205,7 @@ begin tbl_InformeListadoPresupuestos.Active := True; - AInforme := DarRutaFichero(DarRutaInformes, TipoInforme, tbl_InformeListadoPresupuestos.FieldByName('ID_EMPRESA').AsString); + AInforme := DarRutaFichero(DarRutaInformes, TipoInforme, IntToStr(IdEmpresa)); if VarIsNull(AInforme) then raise Exception.Create (('Error Servidor: _GenerarInforme, no encuentra informe' + TipoInforme));