diff --git a/ba/ba2800.cpp b/ba/ba2800.cpp
index 6d4a5a51d..a5cd63398 100644
--- a/ba/ba2800.cpp
+++ b/ba/ba2800.cpp
@@ -901,7 +901,13 @@ bool Tdninst_mask::on_sheet_event(TSheet_field& s, TField_event e, long jolly)
       }
     }
     break;
-  case se_query_del: return false;
+  case se_query_del: 
+    {
+      TToken_string& r = s.row(jolly);
+      const int serno = r.get_int(0);    
+      return delete_box("Si desidera eliminare la chiave %d", serno);
+    }
+    break;
   default: break;
   }
   return true;
diff --git a/ba/ba2800a.uml b/ba/ba2800a.uml
index 550c15583..b42a770db 100644
--- a/ba/ba2800a.uml
+++ b/ba/ba2800a.uml
@@ -270,9 +270,36 @@ BEGIN
   PROMPT 1 1 ""
 END
 
-BUTTON DLG_CANCEL 2 2 
+BUTTON DLG_DELREC 2 2 
 BEGIN
-  PROMPT 2 1 ""
+  PROMPT 1 1 ""
+END
+
+BUTTON DLG_NULL 2 2
+BEGIN
+  PROMPT -1 1 ""
+  PICTURE 0
+END
+
+BUTTON DLG_INFO 2 2
+BEGIN
+  PROMPT 1 1 "Info"
+  MESSAGE EXIT,K_F2
+  PICTURE TOOL_INFO
+END
+
+BUTTON DLG_HELP 2 2
+BEGIN
+  PROMPT 2 1 "Help"
+  MESSAGE EXIT,K_F1
+  PICTURE TOOL_HELP
+END
+
+BUTTON DLG_CANCEL 2 2
+BEGIN
+  PROMPT 3 1 "Annulla"
+  MESSAGE EXIT,K_ESC
+  PICTURE TOOL_CANCEL
 END
 
 ENDPAGE