Let planned changes be taken back and corrected too

Deleting and correcting a history entry stopped at the present: anything
not yet effective stayed put. That was not a principle, it was a missing
link. A planned change lives as a payload in pending_org_changes, and
nothing tied it to the history row — only a person and a date, and the
data already holds an Eintritt and a Vertragsänderung sharing one. So
employee_history now carries pending_id, set by change_employee_data
when it schedules something.

One planned change can carry two history rows: Stammdaten and Vertrag
are kept apart but scheduled together. Taking one back therefore strips
only that group's fields from the payload, and cancels the operation
only when nothing is left. Correcting one rewrites its group and the
effective date, and touches no employee data — the change has not
happened yet.

An entry stays on its side of the present. Pulling a planned change into
today, or pushing an effective one into the future, would mean adjusting
the employee record and the pending payload in opposite directions;
that is what the real operations are for.

Existing rows were linked where exactly one running operation matched
the person and date and no other row had claimed it. All five of them
matched. Anything ambiguous would have kept the old refusal, which now
says the actual reason.

The edit dialog surfaced a bug in useDialogFocus that predates it: the
effect depended on the identity of onClose, which almost every caller
rebuilds on render, so it re-ran after each keystroke and its cleanup
pulled focus back to whatever opened the dialog. Any dialog with a text
field would have accepted one character. It never showed because until
now no dialog kept its own state next to its own onClose.

Rehearsed against real data: a two-row planned change corrected, one row
taken back with the operation continuing on the rest, the second taken
back with the operation cancelled, and both refusals.

Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>

lib/history.ts

@@ -13,15 +13,17 @@ import type { AuditChange, HistoryEventType } from "./supabase/types";
 // Läuft eine Seite der anderen davon, gewinnt die Datenbank: sie weist ab,
 // und die Oberfläche zeigt ihre Begründung.
 
-export type LoeschUrteil = { erlaubt: true } | { erlaubt: false; grund: string };
+export type KorrekturUrteil = { erlaubt: true } | { erlaubt: false; grund: string };
 
 type Eintrag = {
   event_type: HistoryEventType;
   event_date: string;
   changes: AuditChange[] | null;
+  /** Der geplante Vorgang, falls die Änderung noch nicht wirksam ist. */
+  pending_id?: string | null;
 };
 
-export function darfGeloeschtWerden(eintrag: Eintrag, heute: string): LoeschUrteil {
+export function darfKorrigiertWerden(eintrag: Eintrag, heute: string): KorrekturUrteil {
   if (eintrag.event_type === "Eintritt") {
     return { erlaubt: false, grund: "Der Eintritt ist der Anfang der Zeitleiste und bleibt." };
   }
@@ -35,10 +37,16 @@ export function darfGeloeschtWerden(eintrag: Eintrag, heute: string): LoeschUrte
     };
   }
 
-  if (eintrag.event_date > heute) {
+  // Noch nicht wirksam: das geht, aber nur mit Bezug auf den geplanten
+  // Vorgang. Zeilen aus der Zeit vor dieser Verknüpfung haben keinen — sie
+  // liessen sich nur über Person und Datum zuordnen, und das ist nicht
+  // eindeutig genug, um daraufhin eine geplante Änderung abzubrechen.
+  if (eintrag.event_date > heute && !eintrag.pending_id) {
     return {
       erlaubt: false,
-      grund: "Diese Änderung ist noch nicht wirksam und hängt an einem geplanten Vorgang. Sie muss dort abgebrochen werden.",
+      grund:
+        "Zu dieser geplanten Änderung ist kein Vorgang hinterlegt — sie stammt aus der Zeit vor dieser Verknüpfung. " +
+        "Zurücknehmen lässt sie sich nur, indem der Vorgang selbst abgebrochen wird.",
     };
   }