Hallo Arsène,

wenn die NOIs einfache natürliche Zahlen (1,2,3 usw.) dann kann man es als trigger bei neu so versuchen:

---

let myTab:=select Dossier;

let myArr:=for i in range (max(myTab.NOI)) do

if cnt (myTab[NOI=i+1])=0 then i 

end;

NOI := if cnt(myArr)>0 then first (myArr) else max (myTab.NOI)+1

---

Es kann sein, dass diese Berechnung je nach Anzahl der Datensätze in der Tabelle nicht besonders performant ist. Es empfiehlt sich dann myArr-Berechnung beim Öffnen der Datenbank zu durchführen und in ein Textfeld als globale Variable zu speichern. 

Leo

Moin,

ich habe das gleiche Problem mit Kundennummern und hab es mit folgendem Code über eine Schaltfläche versucht:

for i in select '2 Kunden' do
if i.'Kd. Nr.' = null then
i.('Kd. Nr.' := max((select '2 Kunden').'Kd. Nr.') + 1)
end
end

Geht das so garnicht oder wo ist da der Fehler? 

LG Jan

Hallo Jan, wenn ich es richtig sehe, dann suchst du mit deinem Skript in der Kundentabelle nach einem Datensatz ohne Kundennummer ("= null") und weist diesem dann im Nachhinein die nächste höchste Nummer zu ("max(...) + 1"). Das kann man natürlich machen, aber bei Arsènes Anliegen oben ging es wohl um etwas anderes. Er wollte Nummern, die durch das Löschen(!) von Datensätzen frei geworden sind, für neue Datensätze nutzen.

Wobei ich als Klugscheißer ja nicht müde werde, bei solchen Gelegenheiten auch immer wieder gerne auf die generelle Problematik neu vergebener Identifikationsnummern hinzuweisen. Wenn man bspw. dem Kunden "Müller" mit der Nummer 101 irgendwann mal ein Angebot oder eine Rechnung geschrieben hatte, und später dem Kunden "Meier" die Nummer 101 zuordnet, dann entstehen falsche Bezüge, die sich im Nachhinein kaum entwirren lassen. Deshalb gilt im kaufmännischen Bereich die Regel, einmal vergebene Identifikationsnummern jeglicher Art niemals neu zu belegen. Auch wenn der ursprüngliche Datensatz (Kunde, Lieferant, Artikel, Angebot ...) nicht mehr relevant ist.

Moin Copytexter,

das dies durch Löschen o.ä. geschehen ist, habe ich tatsächlich nicht realisiert. :D

Normalerweise wird bei neuem Datensatz eine neue Kd.Nr. vergeben. Jetzt habe ich allerdings eine .csv Datei mit neuen Kunden bekommen, die ich importiert habe. Durch den Import werden die Nummern nicht vergeben und so wollte ich diese nachträglich mit Kd.Nr. ausstatten.  Die Formel funktioniert aber nicht und ich sehe den Fehler nicht. Kann mir jemand den Fehler sagen?

LG Jan

Hi Jan, okay, wenn da so ist ... Dann versuch's mal damit (davon ausgehen, dass 'Kd. Nr.' ein Feld vom Typ "Zahl" ist):

let myMax := max((select '2 Kunden').'Kd. Nr.');
for i in select '2 Kunden' do
   if i.'Kd. Nr.' = null then
      myMax := myMax + 1;
      i.('Kd. Nr.' := myMax)
   end
end