vergebene nummern eines nummernkreises ausblenden

[Steffen_Albrecht]

hallo!

ich hab da mal so ne frage.
ich habe ein feld in einem doc das da heißt "inventarnummer". dieses feld soll eine dialogliste sein und alle noch nicht vergebenen nummern enthalten. alle bereits vergebenen nummern habe ich in einer ansicht bereits aufgelistet. die nummernkreise sehen ganz einfach aus:

nk1: 640000 bis 649999
nk2: 650000 bis 659999

wie stelle ich es nun aber an, dass
1.  alle nummern zwischen 640000 und 649999 in diesem Feld einthalten sind und
2. alle bereits vergebenen nummern nicht angezeigt werden?

Gruß
  Steffen

[Rob Green]

nur von der Idee her:

mach in das Initialize des Feldes ein Script, das die letzte vergebene Nummer des Nk1 und Nk2 Kreises aus der gebenenen Ansicht(en) holt

[Dim db As New NotesDatabase ("France", "foodwine.nsf")
Dim view As NotesView
Dim doc As NotesDocument
Set view = db.GetView( "Main View")
Set doc = view.GetLastDocument]

Dann in einer for Schleife 10-x Schritte iterieren, um zur letzten vergebenen Nummer die nächsten x Nummern zu erhalten.

Wichtig ist, daß dabei in User auch die 10. Nummer nehmen könnte und damit die neun davor verbraten sind. Es liegt an Dir, ob Du das zulassen möchtest. Sonst mußt Du eine kleine Funktion schreiben, die in einem Test die Nummern rückwärts auf weitere, freie Nummern checkt, die niedriger als die aktuell gewählte sind (kannst zB in einer Scheife schnell mal 100 Nummern zurückchecken...die bekommst Du in der Vergebene Ansicht Ansicht.."wenn niedrigere Nummer in vergebenen ansicht nicht vorhanden..nimm diese").

Ich würde wärmstens empfehlen, nicht 9999x2 freie Nummern (maximal eben) in das Feld zu klatschen :-)

Wenn es vom Design her möglich ist, würde ich sonst das Ganze ins QuerySave verlagern und die Nummernvergabe dem System überlassen, damit es schön brav aufeinanderfolgend ist.

[Steffen_Albrecht]

Danke für die schnelle Antwort!

Ich glaube ich werde das ganze (wie Du gesagt hast) in das QuerrySave ereignis klatschen.

Danke + Gruß
  Steffen