Domino 9 und frühere Versionen > Entwicklung
Vorschläge für Software Tracking
koehlerbv:
Setz' erstmal Option Declare. Der LS-Compiler wird dann gesprächiger.
Bernhard
seerow:
Hallo Bernhard,
ich bin in Lotus Script nicht so bewandert (ich arbeite aber daran). Mit der Option declare kann ich leider nichts
anfangen.
PS: habe dir übrigens zum Planer Applet noch ne kurze note geschickt......
koehlerbv:
Option Declare veranlasst, dass jede nicht ausdrücklich definierte Variable vom Compiler angemeckert wird. Bei Dir wäre das zum Bleistift cdoc.
Man sollte - meine Erfahrung - nicht eine einzige Codezeile schreiben, ohne Option Declare geschrieben zu haben. Damit spart man sich stundenlanges Fehlersuchen nach scheinbar vollkommen mysteriösen Verhalten des eigenen Programmes.
Beispiel:
AktSchifffahrtsstrasse = "Limfjord"
MessageBox AktSchiffahrtsstrasse
Erkennst Du auf den ersten Blick, warum die Massagekabine leer bleibt ? Mit Option Declare hättest Du das nicht mal kompilieren können ;-)
HTH,
Bernhard
PS: Emaille habe ich gelesen und auch schon beantwortet ;-)
ata:
... workspace funktioniert in diesem Zusammenhang nicht. Ich würde es mit Formeln machen, da ist alles einfacher. Ansonsten mit LS verwende einen "Einmalig ausführen"-Agenten und dann
--- Code: ---Dim session as New NotesSession
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set dc = session.CurrentDatabase.UnprocessedDocuments
If dc.Count > 0 Then
Set doc = dc.GetFirstDocument
While Not doc Is Nothing
' # hier dein Code zur Berichtigung der markierten Dokumente
doc.Feldname = ArrayAppend( doc.Feldname , "was hinzugefügt werden soll" )
Call doc.Save(True , True)
Set doc = dc.GetNextDocument(doc)
Wend
End If
--- Ende Code ---
ata
seerow:
also ich bekomme das einfach nicht hin. Mal kurz zum besseren Verständniss:
- ich habe ne View in der Fixe drin stehen -> Fix1, Fix2 etc.
- nachdem ich jetzt mein Doks in der Hauptview ausgewählt habe öffne ich über 'nen Button ein Dialogbox mit einen kleinen
dropdown Menü (die daten für das dropdown werden über @dbcolumn aus der fixview geholt).
- über einen Button soll nun das fix in ein computed Feld im Dok geschrieben werden.
@ata, ich verstehe das nicht, was habe ich denn nur falsch gemacht an meinen Script?
Sub Click(Source As Button)
Dim session As New NotesSession
Set doc = w.currentdocument
Set dc = session.CurrentDatabase.UnprocessedDocuments
If dc.Count > 0 Then
Set doc = dc.GetFirstDocument
While Not doc Is Nothing
Call doc.FieldAppendText("sw_update", "Es wurde folgendes Software Update eingespielt:" +Chr(10)+"sw")
Call doc.Save(True , True)
Set doc = dc.GetNextDocument(doc)
Wend
End If
End Sub
Navigation
[0] Themen-Index
[#] Nächste Seite
[*] Vorherige Sete
Zur normalen Ansicht wechseln