diff --git a/Source/ApplicationBase/uFactuGES_App.pas b/Source/ApplicationBase/uFactuGES_App.pas
index 05c7a0a..771f7ca 100644
--- a/Source/ApplicationBase/uFactuGES_App.pas
+++ b/Source/ApplicationBase/uFactuGES_App.pas
@@ -227,6 +227,12 @@ begin
        FEmpresaActiva := Aux;
   end;
 
+  if Assigned(FEmpresaActiva) then
+  begin
+     dmBase.dxPrintStyleManager1Style1.PrinterPage.PageFooter.LeftTitle.Clear;
+     dmBase.dxPrintStyleManager1Style1.PrinterPage.PageFooter.LeftTitle.Add(FEmpresaActiva.NOMBRE);
+  end;
+
   //Establece el ejercicio activo de la empresa activa
   CambiarEjercicio(AIDEmpresa);
   BuscarTiendaPorDefecto;