führende nullen

[help]

Hallo Ihr
ich habe ein Monatsfeld als Zahl und setzte damit

@Right("000" + @Text(Nr_Feld);3)
eine "0" davor das klappt gut

Nun habe ich aber auch noch ein Nummernfeld was eine laufende Nummer berechnet da möchte ich jetzt auch "000" davor haben
das heißt ich brauche den right befehl in lotus script aber das klappt nicht .

und ich habe hier den right Befehl nicht gefunden da immer wieder die @right Formelsprache angeboten wird

LG
Beatrix

[koehlerbv]

... aber das klappt nicht .

Aha. Und weiter? Wo ist die konkrete Frage?

Bernhard

[Glombi]

@Right ind Formelsprache heisst in Script strright

[Schnubbel]

Meine Kristallkugel sagt.... er sucht nach dem @Right -Befehl in LotusScript

Dann kann ich dir empfehlen, in der Hilfe entweder nach Evaluate zu gucken, damit du @Right in Lotus Script benutzen kannst. Oder du guckst dir mal die Funktionen Right bzw. StrRight an.

[DAU-in]

Wenn du in der Hilfe bei Formelsprache oder Scriptsprache bist, steht in der Regel unten ein Querverweis auf entsprechende Befehle in der jeweils anderen Sprache, außerdem verwandte Befehle.

da hangel ich mich immer durch, das klappt ganz gut, vor allem, wenn die Befehle etwas anders heißen (@contains - strToken).

außerdem ist gleich unter 'Inhalte' ein Kapitel Lotus Script Sprachreferenz, auch das hilft manchmal auf die Sprünge.

Und nur so aus Interesse: wie machst du das mit der fortlaufenden Nummerirung?

lg

Dau-in

[klaussal]

Die Frage zielt wohl eher darauf ab, wie kriegt man in ein numerisches Feld führende Nullen.

[koehlerbv]

da hangel ich mich immer durch, das klappt ganz gut, vor allem, wenn die Befehle etwas anders heißen (@contains - strToken).

StrToken hat aber mit @Contains nix zu tun, Anita 

Bernhard

[DAU-in]

Die Frage zielt wohl eher darauf ab, wie kriegt man in ein numerisches Feld führende Nullen.

falls das gemeint ist: mit einem Edding und einem abwischbaren Bildschirm.

[DAU-in]

da hangel ich mich immer durch, das klappt ganz gut, vor allem, wenn die Befehle etwas anders heißen (@contains - strToken).

StrToken hat aber mit @Contains nix zu tun, Anita 

Bernhard

Hab ich extra für dich so geschrieben, Bernhard.

ok, ich probiers nochmal:
z.B. bei @contains - Instr und @Word -StrToken.

ist das besser?

Außerdem geht es eher darum, wie man die Befehle finden kann ....

[koehlerbv]

Hab ich extra für dich so geschrieben, Bernhard.

Danke, Anita 

Außerdem geht es eher darum, wie man die Befehle finden kann ....

Schon klar. Aber nicht, das Beatrix das später auch abschreibt.

Bernhard

[DAU-in]

Außerdem geht es eher darum, wie man die Befehle finden kann ....

Schon klar. Aber nicht, das Beatrix das später auch abschreibt.

Bernhard

Bernhard, das ist die einfachste Methode festzustellen, ob jemand einfach abschreibt.

lg

Dau-in

[help]

Hallo Bernhard
ich habe mir in Lotus scribt eine laufende nummer generiert
die aber im neuen Monat wieder bei eins anfängt

hier das script

Sub Postopen(Source As Notesuidocument)
   
   Dim session As New NotesSession
   Dim db As NotesDatabase
   
   Dim view As NotesView
   Dim viewname As String
   Dim doc As notesdocument
   Dim numberdoc As NotesDocument
   Dim newnumber As Long
   Dim currentmonth As Integer   
   Dim currentyear As Integer
   currentmonth=Month(Now)
   currentyear=Year(Now)
   
   
   viewname = "(WFNameNumber)"
   Set doc = source.document
   Print "Test1"
   If source.EditMode = False Then
      Exit Sub
   End If
   Print "Test2"
   Stop
   If Not (source.isnewdoc Or source.FieldGetText("Number") = "0") Then   
      Print "Test2a"
      'Exit Sub      
   End If
   Print "Test3"
   Set db = session.CurrentDatabase
   Set view = db.GetView(viewname)
   If view Is Nothing Then
      Exit Sub
   End If
   Print "Test4"
   Set numberdoc = view.GetFirstDocument
   
   If Not numberdoc Is Nothing Then
      
      If numberdoc.HasItem("Number") Then
         
         Print numberdoc.as_jahr(0)
         Print numberdoc.as_mon(0)
         
         If (Cint(numberdoc.as_jahr(0))=currentyear & Cint(numberdoc.as_mon(0))=currentmonth ) Then   
            Print"="
            newnumber = numberdoc.number(0) + 1
         Else
            Print"!="
            newnumber = 1
            
         End If
         
      Else
         newnumber = 1
      End If      
      
   Else
      newnumber = 1
   End If
   Print "Nummer"
   Print newnumber
   Print "End Number"
   Call doc.ReplaceItemValue("Number", newnumber)
   
   
End Sub

Nun habe ich in meinem document ein nummernfeld mit der nummer eins
und ich habe mir ein dsp feld gemacht in dem möchte ich meine nummer mit führenden Nullen füllen.

damit aus 1 zum bsp 001 angezeigt wird dazu muss ich das dsp feld mit dem Wert beschießen also muss es in mein script mit rein und da ist die frage
wie bekomme ich nun mit dem right befehl in script nullen vor meine eins


LG beatrix

[koehlerbv]

Damit erzeugst Du Du *keine* laufende Nummern - höchstens manchmal. Damit ist Deine Frage nach Right$ erstmal hinfällig.

Bernhard

[help]

Bernhard


doch ich bekomme die nummer so wie ich sie brauche das passt schon
nur die nullen fehlen mir


LG
Beatrix

[koehlerbv]

Nein, Dein Testszenario ist falsch. Erstelle ein neues Dokument, und speichere es nicht. Erstelle ein zweites Dokument. Nun speichere beide Dokumente ...

Wir brauchen hier nicht zu diskutieren - allein schon das Erzeugen im Frontend führt zum Status"fortlaufende Nummern werden nicht sicher erzeugt".
Das Thema haben wir hier schon gefühlte 10.000mal durchgekaut (und jeden Morgen steht wieder einer auf, der das nicht glaubt).

Bernhard

[DAU-in]

a) das war nicht Bernhard, der nach der Nummerierung gefragt hatte, das war ich. Und ich heiße definitiv nicht Bernhard.

b) wenn das Script das Ergebnis liefert, das du willst, dann willst du keine fortlaufende Nummerierung.
Und das ist dann gut so, denn fortlaufende Nummerierung ist etwas komplexer.

aber Bernhard wird dir das sicher gerne genauer erläutern 

[Alex.]

Hallo zusammen,

frohes Neues!

@Fragesteller:
Ich muss den Leuten hier Recht geben, mit Deinem Script wirst Du nie zuverlässig zu laufenden Nummern kommen.
Zu Deiner Eingangsfrage, so könnte das aussehen:

Code

strErgebnis = Right$("00" & Cstr(lngMeineNummer), 3)

[help]

danke alex das meinte ich
beatrix

[koehlerbv]

Das stand nun schon in den Posts #2, #3, #4 und #12. Und es löst Dein viel grösseres Problem überhaupt nicht. Warum gehst Du darauf nicht ein?

Bernhard

[klaussal]

@Bernhard

Frauen widerspricht man nicht - man wartet, bis sie es selbst tun.