Rechnungsnummer generieren?

[DelphiDeveloper]

Ich nehme mal an,
das deine Rechnungsnummern folgende Kriterien erfüllen müssen:

1. fortlaufend
2. lückenlos
3. unique im laufenden jahr
4. evtl will der anwender bei jahreswechsel wieder von n loslegen
5. der anwender will noch nicht verschickte rechnungen einfach verwerfen können
und nicht sofort eine storno oder gutschrift erstellen

ich würde folgenden ansatz verfolgen

a) rechnr niemals PK
b) rechnr über generator holen
c) wenn generierte rechnr geloescht wird -> nummer zurück in einen nummernpool

zu b) bevor der generator erhoeht wird, erstmal schauen ob noch was im nummernpool liegt, hier muss man sich dann im mehrplatzsytem was einfallen lassen, das nicht etwa 2 user zur selben zeit sich im pool bedienen können. Kriegt man aber über pessimistisches Locking hin (zumindest mit IBObjects).
Eleganterweise wird das nummern holen dann mit einer SP gelöst.
Bleibt das chronologische Problem. rechnr versus Rechdatum. (nur über Organisation in
dem Betrieb möglich)

wer Interesse an dem geschilderten ansatz hat, dem kann ich eine ausführlichere Interbase/IBO Lösung zukommen lassen.

mfg
delphideveloper