diff --git a/Source/Modulos/Facturas de cliente/Data/uDataModuleFacturasCliente.pas b/Source/Modulos/Facturas de cliente/Data/uDataModuleFacturasCliente.pas
index d4b5510..becfebb 100644
--- a/Source/Modulos/Facturas de cliente/Data/uDataModuleFacturasCliente.pas	
+++ b/Source/Modulos/Facturas de cliente/Data/uDataModuleFacturasCliente.pas	
@@ -33,8 +33,8 @@ type
     function NewItem : IBizFacturaCliente;
 
     // Report
-    function GetReport(const AListaID: TIntegerList; AVerDatosCliente: Boolean = true): Binary;
-    function GetRptPDFFactura(const AID: Integer; AVerDatosCliente: Boolean = true): Binary;
+    function GetReport(const AListaID: TIntegerList; AVerDatosCliente: Boolean = true; AEmpresaAcota: Boolean = true): Binary;
+    function GetRptPDFFactura(const AID: Integer; AVerDatosCliente: Boolean = true; AEmpresaAcota: Boolean = true): Binary;
   end;
 
 implementation
@@ -53,26 +53,26 @@ begin
   RORemoteService.Message := dmConexion.Message;
 end;
 
-function TDataModuleFacturasCliente.GetReport(const AListaID: TIntegerList; AVerDatosCliente: Boolean = true): Binary;
+function TDataModuleFacturasCliente.GetReport(const AListaID: TIntegerList; AVerDatosCliente: Boolean = true; AEmpresaAcota: Boolean = true): Binary;
 var
   AParam : TIntegerArray;
 begin
   AParam := AListaID.ToIntegerArray;
   try
-    Result := (RORemoteService as IsrvFacturasCliente).GenerateReport(AParam, AVerDAtosCliente);
+    Result := (RORemoteService as IsrvFacturasCliente).GenerateReport(AParam, AVerDAtosCliente, AEmpresaAcota);
   finally
     FreeANDNIL(AParam);
   end;
 end;
 
-function TDataModuleFacturasCliente.GetRptPDFFactura(const AID: Integer; AVerDatosCliente: Boolean = true): Binary;
+function TDataModuleFacturasCliente.GetRptPDFFactura(const AID: Integer; AVerDatosCliente: Boolean = true; AEmpresaAcota: Boolean = true): Binary;
 var
   AParam : TIntegerArray;
 begin
   AParam := TIntegerArray.Create;
   try
     AParam.Add(AID);
-    Result := (RORemoteService as IsrvFacturasCliente).GenerarInformeEnPDF(AParam, AVerDatosCliente)
+    Result := (RORemoteService as IsrvFacturasCliente).GenerarInformeEnPDF(AParam, AVerDatosCliente, AEmpresaAcota)
   finally
     FreeANDNIL(AParam)
   end;