Liebe Leidgenossen
Ich baue mir einen Agenten in Lotus Script der folgendes soll:
Kopieren und anpassen von Dokumente von der einen in die andere Datenbank.
Hmm, es kommt einer selektiven Replikation gleich. Nur, dass ich eben einige Felder anpassen muss. Darum kann ich die selektive Replikation nicht gebrauchen. Das Template ist das selbe.
(Kennt jemand ein Code-pool wo eine selektive Replikation in Lotus Script abgebildet ist?)
Anyway, also ich hab ja schone einen halbwegs funktionierenden Agenten.
Mein Problem ist, die Prüfung ob ein Dokument in der ZielDatenbank schon vorhanden ist:
Ich vergebe dem Schwester Dokument ein eindeutige ID, bei anlegen.
Wenn ich prüfe, ob es dieses Dok schon gibt, dann schaff ich die Programmsteuerung nur über den ErrorHandler.
Auszug aus dem Code
' # Set allready existing Document
Set DocCurrent = dbCurrent.GetDocumentByUNID(sTempId)
‚ ----> -Hier kommt die Fehlermeldung wenn das Dok noch nicht vorhanden ist If Not(DocCurrent Is Nothing) Then
If Cint(iDiff) < 2 Then
ModifyCheck = CheckModifyFields(DocCurrent, DocFare)
If ModifyCheck Then
strLog = strLog & GetUsername(docFare)&Chr(13)
Else
'Update Address document
Call UpdateAddressEntry(DocCurrent, DocFare)
strLog = strLog & GetUsername(docFare)&Chr(13)
End If
End If
Else
--------------------------------------------------------------------------------------------------
' # Error-handling routine
ErrHandler:
Set DocCurrent = Nothing
'Print "Error" & Err & " at line number" &Erl
' # Resume the procedure.
Resume Next
Hat jemand eine bessere Idee als ich?
Grüsse aus
Liechtenstein