Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Tyler am 16.05.03 - 11:32:57

Titel: seriennummern auf eindeutigkeit prüfen
Beitrag von: Tyler am 16.05.03 - 11:32:57
hallo,

wie mache ich denn folgendes: es git in einer maske ein feld namens seriennummer. diese seriennummer taucht auch in den ansichten auf.
wenn ich nun ein neues dok anlege, soll geprüft werden ob es diese nummer schon gibt. und wenn ja dann soll eine dementprechende fehlermeldung erscheinen.
wo und wie mache ich das denn?
(bin leider noch beginner)
Titel: Re:seriennummern auf eindeutigkeit prüfen
Beitrag von: enny am 16.05.03 - 11:44:37
Wie wäre es denn mit einer Eingabevalidierung für das Feld in der du via DbLookup bzw. DbColumn alle bisher erfassten Seriennummern abfragst und eben anschließend überprüfst ob die Eingegebene Exsistiert, sollte sie bereits exsistieren gibst du mit @Failure deine Fehlermeldung aus.
Titel: Re:seriennummern auf eindeutigkeit prüfen
Beitrag von: Rob Green am 16.05.03 - 11:49:17
siehe: http://www.atnotes.de/index.php?board=7;action=display;threadid=8188
Titel: Re:seriennummern auf eindeutigkeit prüfen
Beitrag von: Tyler am 16.05.03 - 11:50:28
hmmm, das hört sich sinnvoll an. aber ich weiß nicht wie sowas als "code" aussehen würde.
Titel: Re:seriennummern auf eindeutigkeit prüfen
Beitrag von: Rob Green am 16.05.03 - 12:07:53
Axels Sache kommt ins Event QuerySave der Maske rein.
Basiert auf dem View ALL und auf dem Feldnamen Geraetename.

Wenn eine vorhande Nummer gefunden wird, soll das Speichern abgebrochen werden, das kommt dann als continue=false hier dazwischen rein:

...
If doc.IsNewNote Then  'Prüfung auf doppelte Dokumente nur wenn Dokument neu
  Set tmpdoc = view.GetDocumentByKey( doc.Geraetename(0) )
  If tmpdoc Is Nothing Then
      'Gerät noch nicht vorhanden
  Else
      'Gerät bereits in der Datenbank vorhanden
continue=false
msgbox "AHA, erwischt!!!"
exit sub

  End If
End If
...
Titel: Re:seriennummern auf eindeutigkeit prüfen
Beitrag von: Tyler am 19.05.03 - 09:18:47
okay, danke.
ich werde mal versuchen das hinzubasteln.