Domino 9 und frühere Versionen > ND6: Entwicklung

Trotz Abbrechen wird gespeichert

<< < (2/3) > >>

Cobi:
ahh super danke! Jetzt funktionierts.

Allerdings schließt er das Fenster jetzt, wenn ich zum Beispiel nur 4 Zeichen eingebe...
Irgendwie muss ich das anders verschachteln. Werde mal ein wenig tüffteln...

Thomas Schulte:
Ist irgendwie logisch das er das so macht. Dein erste Prüfung ist auf Isnumeric und wenn deine Eingabe nicht Numeric ist machst du erst die Längenprüfungen.

Cobi:
Zur Vollständigkeithalber hier der korrekte Code:

s = source.FieldGetText("banf_nr")
if not isnumeric(s) then
  msgBox("Es sind keine Zeichen im Feld zugelassen!")
  continue=false
  else
    if source.getfieldtext("typ")="Bestellanforderung" then
      If Len(s)<>10 Then
            Messagebox("Bitte geben Sie die korrekte 10 stellige Bestellanforderungsnummer ein!")
            Call Source.GotoField("banf_nr")
            Continue = False
            else
        Call doc.Save(True, False)
      End If
     Else
        If (Len(s) < 9) Or (Len(s) >10)  Then
            Messagebox("Bitte geben Sie die korrekte 9 oder 10 stellige Bestellnummer ein!")
            Call Source.GotoField("banf_nr")
            Continue = False
         Else
            Call doc.Save(True, False)
            End if
    End If   
End if
            

danke fürs auf die Sprünge helfen.

klaussal:

--- Zitat ---Bestellanforderungsnummer
--- Ende Zitat ---
?

oder


--- Zitat ---Bestellnummer
--- Ende Zitat ---
  ?

Cobi:
je nach dem welcher Typ (in einem Dialogfeld ausgewählt ist. Bei Bestellanforderungsnummer muss die Eingabe 10stellig sein.
Bei Bestellnummer 9 oder 10 stellig.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete