diff --git a/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas b/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas
index ac4a8b06..2dca8e5f 100644
--- a/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas	
@@ -477,7 +477,7 @@ begin
       bEliminado := True;
     end;
 
-    //En el caso de querer eliminar todos los items del objeto AAlbaran
+    //En el caso de querer eliminar todos los items del objeto APresupuesto
     if AllItems then
     begin
        with APresupuesto.DataTable do
@@ -765,7 +765,7 @@ begin
   try
    ID_Presupuestos := TStringList.Create;
 
-   //Si deseamos previsualizar todos los items del objeto albaran
+   //Si deseamos previsualizar todos los items del objeto presupuesto
    if AllItems then
    begin
      with APresupuesto.DataTable do
@@ -782,7 +782,7 @@ begin
    else
      ID_Presupuestos.Add(IntToStr(APresupuesto.ID));
 
-    AReportController.Print(ID_Presupuestos.CommaText);
+   AReportController.Print(ID_Presupuestos.CommaText);
 
   finally
     AReportController := NIL;