PC Welt 1999 September/PCW0999.ISO/Software/NotesR5/edition/DATA1.CAB/CommonDataFilesOptionalTemplates/doclbm50.ntf

Lotus Notes Storage Facility | 1999-07-08 | 666.0 KB | 6,740 lines

MS Office Bibliothek (V5.0)
MS Office Library
#1StdR50DocLibMS
*Nb:O
xazm`
QoeH7
CN=Shaun McGale/OU=DUB/O=Lotus
##########################################################
##########################################################
##########################################################
30719
CN=Ryan Jansen/O=IrisCN=Shaun McGale/OU=DUB/O=Lotus#####
DoclibOfficeFrameset|DoclibOfficeFrameset#4C
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesde-DE
0000011E########################################
HC34W
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspDbTitledspDbTitlede-DE
0000012A###########################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspTemplateNamedspTemplateNamede-DE
00000126##########
de-DE".K
0000013A
ReviewOptionsReviewOptionsCD
SaveChoicesReviewTimeNotifyAfterReviewWindowReviewStyle
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
##########################################################
*Nb:O
ResponseBanner
ImmediateParentSubjectOriginalSubjectBodyCategoriesSubjectExpirePrivateTimeCreatedDateFromformname
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
ckantwortResponse to Responsede-DE
00000136#####################################
CategoriesSubject
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
(OLEChgSubject)OLEChgSubjectde-DE
00000152#################################################
DocumentWorkflow(DocProperties) | DocProperties
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom$OLEObjProgID_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\PowerPoint-Pr
sentationPowerPoint Documentde-DE}=K
0000014A
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
de-DE'6K
0000014E(ProcessExistingDbDlg)DC
CopyOptionsArchivePathArchiveServerArchiveLocationDeleteOptions
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes#######
DocumentWorkflow(DocProperties) | DocProperties
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom$OLEObjProgID_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\Excel-ArbeitsblattExcelWorksheet Documentde-DE
0000013E#####
DocumentWorkflow(DocProperties) | DocProperties
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\Paint-DateiPaintbrush Documentde-DE
00000142#######
DocumentWorkflow(DocProperties) | DocProperties
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom$OLEObjProgID_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\Word-DokumentWordDoc Documentde-DE|;K
00000146#
255D2116B7BDFECF1769F57E5917AA29Lotus Notesde-DE<?K
0000015A
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLogCD
CategoriesSubjectArchiveTrailerBodyArchiveDateLogTotalLogCount$MessageType
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes=Lot
##########################################################
##########################################################
de-DE
00000156($Subscription)DC
$HLSubscription$HLFormula$HLMonitorType$HLEnabledAdvFormulaProfileDocTypeDocMatchProfileStatusStatusMatchProfileCategoriesCategoryMatchProfileStringsSubjectOpSubjectMatchProfileAuthorsAuthorMatch$QueryType$HLTitleReplicaIDEventOpCategoryOp$HLType$NoPurge$HLMLastChecked$HLMLastServer
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes##################################
$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesDocumentWorkflowde-DEHMK
0000015E####################################################
xazm`
CUA3x
ReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewers
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
(DocProperties)DocPropertiesde-DE
00000162###############################
##########################################################
CUA3x
CategoriesSubjectTimeCreatedDateFrom
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesResponseBannerde-DE
00000166#########
E4fL3
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesDokument als 'Abgelaufen' markieren/Markierung aufhebende-DE;bK
00000196{
################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesPeriodic Archivede-DE
000001A6
######################################
$SUBVIEW1
$45$36
$36$43
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesNach _Autor|By Author
$45$42$36$43$Conflict
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
Status
StatusY
Subject
$VersionOpt
Subject
  (Originaldokument im Pr
fzyklus)"
ReviewStyle
ParallelG
Subject
  (Gepr
ft von
LastEditor"
Subject
  (Gepr
ft von
PreviousReviewers
Archive
Subject
Subject
(Antwort auf
OriginalSubject
Subject
 (Antwort auf "
OriginalSubject
    6S9RS4E12S13S14S15S20RS8E22RS4E27RS8E28S29S31RS4E35S38RS9E39S40S41S42S2E43S44S46RS4E47S48S49S50S56S57S60R64S67RS4E69R70S71S73RS5E74S75S76S79R80S81S82S83S84S85S
forma
archive
    L1S9Sde-DEwRK
0000016A#
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes###############################################
##########################################################
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ACLDigest
PURSAFO
'++LotusScript Development Environment:2:5:(Options):0:66
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Initialize
Declare Sub GetOrCreateOLEObject
Declare Sub DocQueryOpen(source As NotesUIDocument, mode As Integer, isnewdoc As Variant, continue As Variant)
Declare Sub DocPostOpen(source As NotesUIDocument)
Declare Sub DocQueryModeChange(source As NotesUIDocument, continue As Variant)
Declare Sub DocPostModeChange(source As NotesUIDocument)
Declare Sub DocPostRecalc(source As NotesUIDocument)
Declare Sub DocQuerySave(Source As NotesUIDocument, Continue As Variant)
Declare Sub DocQueryClose(Source As NotesUIDocument, Continue As Variant)
Declare Sub InitializeDocument(source)
Declare Sub Postopen(Source As Notesuidocument)
Declare Sub RebuildList(InputList As Variant)
Declare Sub SetReviewerLists
Declare Sub SendNotification
Declare Sub InitiateReview(source)
Declare Sub GetReviewSequence
Declare Sub ResetAuthorNames
Declare Sub InitializeStatusList
'++LotusScript Development Environment:2:5:(Declarations):0:10
'***** OBJECT VARIABLES *****
Dim s As NotesSession
Dim w As NotesUIWorkspace
Dim doc As NotesUIDocument
Dim db As NotesDatabase
Dim note As NotesDocument
Dim tempnote As NotesDocument
Dim maildoc As NotesDocument
Dim parent As NotesDocument
Dim child As NotesDocument
Dim children As NotesDocumentCollection
Dim item As NotesItem
Dim rtitem As NotesRichTextItem
Dim dt As NotesDateTime
'***** DATA VARIABLES - FIELDS DEFINED ON FORM*****
Dim ReviewStyle As Variant
Dim ReviewSeq As Variant
Dim Reviewers As Variant
Dim PreviousReviewers As Variant
Dim FutureReviewers As Variant
Dim CurrentReviewers As Variant
Dim DocumentAuthors As Variant
Dim Originator As Variant
Dim Versioning As Variant
'***** DATA VARIABLE - FIELDS DEFINED IN SCRIPT, NOT DEFINED ON FORM
Dim Status As Variant
Dim Locked As Variant
Dim InProcess As Variant
'***** SCRIPT PROCESSING VARIABLES *****
Dim ReviewerList() As Variant
Dim OldList() As Variant
Dim InputList As Variant
Dim NewList() As Variant
Dim ListMax As Integer
Dim tmpList As Variant
Dim CompareValue As Variant
Dim Elements As Integer
Dim DocWasSaved As Integer
Dim ParentIsLocked As Integer
Dim DocIsLocked As Integer
Dim LockedBy As Variant
Dim InitiatingReview As Integer
Dim CompareValueFound As Integer
Dim FinalSave As Variant
Dim oleobject As Variant
Dim embed As NotesEmbeddedObject
'***** TEMP PROCESSING FIELDS - ADDED TO DOC ON OPEN, DELETED ON CLOSE*****
Dim CurrentUser As String
Dim Action As Variant
Dim StatusList(1 To 4) As Variant
'++LotusScript Development Environment:2:2:Initialize:1:10
Sub Initialize

End Sub
'++LotusScript Development Environment:2:2:GetOrCreateOLEObject:1:8
Sub GetOrCreateOLEObject
     Dim sOleField As String

     If note.hasitem("$OLEObjProgID") Then
          sOleField = note.~$OLEObjField(0)
          If doc.IsNewDoc Then
               note.~$OLEVersion = "46"
               doc.RefreshHideFormulas
               doc.gotofield(sOleField)
               Call doc.CreateObject("OLEObject",note.~$OLEObjProgID(0),"")
          Else
               If (doc.InPreviewPane) Then Exit Sub
          ' If the user is not an author of the document we have to launch out of place
               If (db.CurrentAccessLevel > ACLLEVEL_AUTHOR) Or (note.tmpUseOLE(0) = "1") Then doc.EditMode = True
               If (note.HasEmbedded) Then
                    Set rtitem = note.GetFirstItem(sOleField)
                    Set embed = rtitem.EmbeddedObjects(0)
          ' see if this is an older document
                    If note.~$OLEVersion(0) <> "46" Then
                         Set oleobject = embed.Activate(True)
                    Else
                         Set oleobject = doc.GetObject(embed.name)
                    End If
               Else
                    If (doc.EditMode) Then
                         doc.gotofield(sOleField)
                         Call doc.CreateObject("OLEObject",note.~$OLEObjProgID(0),"")
                    End If
               End If
          End If
     End If

End Sub
'++LotusScript Development Environment:2:2:DocQueryOpen:1:8
Sub DocQueryOpen(source As NotesUIDocument, mode As Integer, isnewdoc As Variant, continue As Variant)

'If it is a new doc, there is no note yet, so we cannot initialize it from here
     If IsNewDoc Then Exit Sub

     Call InitializeDocument(source)

     If Mode = 1 Then
          If DocIsLocked Then
               Messagebox "Dieses Dokument wird gerade bearbeitet von " & LockedBy(0) & ". Versuchen Sie es sp
ter erneut.",_
               0 + 48, "Dokumentbibliothek"
               Continue = False
          Else
'If this is a Document Reservations review, then lock this doc
               If note.ReviewStyle(0) = "Parallel.NoVersions" Then
                    note.Locked = CurrentUser
                    note.DocumentAuthors = CurrentUser
                    If note.DocumentReaders(0) = "" Then note.RemoveItem("DocumentReaders")
                    On Error Goto SaveError
                    note.save True, True
               End If
          End If
     End If

     Exit Sub

SaveError:

     Messagebox "Das Dokument wird z. Zt. benutzt. Versuchen Sie es sp
ter erneut.",_
     0 + 48, "Dokumentbibliothek"
     Continue = False
     Exit Sub

End Sub
'++LotusScript Development Environment:2:2:DocPostOpen:1:8
Sub DocPostOpen(source As NotesUIDocument)

'This allows us to reference the UI Document in areas where source represents a different object
     Set doc = source

'If it is a new doc, we initialize it here.  Existing docs are initialized in Queryopen because it is faster (one less refresh is required)
     If source.IsNewDoc Then
          Call InitializeDocument(source)
          source.Reload
          source.RefreshHideFormulas
     Else
'If the doc was opened in edit mode, it may be a review initiation (this routine is also executed on mode change)
          If source.EditMode = True Then
               Status = note.Status
               If Status(0) = StatusList(3) Then Call InitiateReview(source)
          End If
     End If

     GetOrCreateOleObject
End Sub
'++LotusScript Development Environment:2:2:DocQueryModeChange:1:8
Sub DocQueryModeChange(source As NotesUIDocument, continue As Variant)

'If the doc is locked, do not allow them to put in in edit mode
     If source.EditMode = False And note.ReviewStyle(0) = "Parallel.NoVersions" Then
          If Not DocIsLocked Then
               SavedUNID = note.UniversalId
               Delete note
               Set tempnote = db.GetDocumentByUNID(SavedUNID)
               If tempnote.HasItem("Locked") Then
                    DocIsLocked = True
                    LockedBy = tempnote.Locked
               End If
               Delete tempnote
               Set note = source.Document
          End If
          If DocIsLocked Then
               Messagebox "Dieses Dokument wird gerade bearbeitet von " & LockedBy(0) & ". Versuchen Sie es sp
ter erneut.",_
               0 + 48, "Dokumentbibliothek"
               Continue = False
          Else
               note.Locked = CurrentUser
               note.DocumentAuthors = CurrentUser
               If note.DocumentReaders(0) = "" Then note.RemoveItem("DocumentReaders")
               On Error Goto SaveError
               note.save True, True
          End If
     End If

     Exit Sub

SaveError:

     Messagebox "Das Dokument wird z. Zt. benutzt. Versuchen Sie es sp
ter erneut.",_
     0 + 48, "Dokumentbibliothek"
     Continue = False
     Exit Sub

End Sub
'++LotusScript Development Environment:2:2:DocPostModeChange:1:8
Sub DocPostModeChange(source As NotesUIDocument)

'Putting the doc in edit mode might be a review initiation (this routine is also executed if the doc is opend in edit mode)
     If Source.EditMode = True Then
          Status = note.Status
          If Status(0) = StatusList(3) Then Call InitiateReview(source)
     End If

End Sub
'++LotusScript Development Environment:2:2:DocPostRecalc:1:8
Sub DocPostRecalc(source As NotesUIDocument)

End Sub
'++LotusScript Development Environment:2:2:DocQuerySave:1:8
Sub DocQuerySave(Source As NotesUIDocument, Continue As Variant)

     If FinalSave Then Exit Sub

     On Error Resume Next

'All routing logic is driven from here.  The Action buttons set the tmpAction value which drives processing.
     Status = note.Status

'If Subject is blank, be sure they enter it here
     Subject = note.Subject
     If Subject(0) = "" Then
          Subject(0) = Inputbox("Bitte geben Sie einen Titel f
r dieses Dokument ein.", "Dokumentbibliothek", "(Unbenannt)")
          If Subject(0) = "" Then
               Continue = False
               Exit Sub
          End If
     End If
     note.Subject = Subject(0)

'Be sure that versions do not get $Ref stripped off
     If note.IsResponse Then Call note.ReplaceItemValue("$RefOptions", "1")

'InitiatingReview means that they are saving in order to generate a new version
'Status 1 means there is no review cycle.  In both cases we don't need to execute the rest of the logic here.
     If InitiatingReview Or Status(0) = StatusList(1) Then
          source.Reload
          Exit Sub
     Else
          Print "Dokument wird gespeichert"
     End If

'Find out which kind of a review we are doing
     GetReviewSequence

'Get the Action type and the Reviewer list
     Action = note.tmpAction
     Reviewers = note.Reviewers

'Decide how to process based on which Action button was pressed
     Select Case Action(0)
'On Submit - build the current and future reviewer lists and send notification to the appropriate person(s)
     Case "Submit"
          note.Status = StatusList(3)
          SetReviewerLists
          SendNotification
'On Completion of a review - if it is a response, lock the parent because we are going to update it
     Case "Complete"
          If note.IsResponse Then
               parentid = note.ParentDocumentUNID
               Set parent = db.GetDocumentByUNID(parentid)
               parent.Locked = CurrentUser
               ParentIsLocked = True
               parent.save True, True
          End If
'Rebuild the previous, current, and future reviewer lists and send notificationto the appropriate person(s)
          SetReviewerLists
          SendNotification
'Get the name of the person(s) currently reviewing this document (actively reviewing it means they have started
'reviewing it, rather than just being on the CurrentReviewer list)
          InProcess = note.InProcess
          CompareValue = CurrentUser
'Pull CurrentUser out of the InProcess list
          Call RebuildList(InProcess)
          Call note.ReplaceItemValue("InProcess", tmpList)
          CurrentReviewers = note.CurrentReviewers
'If CurrentReviewers = None (already set in the SetReviewerLists routine) then all reviews are complete so reset status
          If CurrentReviewers(0) = "Keiner" Then note.Status = StatusList(4)
'If the parent is locked then unlock it
          If ParentIsLocked Then
               CurrentReviewers = parent.CurrentReviewers
               If CurrentReviewers(0) = "Keiner" Then
                    parent.Status = StatusList(4)
                    parent.RemoveItem("DueDate")
               End If
               parent.RemoveItem("Locked")
               ParentIsLocked = False
               parent.Save True, True
          End If
     End Select

'Reset $VersionOpt to 0 to prevent further versioning
     If note.HasItem("$VersionOpt") Then Call note.ReplaceItemValue("$VersionOpt", "0")

'Set the DocWasSaved flag so the Queryclose event knows about it
     DocWasSaved = True

     source.Reload

     Print

End Sub
'++LotusScript Development Environment:2:2:DocQueryClose:1:8
Sub DocQueryClose(Source As NotesUIDocument, Continue As Variant)

     On Error Goto ErrorRoutine

'If the doc wasn't saved, we do not need to execute the rest of the logic in this event
     If DocWasSaved Or note.Locked(0) <> "" Then
          Print "Dokument wird geschlossen"
     Else
          Exit Sub
     End If

     Action = note.tmpAction

'A backend save (note.save) saves every field that it knows about, which is every field on the form.  It does not
'distinguish between ComputedForDisplay and data fields (the backend classes have no such UI constraints).
'Consequently, we delete all ComputedForDisplay and other temporary fields
     itemlist = note.Items
     Forall n In itemlist
          If Lcase(Left(n.Name, 3)) = "tmp" Then n.Remove
     End Forall
     Scope = note.Scope
     CurrentReviewers = note.CurrentReviewers
     Status = note.Status

'We reset the author names here because the UI save has already occurred (so we can).
'The new authornames will take effect the next time the doc is accessed.
     If Scope(0) = "Public" Then note.RemoveItem("DocumentReaders")
     If Status(0) = StatusList(1) Or Status(0) = StatusList(2) Then
          note.DocumentAuthors = Originator(0)
     Else
          ResetAuthorNames
     End If

     If note.HasItem("SaveOptions") Then note.RemoveItem("SaveOptions")
     If note.Locked(0) = CurrentUser Then
          note.RemoveItem("Locked")
     Else
          If DocIsLocked Then Exit Sub
     End If

     FinalSave = True
     source.Reload
     source.Refresh
     source.Save

     w.ViewRefresh
     Print

ErrorRoutine:
     Exit Sub

End Sub
'++LotusScript Development Environment:2:2:InitializeDocument:1:8
Sub InitializeDocument(source)

'This routine initializes object variables, global variables and some field values

'Turn off Autoreload to speed up response time (this means we need to do manual reloads and refreshes)
     source.AutoReload = False

     Set w = New NotesUIWorkspace
     Set s = New NotesSession
     Set db = s.CurrentDatabase
     Set note = source.Document

     CurrentUser = s.CommonUserName
     note.tmpCurrentUser = CurrentUser
     Originator = note.From

     InitializeStatusList
     If source.IsNewDoc Then
          note.Status = StatusList(1)
          note.Scope = "Public"
     Else
          If note.Locked(0) <> "" Then
               DocIsLocked = True
               LockedBy = note.Locked
          End If
     End If

'Initialize V3 documents
     If Not(note.HasItem("Status")) Then
          note.Status = StatusList(1)
          note.Scope = "Public"
          note.DocumentAuthors = s.CommonUserName
          note.From = Evaluate("@Name([CN]; From)", note)
     End If

'Clear the status bar
     Print

End Sub
'++LotusScript Development Environment:2:2:Postopen:1:8
Sub Postopen(Source As Notesuidocument)

'This allows us to reference the UI Document in areas where source represents a different object
     Set doc = source

'If it is a new doc, we initialize it here.  Existing docs are initialized in Queryopen because it is faster (one less refresh is required)
     If source.IsNewDoc Then
          Call InitializeDocument(source)
          source.Reload
          source.RefreshHideFormulas
     Else
'If the doc was opened in edit mode, it may be a review initiation (this routine is also executed on mode change)
          If source.EditMode = True Then
               Status = note.Status
               If Status(0) = StatusList(3) Then Call InitiateReview(source)
          End If
     End If

End Sub
'++LotusScript Development Environment:2:2:RebuildList:1:8
Sub RebuildList(InputList As Variant)

'This routine removes a value from a list (passed by reference)

     ListMax = Ubound(InputList)

'Save original capitalization in OldList then lowercase both InputList and CompareValue
     Redim OldList (ListMax)
     For i = 0 To ListMax
          OldList(i) = InputList(i)
          InputList(i) = Lcase(InputList(i))
     Next
     CompareValue = Lcase(CompareValue)

     Redim NewList (ListMax)
     x = 0
     For y = 0 To ListMax
          If InputList(y) <> CompareValue Then
               NewList(x) = OldList(y)
               x = x + 1
          End If
     Next

     If x > 0 Then
          Redim Preserve NewList(x-1)
          tmpList = NewList
     Else
          tmpList = "Keiner"
     End If

     If x = ListMax Then
          CompareValueFound = True
     Else
          CompareValueFound = False
     End If

End Sub
'++LotusScript Development Environment:2:2:SetReviewerLists:1:8
Sub SetReviewerLists

     Print "Pr
ferlisten werden aktualisiert "

   For a Parallel submit, set CurrentReviewers to the Reviewers field (there are no
      FutureReviewers - all reviewers are current) and set FutureReviewers to "None".
   For a Parallel review, remove CurrentUser from CurrentReviewers and add it to
      PreviousReviewers.
   For a Serial submit, set CurrentReviewers to the first Reviewer and set FutureReviewers
      to the Reviewers field minus the first Reviewer
   For a Serial review remove CurrentUser from FutureReviewers and add it to
      PreviousReviewers.
%ENDREM

     ListMax = 0
     Set dt = New NotesDateTime("")
     dt.SetNow
     If Action(0) = "Complete" Then ReviewerLogEntry = CurrentUser & " am " & Format(dt.LSLocalTime, "Short Date")

     Select Case ReviewSeq
     Case "Parallel"
'On submit Set future reviewers to None since all reviewers are current
          If Action(0) = "Submit" Then
               Reviewers = note.Reviewers
               tmpList = Reviewers
               note.FutureReviewers = "Keiner"
          Else
'(this is for action = Complete)
'For Response Reviews, we maintain the status in the parent
               If note.IsResponse Then
                    CurrentReviewers = parent.CurrentReviewers
                    Set item = parent.GetFirstItem("ReviewerLog")
               Else
                    CurrentReviewers = note.CurrentReviewers
                    Set item = note.GetFirstItem("ReviewerLog")
               End If
               item.AppendToTextList(ReviewerLogEntry)
               CompareValue = CurrentUser
'Remove the CurrentUser from the CurrentReviewers list
               Call RebuildList(CurrentReviewers)
          End If
          FieldName = "CurrentReviewers"
     Case "Serial"
'On submit, put all reviewers in the future reviewers list
          If Action(0) = "Submit" Then
               Reviewers = note.Reviewers
               tmpList = Reviewers
               Call note.ReplaceItemValue("FutureReviewers", tmpList)
          Else
               Set item = note.GetFirstItem("ReviewerLog")
               item.AppendToTextList(ReviewerLogEntry)
          End If
          FutureReviewers = note.FutureReviewers
'Put the first person in the future reviewers list in current reviewer
'On submit this makes the first one current, on Complet it makes the next one current
          note.CurrentReviewers = FutureReviewers(0)
          CompareValue = FutureReviewers(0)
          FieldName = "FutureReviewers"
'Remove the first element from the FutureReviewers list
          Call RebuildList(FutureReviewers)
     End Select

'Calculate when the review is due, based upon ReviewTime
     ReviewTime = note.ReviewTime
     temp = ReviewTime(0)
     Set dt = New NotesDateTime("")
     dt.SetNow
     If Isnumeric(ReviewTime(0)) Then dt.AdjustDay(temp)

'Update DueDate - If there is a Review time then reset, otherwise delete
'Update PreviousReviewers to None if this is a submit, otherwise add CurrentUser to existing list
     If note.IsResponse And ReviewSeq = "Parallel" Then
          If Isnumeric(ReviewTime(0)) Then
               parent.DueDateTime = dt.LSLocalTime
          Else
               parent.RemoveItem("DueDateTime")
          End If
          Call parent.ReplaceItemValue(FieldName, tmpList)
          PreviousReviewers = parent.PreviousReviewers
          If PreviousReviewers(0) = "Keiner" Then
               parent.PreviousReviewers = CurrentUser
          Else
               Set item = parent.GetFirstItem("PreviousReviewers")
               item.AppendToTextList (CurrentUser)
          End If
'In a response review, we remove these because they are stored in the main doc
          note.RemoveItem("PreviousReviewers")
          note.RemoveItem("CurrentReviewers")
          note.RemoveItem("FutureReviewers")
          If Action(0) = "Complete" Then
               note.RemoveItem("DueDateTime")
               note.Status = StatusList(4)
          End If
     Else
          If Isnumeric(ReviewTime(0)) Then
               note.DueDateTime = dt.LSLocalTime
          Else
               note.RemoveItem("DueDateTime")
          End If
          Call note.ReplaceItemValue(FieldName, tmpList)
          If Action(0) = "Submit" Then
               note.PreviousReviewers = "Keiner"
          Else
               PreviousReviewers = note.PreviousReviewers
               If PreviousReviewers(0) = "Keiner" Then
                    note.PreviousReviewers = CurrentUser
               Else
                    Set item = note.GetFirstItem("PreviousReviewers")
                    item.AppendToTextList (CurrentUser)
               End If
          End If
     End If

End Sub
'++LotusScript Development Environment:2:2:SendNotification:1:8
Sub SendNotification

'This routine sets the content of the notification email, based upon values set in SetReviewerLists.

     If note.IsResponse Then
          CurrentReviewers = parent.CurrentReviewers
     Else
          CurrentReviewers = note.CurrentReviewers
     End If
     DbTitle = db.Title
     DueDateTime = note.DueDateTime
     Subject = note.Subject
     Recipient = Empty
     NotifyAfter = note.NotifyAfter

'If it is a parallel review with only final notification to the originator,
'there is not need to send mail on a normal completion
     If (ReviewSeq = "Parallel") And (CurrentReviewers(0) <> "Keiner") _
     And (NotifyAfter(0) = "Final") And (Action(0) <> "Submit") Then
          Exit Sub
     Else
          Print "Benachrichtigung wird gesendet"
     End If

     Set maildoc = New NotesDocument(db)
     Set rtitem = New NotesRichTextItem(maildoc, "Body")

     Select Case Action(0)
     Case "Submit"
          tmpList = CurrentReviewers
          tmpSubject = "Dokument mu
 gepr
ft werden:  " & Subject(0)
          If note.HasItem("DueDateTime") Then
               tmpFlowStatus = "Bitte nehmen Sie sich die Zeit, dieses Dokument noch vor der unten angegebenen Frist zu pr
fen."
          Else
               tmpFlowStatus = "Bitte nehmen Sie sich die Zeit, dieses Dokument zu pr
fen."
          End If
          tmpMessagebox = "Eine Pr
fanforderung wurde gesendet an "
          If ReviewSeq = "Parallel" Then
               tmpRecipient = "Alle Pr
          Else
               tmpRecipient = CurrentReviewers(0)
          End If
     Case "Complete"
          If CurrentReviewers(0) = "Keiner" Then
               tmpList = Originator(0)
               tmpSubject = "Pr
fung abgeschlossen f
r:  " & Subject(0)
               tmpFlowStatus = "Alle Pr
fer haben die Pr
fung dieses Dokuments abgeschlossen."
               tmpMessagebox = "Eine Mitteilung dar
ber, da
 Sie Ihre Pr
fung abgeschlossen haben, wurde an den Verfasser gesendet: "
          Else
               Select Case ReviewSeq
               Case "Parallel"
                    tmpList = Originator(0)
                    tmpFlowStatus = CurrentUser & " hat die Pr
fung des Dokuments abgeschlossen."
                    tmpSubject = CurrentUser & " hat die Pr
fung abgeschlossen f
r:  " & Subject(0)
                    tmpMessagebox = "Eine Mitteilung dar
ber, da
 Sie Ihre Pr
fung abgeschlossen haben, wurde an den Verfasser gesendet, "
               Case "Serial"
                    tmpList = CurrentReviewers(0)
                    tmpSubject = "Dokument mu
 gepr
ft werden:  " & Subject(0)
                    If note.HasItem("DueDateTime") Then
                         tmpFlowStatus = Originator(0) & " bittet Sie, dieses Dokument noch vor der unten angegebenen Frist zu pr
fen."
                    Else
                         tmpFlowStatus = Originator(0) & " bittet Sie um Pr
fung des Dokuments."
                    End If
                    tmpMessagebox = "Eine Mitteilung dar
ber, da
 Sie Ihre Pr
fung abgeschlossen haben, wurde gesendet an "
                    If NotifyAfter(0) = "Each" Then
                         maildoc.CopyTo = Originator(0)
                         tmpRecipient = tmpList & " und " & Originator(0)
                    End If
               End Select
          End If
          If tmpRecipient = "" Then tmpRecipient = tmpList
     End Select

     Call maildoc.AppendItemValue("SendTo", tmpList)

     maildoc.Subject = tmpSubject
     maildoc.InheritedSubject = Subject(0)
     maildoc.InheritedDbTitle = DbTitle
     maildoc.FlowStatus = tmpFlowStatus
     If note.HasItem("DueDateTime") Then maildoc.DueDateTime = Format(DueDateTime(0), "Short Date")

     If note.IsResponse Then
          Call rtitem.AppendDocLink(parent, "Dokumentverkn
pfung mit " & Subject(0))
     Else
          Call rtitem.AppendDocLink(note, "Dokumentverkn
pfung mit " & Subject(0))
     End If

     maildoc.Form = "Bookmark"

     On Error Goto SendError
     Call maildoc.Send (False)

     Messagebox tmpMessagebox & tmpRecipient & ".", 0 + 64, "Dokumentbibliothek"

     Exit Sub

SendError:
     Messagebox "Zu Ihrer Information:  " & tmpRecipient & " konnte z. Zt. per E-Mail nicht benachrichtigt werden.", 0 + 64, "Dokumentbibliothek"
     Exit Sub

End Sub
'++LotusScript Development Environment:2:2:InitiateReview:1:8
Sub InitiateReview(source)

'This routine does the versioning that occurs when a review in initiated (as opposed to on every save)
     InProcess = note.InProcess
     Reviewers = note.Reviewers
     PreviousReviewers = note.PreviousReviewers

'Check to see if CurrentUser is in the InProcess list.  If they are (or if this is the originator) then do not do versioning
     Redim ReviewerList(0)
     Forall n In InProcess
          If CurrentUser = n Then ReviewerList(0) = CurrentUser
     End Forall

'Find out what kind of review we are processing
     GetReviewSequence

     If ReviewerList(0) = CurrentUser Or CurrentUser = Originator(0) Then Exit Sub
     Print "Pr
fung wird gestartet"

'Set the $VersionOpt appropriately
     If (Versioning = "Versions") Then
          If ReviewSeq = "Parallel" Then
'This doc becomes a response (we are subsequently editting the response doc)
               VersionOpt = "1"
          Else
'Previous versions become response (we are still editing the main doc)
               VersionOpt = "3"
          End If
     Else
'The original doc is saved as a response (for safe keeping)
          If PreviousReviewers(0) = "Keiner" And Not(note.HasItem("$VersionOpt")) Then VersionOpt = "3"
     End If

'Reset the field
     If (Versioning = "Versions") Or (PreviousReviewers(0) = "Keiner") Then Call note.ReplaceItemValue("$VersionOpt", VersionOpt)

'CurrentUser is now on the InProcess list because they are actively reviewing the doc
     Set item = note.GetFirstItem("InProcess")
     If item Is Nothing Then
          Call note.AppendItemValue("InProcess", CurrentUser)
     Else
          item.AppendToTextList(CurrentUser)
     End If

'InitiatingReview flag tells the Querysave event how to process, reload from the backend,
'and save from the front end to create the appropriate version
     InitiatingReview = True
     source.Reload
     If VersionOpt = 1 Or VersionOpt = 3 Then
          source.Refresh
          source.SaveNewVersion
     End If
     source.RefreshHideFormulas
     InitiatingReview = False

     Print

End Sub
'++LotusScript Development Environment:2:2:GetReviewSequence:1:8
Sub GetReviewSequence

'ReviewSequence is stored in a manner that makes sense to users.  Here it is dealt with as serial or parallel,
'with or without versioning.

     ReviewStyle = note.ReviewStyle

     position = Instr(ReviewStyle(0), ".")
     ReviewSeq = Left(ReviewStyle(0), position - 1)
     Versioning = Mid(ReviewStyle(0), position + 1)

End Sub
'++LotusScript Development Environment:2:2:ResetAuthorNames:1:8
Sub ResetAuthorNames

     Select Case ReviewSeq
     Case "Serial"
'Reset author names to CurrentReviewers + Originator (unless CurrentReviewers = "None")
          If CurrentReviewers(0) = "Keiner" Then
               note.DocumentAuthors = Originator(0)
          Else
               CompareValue = Empty
               Call RebuildList(CurrentReviewers)
               Redim Preserve NewList(ListMax+1)
               NewList(ListMax+1) = Originator(0)
               tmpList = NewList
               note.DocumentAuthors = tmpList
          End If
'If there are versions, remove it from them as well
          If note.HasItem("$VersionOpt") Then
               Set children = note.Responses
               For c = 1 To children.Count
                    Set child = children.GetNthDocument(c)
                    child.DocumentAuthors = Originator(0)
                    If child.DocumentReaders(0) = "" Then child.RemoveItem("DocumentReaders")
'It does not matter if it can not be saved because CurrentUser may not be in the AuthorNames field in all responses
                    On Error Resume Next
                    child.Save True, True
                    Err = 0
               Next
          End If
     Case "Parallel"
          If note.IsResponse Then
'If all done we are updating the parent and the originator is the only editor
'otherwise CurrentUser and originator are the editors of this doc
               If Action(0) = "Complete" Then
                    note.DocumentAuthors = Originator(0)
                    parentid = note.ParentDocumentUNID
                    Set parent = db.GetDocumentByUNID(parentid)
                    DocumentAuthors = parent.DocumentAuthors
                    CompareValue = CurrentUser
                    Call RebuildList(DocumentAuthors)
                    parent.DocumentAuthors = tmpList
                    If parent.DocumentReaders(0) = "" Then parent.RemoveItem("DocumentReaders")
                    parent.Save True, True
               Else
                    Redim NewList(1)
                    NewList(0) = CurrentUser
                    NewList(1) = Originator(0)
                    tmpList = NewList
                    note.DocumentAuthors = tmpList
               End If
          Else
'If we are not versioning - then all current reviewers and the originator are editors (unless CurrentReviewer = "None")
               If CurrentReviewers(0) = "Keiner" Then
                    note.DocumentAuthors = Originator(0)
               Else
                    CompareValue = Empty
                    Call RebuildList(CurrentReviewers)
                    Redim Preserve NewList(ListMax+1)
                    NewList(ListMax+1) = Originator(0)
                    tmpList = NewList
                    note.DocumentAuthors = tmpList
               End If
'If there are versions, remove it from them as well
               If note.HasItem("$VersionOpt") Then
                    Set children = note.Responses
                    For c = 1 To children.Count
                         Set child = children.GetNthDocument(c)
                         child.DocumentAuthors = Originator(0)
                         If child.DocumentReaders(0) = "" Then child.RemoveItem("DocumentReaders")
                         child.RemoveItem("Locked")
'It does not matter if it can not be saved because CurrentUser may not be in the AuthorNames field in all responses
                         On Error Resume Next
                         child.Save True, True
                         Err = 0
                    Next
               End If
          End If
     End Select

End Sub
'++LotusScript Development Environment:2:2:InitializeStatusList:1:8
Sub InitializeStatusList

'Statuses are referred to positionally.  If you want the works to display differently in the view (like if you want the first
'status to be None instead of New) you would change them here.
     StatusList(1) = "Neu"
     StatusList(2) = "Steht zur Pr
fung an"
     StatusList(3) = "Wird gepr
     StatusList(4) = "Pr
fung abgeschlossen"

     note.StatusList = StatusList

End Sub
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
>"1%"
$TITLE
$PublicAccess
$Language
$LastBuildTime
$BabelInfo
$ScriptLib
$ScriptLib_O
leftTopX
dspTemplateName|dspTemplateNameX
leftNotesViewX
MasterDocLibOfficeOutline|MasterDocLibOfficeOutlineX
leftBottom
dspDbTitle|dspDbTitleX
NotesViewX
($All)|($All)X
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
WW|6I
FJ}**
$TITLE
$FrameSet
$Language
$LastBuildTime
$BabelInfo
&Arial
 MasterDocLibOfficeOutline
DoclibOutline.gif|DoclibOutline.gifX
DoclibOfficeOutline
docliboutline
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
HH-m*
$HTMLDocumentStyles
$Info
$$ScriptName
$Background
$Body
$Language
$LastBuildTime
$BabelInfo
&Arial
 DbTitlePage
MS Office Bibliothek
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$$ScriptName
$WindowTitle
$Body
$Language
$LastBuildTime
$BabelInfo
Untitled
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
>%ym[,
":d%*
$Info
$WebFlags
$$ScriptName
$Body
$Language
$LastBuildTime
$BabelInfo
"MS Sans Serif
 Response
OriginalSubject
OriginalSubject
OriginalSubject
Subject
    1S2S3S10S12S
NewRespTitle
Neue Antwort auf "
OriginalSubject
    0R1S2S3S4S5S6S
StandardTitle
Antwort
 von
 auf ""
OriginalSubject
    0R1S2S3S4S8S9S10S11S12S13S14S15S16S17S
NewRespTitle
StandardTitle
    0R4S6S
Dokument _bearbeiten
_KategorisierenX
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument bearbeitenX
    0S0E
Speichern und schlie
    4R11S17S
Neue AntwortF
views only
Response
    0R4S
Neue R
ckantwort6
Response to Response
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
AbbrechenXJ
SaveOptions
    1S2S3S
Dokument _bearbeiten
_KategorisierenX
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument bearbeitenX
    0S0E
edit.gif|edit.gifX
Speichern und schlie
    4R11S17S
save.gif|save.gifX
Neue AntwortF
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort6
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
AbbrechenXJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX
    form name (used in RespBanner subform)
Response
formname
ResponseBanner
Antwort
formname
Response
    1S2S
    auf HauptdokumentX
formname
Response
    1S2S
    auf AntwortX
DateErstellungsdatum/-zeit des Dokuments
TimeCreatedX
Readers
    1S2S
PrivateX
ExpireDate
    1S2S
Expire
doclib_header.gifX
    Thema:
Subject
    0S0E
SubjectGeben Sie eine kurze Beschreibung dieser Antwort ein.z
Subject
Subject
dspSubject
Kategorie:    X
Categories
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
gen.Xz
Categories
Inhalt:X
BodyGeben Sie den Text Ihrer Antwort ein
    -------------------------------------------------------------------------------------------------------------------------------------------------X
    Hidden Fields:    X
OriginalSubject
OriginalSubject
Subject
    7S9S
OriginalSubjectHidden field to store topic of Main DocumentX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
'9O2W
WG6GW
KtSr6h
$HTMLDocumentStyles
$Info
$SubForms
$$Script_O
$$ScriptName
TimeCreated
$WindowTitle
$ACTIONS
$V5ACTIONS
$Body
$Language
$LastBuildTime
$BabelInfo
My Favorites|My Favorite Documents
GOLAx
Started running agent 'Mark/Unmark Document As Expired' on 07/20/96 02:03:32 PM
Running on selected documents: 1 total
Found 1 document(s) that match search criteria
1 document(s) were modified by formula
Done running agent 'Mark/Unmark Document As Expired' on 07/20/96 02:03:39 PM
CN=Lotus Notes Template Development/O=Lotus Notes
&Arial
"MS Sans Serif
 Document
Neues Dokument
Subject
    4S6S
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
'++LotusScript Development Environment:2:5:(Options):0:66
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
'++LotusScript Development Environment:2:5:(Declarations):0:10
Dim FormW As NotesUIWorkspace
Dim FormDoc As NotesUIDocument
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As FIELD
     Set Source = Bind(Objectname_)
     On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
     Set FormW = New NotesUIWorkspace
     Set FormDoc = FormW.CurrentDocument
     formdoc.refresh
End Sub
DocumentWorkflow
MS OfficeX
Bibliothek
    HauptdokumentX
FromAutor des DokumentsX
DateErstellungsdatum/-zeit des Dokuments
TimeCreatedX
Readers
    1S2S
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Abgelaufen am
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
    Thema:
subject
SubjectGeben Sie eine kurze Beschreibung dieses Hauptthemas ein.z
Subject
Subject
dspSubject
    Kategorie:    X
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
Status
StatusListv
    4S6S7S8S9S
fer:
Reviewers
Reviewers
ReviewersX
Status
StatusListv
PreviousReviewers
Keiner
    4S6S7S8S9S10S11S12S13S
    Bereits gepr
ft von:    X
PreviousReviewers
PreviousReviewersX
Status
StatusListv
    4S6S7S8S9S
    Aktueller Pr
fer:
CurrentReviewers
CurrentReviewers
Status
StatusListv
FutureReviewers
Keiner
    4S6S7S8S9S10S11S12S13S
    Wird noch gepr
ft von:    X
FutureReviewers
FutureReviewersX
Status
StatusListv
Status
StatusListv
    4S6S7S8S9S13S15S16S17S18S
fart:    X
ReviewStyle
ReviewStyle
Serielle Pr
fung | Serial.NoVersionsSeriell (Alle
nderungen bewahren) | Serial.VersionsDokumentreservierungen | Parallel.NoVersionsAntwortpr
fung | Parallel.VersionsX
    Frist:
ReviewWindow
ReviewWindow
Keine Frist f
r jede Pr
fung | NoLimitZum n
chsten Pr
fer wechseln nach: | MoveOnErinnerungen senden nach: | ReminderX
ReviewTime
ReviewTime
ReviewWindow
NoLimit
Tag(en)
    3S4S6S8S
tmpReviewUnits
    Benachrichtigung:X
NotifyAfter
NotifyAfter
Verfasser nach jeder Pr
fung benachrichtigen | EachVerfasser nach der letzten Pr
fung benachrichtigen | Final
ReviewerLog
    1S2S3S4S
fprotokoll
ReviewerLog
    1S2S
ReviewerLog
ReviewerLogX
    ....................
BodyGeben Sie den Text (oder eine Beschreibung) des Dokuments ein.
Lotus Product
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
 /Y`e
iT),5
$HTMLDocumentStyles
$Info
$SubForms
$$ScriptName
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$Reviewers
$Body
$$Script_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
Times New Roman
 ReviewOptions
_%`%GIF89a
`zhxb
Zd:V)
 f<+%;
~`h4-U
"SbrK
8u.eI#
.2\$}
QHgw~)5d
wJ4HE`
vbYGX
'$nG$
Urj6}
y`r|#
!Vh"7
9r.eu
)gfqHr
n~`<VJ
fr' f
"h 7U
]r'r;
JN/]hc
7VNNNo
V.@N~
`yz!N
rSXL>
F*PMJ
IJP0IL
+#VK;.
?~Pda
 QQ6P
q2eha
xT:x9
K6X2G
E[$|`5
pz*-KB
To    p{
6o    .p)
OF#uV
2"{%7
],/hkJt
<C"ixL
T85B9
VuUdh
c}Vf%We
t=Wsu
~]Vs]W
heWwu
fart:
ReviewStyle
ReviewStyle
Serielle Pr
fung | Serial.NoVersionsSeriell (Alle
nderungen bewahren) | Serial.VersionsDokumentreservierungen | Parallel.NoVersionsAntwortpr
fung | Parallel.Versions
ReviewWindow
ReviewWindow
Keine Frist f
r jede Pr
fung | NoLimitZum n
chsten Pr
fer wechseln nach | MoveOnErinnerungen senden nach | Reminder
Zugewiesene Zeit:
Benachrichtigung:
NofityAfter
NotifyAfter
Benachrichtigung nach jeder Pr
fung | EachBenachrichtigung nach der letzten Pr
fung | Final
ReviewWindow
NoLimit
    1S2S
ReviewTime
ReviewWindow
NoLimit
ReviewTime
ReviewTime
    3S4S6S8S14S
ReviewWindow
NoLimit
ReviewTimeX
Bitte geben Sie eine Zahl ein.{
ReviewTimeX
Bitte geben Sie eine ganze Zahl gr
er Null ein.{
    3S4S6S8S16S21S25S26S28S33S
ReviewTime
Tag(en)
SaveChoices
SaveChoices
Auswahl f
chstes Mal speichern. | 1
33333f33
3f33ff3f
f33f3ff3
ff3fffff
33333f33
3f33ff3f
f33f3ff3
ff3fffff
33333f33
3f33ff3f
f33f3ff3
ff3fffff
33333f33
3f33ff3f
f33f3ff3
ff3fffff
_Kategorisieren
Dokument _bearbeiten
Dokument _senden
_Weiterleiten
In Ordner _verschieben...c
Aus Ordner _entfernen
_Kategorisieren
Dokument _bearbeiten
Dokument _senden
_Weiterleiten
In Ordner _verschieben...
Aus Ordner _entfernene
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
ReviewTime_1
$Language
$LastBuildTime
$BabelInfo
$Info
$$ScriptName
$Body
$V5ACTIONS
$ACTIONS
"MS Sans Serif
 Response to Response
NewDocTitle
Neue Antwort auf "
Subject
    1S2S3S4S5S6S
StandardTitle
Antwort auf "
ImmediateParentSubject"
    0R1S2S3S4S5S6S
NewDocTitle
StandardTitle
    0R4S6S
Dokument _bearbeiten
_KategorisierenX
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument bearbeitenX
    0S0E
Speichern und schlie
    4R11S17S
Neue AntwortF
views only
Response
    0R4S
Neue R
ckantwort6
Response to Response
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
AbbrechenXJ
SaveOptions
    1S2S3S
Dokument _bearbeiten
_KategorisierenX
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument bearbeitenX
    0S0E
edit.gif|edit.gifX
Speichern und schlie
    4R11S17S
save.gif|save.gifX
Neue AntwortF
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort6
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
AbbrechenXJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX
    form name (used in RespBanner subform)
Response to Response
formname
ResponseBanner
Antwort
formname
Response
    1S2S
    auf HauptdokumentX
formname
Response
    1S2S
    auf AntwortX
DateErstellungsdatum/-zeit des Dokuments
TimeCreatedX
Readers
    1S2S
PrivateX
ExpireDate
    1S2S
Expire
doclib_header.gifX
    Thema:
Subject
    0S0E
SubjectGeben Sie eine kurze Beschreibung dieser Antwort ein.z
Subject
Subject
dspSubject
Kategorie:    X
Categories
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
gen.Xz
Categories
Inhalt:X
BodyGeben Sie den Text Ihrer Antwort ein
    -------------------------------------------------------------------------------------------------------------------------------------------------X
    Hidden Fields:    X
OriginalSubject
OriginalSubject
Subject
    7S9S
OriginalSubjectHidden field to store topic of Main DocumentX
Subject
Subject
OriginalSubject
    7S9S
ImmediateParentSubject
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
eg/])
$HTMLDocumentStyles
$Info
$SubForms
$$Script_O
$$ScriptName
TimeCreated
$WindowTitle
$ACTIONS
$V5ACTIONS
$Body
$Language
$LastBuildTime
$BabelInfo
(ProcessExistingDbDlg)'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Postopen(Source As Notesuidocument)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As NOTESUIDOCUMENT
     Set Source = Bind(Objectname_)
     On Event Postopen From Source Call Postopen
End Sub
'++LotusScript Development Environment:2:2:Postopen:1:12
Sub Postopen(Source As Notesuidocument)
     source.RefreshHideFormulas
End Sub
Lotus Product
DeleteOptions
Die urspr
ngliche Datenbank l
schen|1
    Dokumente werden archiviert:
ArchiveLocation
Local
    1S2S
    Archivdatenbank befindet sich auf Server:
    Archivdatei:
Local
ArchiveLocation
Lokal | LocalAuf Server | Server
    0S0E
ArchiveServer
ArchiveLocation
Local
ArchiveServer
ArchiveServer
    4RS4E6R7S8S10RS4E12R13S14S16RS4E20S23R
ArchiveServer
CurrentPath
    1S2S6S
CurrentFile
CurrentPath
    0R1S2S6S
FileOnly
CurrentPath
CurrentFile
Macintosh
CurrentPath
CurrentFile
CurrentPath
CurrentFile
CurrentFile
    0R1S2S8S11S15S18S19S20S21S22S26S29S33S36S37S38S39S40S44S47S51S54S
DirOnly
CurrentPath
CurrentFile
Macintosh
CurrentPath
CurrentFile
CurrentPath
CurrentFile
    0R1S2S8S11S15S17S18S20S21S22S23S24S28S31S35S37S38S40S41S42S43S44S48S51S55S57S58S60S
DirOnly
FileOnly"
CurrentPath
    0RR1S2S5S6S8S10S11S15S
ArchivePath
Bitte geben Sie den Dateinamen der Archivdatenbank ein.
    3S4S6S11SArchivePath
    Nach Erstellen der neuen Archivdatenbank:
servers
names.nsf
($ServersLookup)
    1S2S
selectedserver
Server
hlen Sie den Server aus, auf dem die Archivdatenbank erstellt werden soll.
ArchiveServer
servers
    0R1S2S
ArchiveServer
selectedServer
    0R1S2S3S
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
@If(@IsN
CopyOptions
Dokumente aus dem urspr
nglichen Archiv in das neue kopieren|1
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Language
$LastBuildTime
$BabelInfo
$Info
$$Script_O
$$ScriptName
$$FormScript
$$$FormScript_O
$Body
 ExcelWorksheet Document
Neue Excel-Arbeitsmappe
Subject
    4S6S
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As FIELD
     Set Source = Bind(Objectname_)
     On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
     formdoc.refresh
End Sub
DocumentWorkflow
_ViewIconX
Excel.Sheet
$OLEObjProgIDX
Microsoft Office
    Excel-Arbeitsblatt
FromDocument author name
DateErstellungsdatum/-zeit des Dokuments
TimeCreatedX
Readers
    1S2S
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Abgelaufen am
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
    Thema:
subject
SubjectGeben Sie eine kurze Beschreibung dieses Hauptthemas ein.z
Subject
Subject
dspSubject
    Kategorie:    X
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
Scope
Public
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
ReviewerLog
    1S2S
OLEBodyX
BodyGeben Sie den Text (oder eine Beschreibung) des Dokuments ein.
Lotus Product
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
/i9WJ??
$HTMLDocumentStyles
$Info
$SubForms
$$ScriptName
_ViewIcon
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$Reviewers
$Body
$$Script_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
"MS Sans Serif
FBody
 Paintbrush Document
Neue Paint-Datei
Subject
    4S6S
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As FIELD
     Set Source = Bind(Objectname_)
     On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
     formdoc.refresh
End Sub
DocumentWorkflow
_ViewIconX
Microsoft Office
    Paint-DateiX
FromAutor des DokumentsX
DateErstellungsdatum/-zeit des Dokuments
TimeCreatedX
Readers
    1S2S
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Abgelaufen am
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
    Thema:
subject
SubjectGeben Sie eine kurze Beschreibung dieses Hauptthemas ein.z
Subject
Subject
dspSubject
    Kategorie:    X
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
Scope
Public
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
ReviewerLog
    1S2S
OLEBodyX
BodyGeben Sie den Text (oder eine Beschreibung) des Dokuments ein.
Lotus Product
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
Date_1
TimeCreated_1
$HTMLDocumentStyles
$AUTOLAUNCH
$Info
$SubForms
$$ScriptName
_ViewIcon
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$Reviewers
$Body
$$Script_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
 WordDoc Document
Neues Word-Dokument
Subject
    4S6S
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Postopen(Source As Notesuidocument)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As NOTESUIDOCUMENT
     Set Source = Bind(Objectname_)
     On Event Postopen From Source Call Postopen
End Sub
'++LotusScript Development Environment:2:2:Postopen:1:12
Sub Postopen(Source As Notesuidocument)

End Sub
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As FIELD
     Set Source = Bind(Objectname_)
     On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
     formdoc.refresh
End Sub
DocumentWorkflow
_ViewIconX
Word.Document
$OLEObjProgIDX
Microsoft Office
    Word-DokumentX
FromDocument author name
DateErstellungsdatum/-zeit des Dokuments
TimeCreatedX
Readers
    1S2S
variable to translate
PrivTxt
Privat
    0R1S2S
end variable to translate
    0R1S
scope
Privat
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Abgelaufen am
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
    Thema:
subject
SubjectGeben Sie eine kurze Beschreibung dieses Hauptthemas ein.z
Subject
Subject
dspSubject
    Kategorie:    X
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
Scope
Public
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
ReviewerLog
tmpUseOle
    1S2S3S2E4S5S2E6S
OLEBodyX
BodyGeben Sie den Text (oder eine Beschreibung) des Dokuments ein.
ReviewerLog
    1S2S
Lotus Product
Lotus Product
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
p<0a4
SUYgpH6B
-Hmi#
$HTMLDocumentStyles
$Info
$SubForms
$$ScriptName
_ViewIcon
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$FormScript
$$Reviewers
$Body
$$Script_O
$$$FormScript_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
$HTMLDocumentStyles
$Info
$SubFor
 OLEChgSubject
    Thema:
subject
SubjectGeben Sie eine kurze Beschreibung dieses Hauptthemas ein.z
Subject
    Kategorie:    X
Categories
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$a>o:
$Info
$$ScriptName
$Body
$Language
$LastBuildTime
$BabelInfo
"MS Sans Serif
 PowerPoint Document
Neue Powerpoint-Pr
sentation
Subject
    4S6S
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
Dokument _bearbeiten
DocumentAuthors
    9S15S
_KategorisierenX
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernenX
Dokument _senden
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As FIELD
     Set Source = Bind(Objectname_)
     On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
     formdoc.refresh
End Sub
DocumentWorkflow
_ViewIconX
PowerPoint.Show
$OLEObjProgIDX
Microsoft Office
    PowerPoint-Pr
sentationX
FromDocument author name
DateErstellungsdatum/-zeit des Dokuments
TimeCreatedX
Readers
    1S2S
variable to translate
PrivTxt
Privat
    0R1S2S
end variable to translate
    0R1S
scope
Privat
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Abgelaufen am
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
    Thema:
subject
SubjectGeben Sie eine kurze Beschreibung dieses Hauptthemas ein.z
Subject
Subject
dspSubject
    Kategorie:    X
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
Scope
Public
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
Scope
Public
    1S2S
OLEBodyX
BodyGeben Sie den Text (oder eine Beschreibung) des Dokuments ein.
Lotus Product
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$HTMLDocumentStyles
$Info
$SubForms
$$ScriptName
_ViewIcon
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$Reviewers
$Body
$$Script_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
Locked
    1S2S3S
DocumentAuthors
CurrentReviewers
Keiner
    0R1S2S3S8S9S11S13S
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Formula
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
?OOO///
    bkCb
]&SE<
oMr2<IKM OHv0$
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
MS Office Bibliothek - Abonnement
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
Option Declare
%INCLUDE "lsconst.lss"
'++LotusScript Development Environment:2:5:(Forward):0:1
'++LotusScript Development Environment:2:5:(Declarations):0:10
Const COMPILE_SUCCESS_TITLE = "Erfolgreich kompiliert"
Const COMPILE_SUCCESS_BODY = "Keine Syntaxfehler. Die Formel wurde erfolgreich kompiliert."
Const COMPILE_FAILURE_TITLE = "Syntaxfehler"
Const COMPILE_FAILURE_BODY = "Die Formel enth
lt mindestens einen Syntaxfehler. Sie wurde nicht kompiliert."
Const COMPILE_FAILURE_SAVE_BODY = "Die Formel enth
lt mindestens einen Syntaxfehler. Das Dokument konnte nicht gespeichert werden."
Lotus Product
($Subscription)'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As NOTESUIDOCUMENT
    Set Source = Bind(Objectname_)
    On Event Querysave From Source Call Querysave
End Sub
'++LotusScript Development Environment:2:2:Querysave:1:12
Sub Querysave(Source As Notesuidocument, Continue As Variant)
    Dim note As NotesDocument
    Dim item As NotesItem
    Source.Refresh
    Set note = Source.document
    Set item = note.getFirstItem( "$HLFormula")
    If note.getItemValue( "$QueryType")(0) = "adv" Then
        If item.type <> FORMULA Then
            Messagebox COMPILE_FAILURE_SAVE_BODY,  MB_ICONSTOP, COMPILE_FAILURE_TITLE
            Source.goToField "AdvFormula"
            Continue = False
        End If
    End If
    Set item = note.replaceitemvalue("$MainTable", "basics")
End Sub
Lotus Product
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As FIELD
    Set Source = Bind(Objectname_)
    On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
    Dim w As New notesuiworkspace
    Set uidoc = w.currentdocument
    uidoc.refresh
End Sub
Lotus Product
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As FIELD
    Set Source = Bind(Objectname_)
    On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
End Sub
Lotus Product
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Entering(Source As Field)
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As FIELD
    Set Source = Bind(Objectname_)
    On Event Entering From Source Call Entering
    On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Entering:1:12
Sub Entering(Source As Field)
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
    Dim w As New notesuiworkspace
    Set uidoc = w.currentdocument
    uidoc.refresh
End Sub
Lotus Product
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As FIELD
    Set Source = Bind(Objectname_)
    On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
    Dim w As New notesuiworkspace
    Set uidoc = w.currentdocument
    uidoc.refresh
End Sub
Lotus Product
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As FIELD
    Set Source = Bind(Objectname_)
    On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
    Dim w As New notesuiworkspace
    Set uidoc = w.currentdocument
    uidoc.refresh
End Sub
Lotus Product
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As FIELD
    Set Source = Bind(Objectname_)
    On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)
    Dim w As New notesuiworkspace
    Set uidoc = w.currentdocument
    uidoc.refresh
End Sub
Lotus Product
$HLMLastServer
.,$ //:
$HLMLastChecked
.,$,  , :
$NoPurge
.,$,  , :
$HLType
CategoryOp
EventOp
    build 164 only:  You must enter the replica ID of the Office Library database into this field, enclosed in double-quotes, in order for the Category field to display the correct keywords when a Subscription is creatd:
enter database's replica ID below, enclosed in double quotes
can be easily obtained via File--Database--Design Synopsis
    0R1S
ReplicaID
MS Office
Bibliothek
Abonnenment
SubscriptionFormOutline
Collage.GIF
MainTable
MainTable
    Allgemein
swish.gif
    Abonnementname:
Geben Sie einen Abonnementnamen ein
$HLTitle
    Abruf-Optionen
swish.gif
    Diese neuen oder ver
nderten Dokumente abrufen:
$QueryType
Alle | allDiejenigen die den Auswahlkriterien entsprechen | selDiejenigen die den Auswahlkriterien entsprechen (erweitert) | adv
QueryType
QueryType
    Dokumente abrufen, die folgende Auswahlkriterien erf
llen:
AuthorMatch
Autoren|1
AuthorMatch
    1S2S
ProfileAuthors
AuthorValue
AuthorValue
    1S2S3S5S7S
GIF89a
    Geben Sie den vollqualifizierten Namen ein (z.B. 'Hugo Schmidt/FirmaX/Vertrieb/D')
    Geben Sie W
rter oder Wortbestandteile ein (z.B. entspricht 'Hein' den Autorennamen 'Heinrich' und 'Heiner')
SubjectMatch
Thema|1
SubjectMatch
    1S2S
SubjectOp
lt mindestens eines dieser W
rter|contbeginnt mit|beg
ProfileStrings
    Geben Sie W
rter oder Wortbestandteile ein (z.B. entspricht 'zahl' sowohl 'Zahl' als auch 'Zahlung')
CategoryMatch
Kategorie|1
CategoryMatch
    1S2S
ProfileCategories
nocache
$HLMonitorDB
By Category
    8S10S12S
hlen Sie eine oder mehrere Kategorien aus der Liste.
StatusMatch
fstatus |1
StatusMatch
    1S2S
ProfileStatus
Neue Dokumente | NewZu pr
fende Dokumente | In ReviewDokumente mit abgeschlossener Pr
fung | Review Complete
hlen Sie einen oder mehrere der folgenden Pr
fstati, die Sie verfolgen m
chten.
DocMatch
Office-Dokument |1
DocMatch
    1S2S
ProfileDocType
Excel-Arbeitsblatt | ExcelWorksheet DocumentPaint-Datei | Paintbrush DocumentPowerPoint-Pr
sentation | PowerPoint DocumentWord-Dokument | WordDoc Document
hlen Sie einen oder mehrere der MS Office-Dokumenttypen aus der Liste.
    Auswahlformel:
SELECT @All
$QueryType
Select @All
$QueryType
AdvFormula
Continue
    2S3S4S6S8S11S12S13S15S17S20S
tAuthStr
ProfileAuthorsa
    0RR1S3S4S6S10S16S18S19S
tAuth
AuthorMatch
@contains(@lowercase(from);
tAuthStr"
    0R1S2S4S5S6S8S9S10S11S12S14S
tSubjStr
ProfileStringsa
    0RR1S2S3S4S6S11S13S14S
tSubj
SubjectMatch
SubjectOp
!cont
SubjectOp
!cont
@Contains(@LowerCase(Subject);
tSubjStr"
SubjectOp
@Begins(
@Ends(
Subject;
tSubjStr"
    0R1S2S4S5S6S8R10S11S12S14S15S16S18S21S22S23S24S25S27S2E28S30S31S33R35S36S37S38S39S41S43S44S45S46S47S48S51S
tCatStr
ProfileCategories
    0RR1S2S3S4S6S11S13S14S
CategoryMatch
@Contains(@LowerCase(Categories);
tCatStr
    0R1S2S5S6S8S2E9S11S12S14S
tThrMStr
ProfileThreadSubjects
    0RR1S2S3S4S6S11S13S14S
tThrM
ThreadMatch
@LowerCase(Subject) =
tThrMStr"
    0R1S2S5S6S8S2E9S12S
tThrRStr
ProfileStatus
    0RR1S2S3S4S6S11S13S14S
tThrR
StatusMatch
@lowercase(Status) =
tThrRStr"
    0R1S2S5S6S8S2E9S10S11S12S
tDocTypeStr
ProfileDocTypea
    0RR1S2S3S4S6S11S13S14S
tDocType
DocMatch
@lowercase(form) =
tDocTypeStr
    0R1S2S5S6S8S2E9S10S11S12S
tQuery
tAuth
tSubj
tThrM
tThrR
tDocType
AndOr
    0RR1S2S4S6S7S8S9S10S11S12S13S14S15S16S19R21S22S23S24S25S27S
SELECT
tQuery
tQuery
    0R1S2S4S6S8S9S11S13S
AdvFormula
'++LotusScript Development Environment:2:5:(Options):0:74
Option Declare
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Click(Source As Button)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
    Static Source As BUTTON
    Set Source = Bind(Objectname_)
    On Event Click From Source Call Click
End Sub
'++LotusScript Development Environment:2:2:Click:1:12
Sub Click(Source As Button)
    Dim ws As New NotesUIWorkspace
    Dim doc As NotesUIDocument
    Dim note As NotesDocument
    Dim item As NotesItem
    Set doc = ws.currentDocument
    doc.refresh
    Set note = doc.document
    Set item = note.getFirstItem( "$HLFormula")
    If item.type = FORMULA Then
        Messagebox COMPILE_SUCCESS_BODY,  MB_ICONINFORMATION, COMPILE_SUCCESS_TITLE
    Else
        Messagebox COMPILE_FAILURE_BODY,  MB_ICONSTOP, COMPILE_FAILURE_TITLE
    End If
End Sub
Lotus Product
New Button
Need a newer version of Notes to execute this button.
    0S0E
    Syntax pr
    Status
swish.gif
    Zuletzt
berpr
ft um:
.,$ //:
$HLMLastChecked
$HLMLastChecked
    2S3S4S6S8S
Disp$HLMLastChecked
    Letzter
berpr
fter Server:
$HLMLastChecked
Nicht verf
$HLMLastServer
Lokal
$HLMLastServer
    2S3S4S6S8S9S10S12S14S18S
Disp$HLMLastServer
$HLMError
    1S2S
    Statusmeldung:
$HLMError
    1S2S
$HLMError
Disp$HLMError
    Dieses Abonnement ist:
$HLEnabled
Aktiviert|1Vor
bergehend deaktiviert|0
basics
basics
tzliche Informationen
swish.gif
berwachungstyp:
$HLMonitorType
Formel|1
    Replik-ID:
$HLMonitorDBh
$HLMonitorDB
Nicht verf
$HLMonitorDB_Display
    Formel:
AdvFormula
$HLFormula
    Marker:
hidden field needed for headlines
    0R1S
Subscriptions
$HLSubscription
_Kategorisieren
Dokument _bearbeiten
Dokument _senden
_Weiterleiten
In Ordner _verschieben...v
Aus Ordner _entfernen
    2S7S12S
Abbrechen
SaveOptions
    1S2S3S
_Kategorisierent
Dokument _bearbeiten
Dokument _senden
_Weiterleiten
In Ordner _verschieben...
Aus Ordner _entfernen
    2S7S12S
Abbrechen
SaveOptions
    1S2S3S
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
nProfileStatus
$Language
$LastBuildTime
$BabelInfo
$Info
$WindowTitle
$Script
$$Script_O
$$ScriptName
$$FormScript
$$$FormScript_O
$$ProfileAuthors
$ProfileAuthors_O
$$SubjectOp
$SubjectOp_O
$$ProfileStrings
$ProfileStrings_O
$$ProfileCategories
$ProfileCategories_O
$$ProfileStatus
$ProfileStatus_O
$$ProfileDocType
$ProfileDocType_O
$HLMLastChecked
$Body
$V5ACTIONS
$ACTIONS
cript_O
$$ProfileAuthors
$ProfileAuth
"MS Sans Serif
ResponseBanner
Antwort
formname
Response
    1S2S
    auf HauptdokumentX
formname
Response
    1S2S
    auf AntwortX
FromDocument author name
DateThe date/time when the document was composed
TimeCreatedX
Readers
    1S2S
variable to translate
PrivTxt
Privat
    0R1S2S
end variable to translate
    0R1S
scope
Privat
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Abgelaufen am
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
    Thema:
Subject
    0S0E
SubjectGeben Sie eine kurze Beschreibung dieser Antwort ein.z
Subject
Subject
dspSubject
Kategorie:    X
Categories
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
gen.Xz
Categories
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
6NeLDl
$Info
$$ScriptName
TimeCreated
$Body
$Language
$LastBuildTime
$BabelInfo
DocumentWorkflow
Dokument bearbeitenX
    0S0E
Speichern und schlie
    4R11S17S
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
Zur Pr
fung einreichen
Reviewers
Reviewers
    1S2S3S
Reviewers
Dokumentbibliothek
Bitte geben Sie an, wer das Dokument pr
fen soll.
    0RR6S7S9S15S17S21S
Reviewers
Froma
Dokumentbibliothek
Der Verfasser darf nicht in die Liste der Pr
fer aufgenommen werden.
    0RR9S15S21S23S27S
tmpAction
Submit
    0RR1S2S3S
SaveOptions
    0R1S2S3S
GoToField causes any active embedded objects to de-activate
    0R1S
    0R4S
    0R7S12S>
Status
StatusListv
    5S7S8S
fzyklus einrichtenX8
GetReviewCycle
Status
StatusList
ReviewCycle
ReviewStyle
ReviewWindow
ReviewTime
NotifyAfter
SaveChoices
    1S2S5S6S10S13S18S21S22S23S24S25S26S27S28S30S
ReviewCycle
GetReviewCycle
GetReviewCycle
    0RR1S2S5S6S8S10S14S
ReviewStyle
ReviewCycle
Serial.NoVersions
ReviewCycle
    0RR1S2S3S9S10S12S14S18S
ReviewWindow
ReviewCycle
NoLimit
ReviewCycle
    0R1S2S3S9S10S12S14S20S23S
ReviewTime
ReviewCycle
ReviewCycle
    0R1S2S3S9S10S12S14S20S23S
NotifyAfter
ReviewCycle
Final
ReviewCycle
    0R1S2S3S9S10S12S14S20S23S
SaveChoices
ReviewCycle
ReviewCycle
    0R1S2S3S9S10S12S14S18S
ReviewOptions
fzyklus
    0RR10S12S13S15S20S
Status
StatusList
    0RR1S2S3S9S12S
ReviewCycle
SaveChoices
ReviewStyle
ReviewWindow
ReviewTime
NotifyAfter
SaveChoices
    0R1S2S3S6S7S9S11S14S15S16S17S18S19S20S21S23S
ReviewTime
ReviewWindow
NoLimit
ReviewTimeX
    0RR1S2S3S6S7S9S11S
tmpReviewUnits
ReviewWindow
NoLimit
Tag(en)
    0R1S2S3S6S7S9S11S
$OLEObjProgID
(DocProperties)
foptionen
    0RR6S7Sr
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S
fzyklus l
schen
InReview
Status
StatusListv
    1S2S8S10S11S13S15S
ReviewerList
InReview
CurrentReviewers
    0R1S2S6S8S
Status
StatusList
    0RR1S2S3S7S
ReviewSequence
Alle Pr
fer gleichzeitig
    0R1S2S3S
Versioning
Originaldokument bearbeiten
    0R1S2S3S
NotifyAfter
Verfasser nach jeder Pr
fung benachrichtigen
    0R1S2S3S
Reviewers
    0R1S2S3S
PreviousReviewers
    0R1S2S3S
CurrentReviewers
    0R1S2S3S
FutureReviewers
    0R1S2S3S
$VersionOpt
    0R1S2S3S
InReview
ReviewerList
fung des Dokuments:
Subject
Sie m
ssen dieses Dokument nicht mehr pr
fen. Vielen Dank f
r Ihre M
tmpCurrentUser"
Subject
    0RR4S8S10S12S13S14S16S18S19S20S24S26S27S28S29S33S35S36S37S38S40S41S42S45S
Dokumentbibliothek
Der Pr
fzyklus wurde gel
scht.
    0RR4S6S
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S17S18S19S20S
Meine Pr
fung ist abgeschlossenX
tmpAction
Abgeschlossen
    1S2S3S
SaveOptions
    0R1S2S3S
GoToField causes any active embedded objects to de-activate
    0RR1S
    0R4S
    0R7S12S4
tmpCurrentUser
InProcess
Eigenschaften...J
OLEChgSubject
    7S8S
tmpUseOle
$OLEVersion
    0S1S2E2S3S4S
AbbrechenXJ
SaveOptions
    1S2S3S
Dokument bearbeitenX
    0S0E
edit.gif|edit.gifX
Speichern und schlie
    4R11S17S
save.gif|save.gifX
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
Zur Pr
fung einreichen
Reviewers
Reviewers
    1S2S3S
Reviewers
Dokumentbibliothek
Bitte geben Sie an, wer das Dokument pr
fen soll.
    0RR6S7S9S15S17S21S
Reviewers
Froma
Dokumentbibliothek
Der Verfasser darf nicht in die Liste der Pr
fer aufgenommen werden.
    0RR9S15S21S23S27S
tmpAction
Submit
    0RR1S2S3S
SaveOptions
    0R1S2S3S
GoToField causes any active embedded objects to de-activate
    0R1S
    0R4S
    0R7S12S>
Status
StatusListv
    5S7S8S
SubmitForReview.gif|SubmitForReview.gifX
fzyklus einrichtenX8
GetReviewCycle
Status
StatusList
ReviewCycle
ReviewStyle
ReviewWindow
ReviewTime
NotifyAfter
SaveChoices
    1S2S5S6S10S13S18S21S22S23S24S25S26S27S28S30S
ReviewCycle
GetReviewCycle
GetReviewCycle
    0RR1S2S5S6S8S10S14S
ReviewStyle
ReviewCycle
Serial.NoVersions
ReviewCycle
    0RR1S2S3S9S10S12S14S18S
ReviewWindow
ReviewCycle
NoLimit
ReviewCycle
    0R1S2S3S9S10S12S14S20S23S
ReviewTime
ReviewCycle
ReviewCycle
    0R1S2S3S9S10S12S14S20S23S
NotifyAfter
ReviewCycle
Final
ReviewCycle
    0R1S2S3S9S10S12S14S20S23S
SaveChoices
ReviewCycle
ReviewCycle
    0R1S2S3S9S10S12S14S18S
ReviewOptions
fzyklus
    0RR10S12S13S15S20S
Status
StatusList
    0RR1S2S3S9S12S
ReviewCycle
SaveChoices
ReviewStyle
ReviewWindow
ReviewTime
NotifyAfter
SaveChoices
    0R1S2S3S6S7S9S11S14S15S16S17S18S19S20S21S23S
ReviewTime
ReviewWindow
NoLimit
ReviewTimeX
    0RR1S2S3S6S7S9S11S
tmpReviewUnits
ReviewWindow
NoLimit
Tag(en)
    0R1S2S3S6S7S9S11S
$OLEObjProgID
(DocProperties)
foptionen
    0RR6S7Sr
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S
SetupReviewCycle.gif|SetupReviewCycle.gifX
fzyklus l
schen
InReview
Status
StatusListv
    1S2S8S10S11S13S15S
ReviewerList
InReview
CurrentReviewers
    0R1S2S6S8S
Status
StatusList
    0RR1S2S3S7S
ReviewSequence
Alle Pr
fer gleichzeitig
    0R1S2S3S
Versioning
Originaldokument bearbeiten
    0R1S2S3S
NotifyAfter
Verfasser nach jeder Pr
fung benachrichtigen
    0R1S2S3S
Reviewers
    0R1S2S3S
PreviousReviewers
    0R1S2S3S
CurrentReviewers
    0R1S2S3S
FutureReviewers
    0R1S2S3S
$VersionOpt
    0R1S2S3S
InReview
ReviewerList
fung des Dokuments:
Subject
Sie m
ssen dieses Dokument nicht mehr pr
fen. Vielen Dank f
r Ihre M
tmpCurrentUser"
Subject
    0RR4S8S10S12S13S14S16S18S19S20S24S26S27S28S29S33S35S36S37S38S40S41S42S45S
Dokumentbibliothek
Der Pr
fzyklus wurde gel
scht.
    0RR4S6S
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S17S18S19S20S
ClearReviewCycle.gif|ClearReviewCycle.gifX
Meine Pr
fung ist abgeschlossenX
tmpAction
Abgeschlossen
    1S2S3S
SaveOptions
    0R1S2S3S
GoToField causes any active embedded objects to de-activate
    0RR1S
    0R4S
    0R7S12S4
tmpCurrentUser
InProcess
MyRevIsComplete.gif|MyRevIsComplete.gifX
Eigenschaften...J
OLEChgSubject
    7S8S
tmpUseOle
$OLEVersion
    0S1S2E2S3S4S
properties.gif|properties.gifX
AbbrechenXJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
Use "OLERoutines"
'++LotusScript Development Environment:2:5:(Forward):0:1
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
Declare Sub Postopen(Source As Notesuidocument)
Declare Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
Declare Sub Postmodechange(Source As Notesuidocument)
Declare Sub Querysave(Source As Notesuidocument, Continue As Variant)
Declare Sub Queryclose(Source As Notesuidocument, Continue As Variant)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As NOTESUIDOCUMENT
     Set Source = Bind(Objectname_)
     On Event Queryopen From Source Call Queryopen
     On Event Postopen From Source Call Postopen
     On Event Querymodechange From Source Call Querymodechange
     On Event Postmodechange From Source Call Postmodechange
     On Event Querysave From Source Call Querysave
     On Event Queryclose From Source Call Queryclose
End Sub
'++LotusScript Development Environment:2:2:Queryopen:1:12
Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
     Call DocQueryOpen(source, mode, isnewdoc, continue)
End Sub
'++LotusScript Development Environment:2:2:Postopen:1:12
Sub Postopen(Source As Notesuidocument)
     Call DocPostOpen(source)
End Sub
'++LotusScript Development Environment:2:2:Querymodechange:1:12
Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
     If Not(source.InPreviewPane) Then
          Call DocQueryModeChange(source, continue)
     Else
          continue = False
     End If
End Sub
'++LotusScript Development Environment:2:2:Postmodechange:1:12
Sub Postmodechange(Source As Notesuidocument)
     Call DocPostModeChange(source)
End Sub
'++LotusScript Development Environment:2:2:Querysave:1:12
Sub Querysave(Source As Notesuidocument, Continue As Variant)
     If Not(source.InPreviewPane) Then Call DocQuerySave(source, continue)
End Sub
'++LotusScript Development Environment:2:2:Queryclose:1:12
Sub Queryclose(Source As Notesuidocument, Continue As Variant)
     If Not(source.InPreviewPane) Then Call DocQueryClose(source, continue)
End Sub
    DocumentWorkflow Subform
    :  This Subform includes the LotusScript, Actions, and hidden fields which are used in all versions of the Document form.X
    Hidden Fields:-------------------------------------------------------------------X
DocumentAuthors
    4S6S
DocumentAuthorsX
Scope
Private
Reviewers
    3S4S6S7S8S10SDocumentReadersX
LastEditor
Document
Paintbrush Document
DocumentAuthors
    3S4S7S8S9S10StmpUseOLEX
$OLEObjField
OLEBody
$OLEObjRichTextField
Lotus Product
Lotus Product
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$$ScriptName
$ACTIONS
$V5ACTIONS
$Script
$$FormScript
$Body
OLERoutines
$$Script_O
$$$FormScript_O
$Language
$LastBuildTime
$BabelInfo
 DocProperties
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Exiting(Source As Field)
'++LotusScript Development Environment:2:5:(Declarations):0:2
'++LotusScript Development Environment:2:2:BindEvents:1:129
Private Sub BindEvents(Byval Objectname_ As String)
     Static Source As FIELD
     Set Source = Bind(Objectname_)
     On Event Exiting From Source Call Exiting
End Sub
'++LotusScript Development Environment:2:2:Exiting:1:12
Sub Exiting(Source As Field)

End Sub
Scope
Public
tmpUseOle
    1S2S3S2E4S5S2E6S
Status
StatusListv
    4S6S7S8S9S
fer:
Reviewers
Reviewers
ReviewersX
Status
StatusListv
PreviousReviewers
Keiner
    4S6S7S8S9S10S11S12S13S
    Bereits gepr
ft von:    X
PreviousReviewers
PreviousReviewersX
Status
StatusListv
    4S6S7S8S9S
    Aktueller Pr
fer:
CurrentReviewers
CurrentReviewers
Status
StatusListv
FutureReviewers
Keiner
    4S6S7S8S9S10S11S12S13S
    Wird noch gepr
ft von:    X
FutureReviewers
FutureReviewersX
Status
StatusListv
Status
StatusListv
    4S6S7S8S9S13S15S16S17S18S
fart:    X
ReviewStyle
ReviewStyle
Serielle Pr
fung | Serial.NoVersionsSeriell (Alle
nderungen bewahren) | Serial.VersionsDokumentreservierungen | Parallel.NoVersionsAntwortpr
fung | Parallel.VersionsX
    Frist:
ReviewWindow
ReviewWindow
Keine Frist f
r jede Pr
fung | NoLimitZum n
chsten Pr
fer wechseln nach: | MoveOnErinnerungen senden nach: | ReminderX
ReviewTime
ReviewTime
ReviewWindow
NoLimit
Tag(en)
    3S4S6S8S
tmpReviewUnits
    Benachrichtigung:X
NotifyAfter
NotifyAfter
Verfasser nach jeder Pr
fung benachrichtigen | EachVerfasser nach der letzten Pr
fung benachrichtigen | Final
    ....................
ReviewerLog
    1S2S3S4S
fprotokoll
ReviewerLog
    1S2S
ReviewerLog
ReviewerLogX
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
TimeCreated
$Info
$$Script_O
$$ScriptName
ReviewTime
$$Reviewers
$Body
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
 $45,
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
$36Ge
ndert
$43Titel
DocumentG
Status
StatusY
Subject
$VersionOpt
Subject
  (Originaldokument im Pr
fzyklus)"
ReviewStyle
ParallelG
Subject
  (Gepr
ft von
LastEditor"
Subject
  (Gepr
ft von
PreviousReviewers
Archive
Subject
Subject
(Antwort auf
OriginalSubject
Subject
 (Antwort auf "
OriginalSubject
    6S9RS4E12S13S14S15S20RS8E22RS4E27RS8E28S29S31RS4E35S38RS9E39S40S41S42S2E43S44S46RS4E47S48S49S50S56S57S60R64S67RS4E69R70S71S73RS5E74S75S76S79R80S81S82S83S84S85S&
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
Neue AntwortF
views only
Response
    0R4S
Neue R
ckantwort6
Response to Response
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
NewDoc.gif|NewDoc.gifX
Neue AntwortF
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort6
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Index
$FormulaClass
$Formula
$VIEWFORMAT
$ACTIONS
$V5ACTIONS
$Language
$LastBuildTime
$BabelInfo
Categories$54$25
Subject
$25$53
$53$25YT
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesNach Kategorie|By Category
Categories$54$51$52Subject$25$53$Conflict$REF
Categories
Categories
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Original von
ReviewStyle
fung durch
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
forma
archive
    L1S9Sde-DE
00000176##################################################
$SUBVIEW1
$54$25
Subject
$25$53
$53$25Yd
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes($All)|($All)
$54$51$52Subject$25$53$Conflict$REF
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Original von
ReviewStyle
fung durch
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
    L1Sde-DElZK
00000172######
CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesSfL3Process Late ReviewsW
hlt alle Dokumente, die
berpr
ft werden und dabei abgelaufene F
lligkeitsdaten aufweisen. Je nach Pr
fart wird das Dokument an den n
chsten Pr
fer weitergeleitet, als 'Abgeschlossen' markiert, oder es wird eine Nachricht an den aktuellen Pr
fer gesendet, da
 die Pr
fung
llig ist.de-DEVgK
00000186
############################
Lotus NotesCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes(Unlock Document)F
r versehentlich gesperrte Dokumente. Entwickler und Manager k
nnen
ber die Ansicht 'Pr
fstatus' darauf zugreifen.de-DE
000001B2
########################
cancel.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
cancel.gifcancel.gifaction barde-DE
000001BA################################
edit.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
edit.gifedit.gifaction barde-DE
000001C2######################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
Debbie BrancoCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesG3Hauptnavigatorde-DEcaK
0000017E######
mark doc as expired.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkDocAsExpired.gifMarkDocAsExpired.gifaction barde-DE
000001C6
##########################################################
mark private.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPrivate.gifMarkPrivate.gifaction barde-DE
000001CA################
mark public.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPublic.gifMarkPublic.gifaction barde-DE8iK
000001CE###################
my review is complete.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MyRevIsComplete.gifMyRevIsComplete.gifaction barde-DEwiK
000001D2
##########################################################
new document.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewDoc.gifNewDoc.gifactoin barde-DE
000001D6##########################
##########################################################
##########################################################
clear review cycle.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
ClearReviewCycle.gifClearReviewCycle.gifaction barde-DEGhK
000001BE
new response.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewResp.gifNewResp.gifaction barde-DEqjK
000001E2########################
save.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
save.gifsave.gifaction barde-DE
000001E6######################################
QoeH7
properties.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
properties.gifproperties.gifaction barde-DE
000001EE####################
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesm34DoclibOfficeOutlinede-DE
0000030A
##########################################################
DoclibDocHeader.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibDocHeader.gifDoclibDocHeader.gifused in main and resp formsde-DEMkK
000002EE####################################################
##########################################################
##########################################################
##########################################################
##########################################################
new response to main.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewRespToMain.gifNewRespToMain.gifaction barde-DE
000001DA####
new response to response.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewRespToResp.gifNewRespToResp.gifactoin barde-DE5jK
000001DE
34CiQpeanutbutter_files.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Arch.gifArch.gifde-DEckK
000002F2#########################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
submit for review.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
SubmitForReview.gifSubmitForReview.gifaction barde-DE
000001EA###
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes$ACTIONSde-DE
0000031A#################################################
setup review cycle.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
SetupReviewCycle.gifSetupReviewCycle.gifaction barde-DE
000001F2
DoclibOutline.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibOutline.gifDoclibOutline.gifOutline frame graphicde-DE'kK
000001F6
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
 Status  $40
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Original von
ReviewStyle
fung durch
LastEditor
Subject
Subject
    6S9RS4E16RS9E22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
SubjectTitelFromErstellt von$26Pr
CurrentReviewers
FutureReviewers
Keiner
    5S6S8S10SDueDateTimeF
llig am&
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
Neue AntwortF
views only
Response
    0R4S
Neue R
ckantwort6
Response to Response
Sperrung des Dokuments aufhebenX4
(Unlock Document)
Server
    1S2S6S
    0R1S2S6S
Server
    0R7S8S11S13S14S15S16S
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
NewDoc.gif|NewDoc.gifX
Neue AntwortF
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort6
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
Sperrung des Dokuments aufhebenX4
(Unlock Document)
Server
    1S2S6S
    0R1S2S6S
Server
    0R7S8S11S13S14S15S16S
MarkPublic.gif|MarkPublic.gifX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
X{0o:
$Index
$FormulaClass
$Formula
$VIEWFORMAT
$ACTIONS
$V5ACTIONS
$Language
$LastBuildTime
$BabelInfo
 $54Datum
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Original von
ReviewStyle
fung durch
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
SubjectTitel$25Ge
ndert
$53Autor,
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
Neue AntwortF
views only
Response
    0R4S
Neue R
ckantwort6
Response to Response
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
NewDoc.gif|NewDoc.gifX
Neue AntwortF
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort6
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Index
$FormulaClass
$Formula
$VIEWFORMAT
$ACTIONS
$V5ACTIONS
$Language
$LastBuildTime
$BabelInfo
 Categories"
Categories
Categories
$54Datum
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Original von
ReviewStyle
fung durch
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
SubjectTitel$25Ge
ndert
$53Autor,
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
Neue AntwortF
views only
Response
    0R4S
Neue R
ckantwort6
Response to Response
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
NewDoc.gif|NewDoc.gifX
Neue AntwortF
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort6
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Index
$FormulaClass
$Formula
$VIEWFORMAT
$ACTIONS
$V5ACTIONS
$Language
$LastBuildTime
$BabelInfo
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
$30Titel
DocumentG
Status
StatusY
Subject
$VersionOpt
Subject
  (Originaldokument im Pr
fzyklus)"
ReviewStyle
ParallelG
Subject
  (Gepr
ft von
LastEditor"
Subject
  (Gepr
ft von
PreviousReviewers
Archive
Subject
Subject
(Antwort auf
OriginalSubject
Subject
 (Antwort auf "
OriginalSubject
    6S9RS4E12S13S14S15S20RS8E22RS4E27RS8E28S29S31RS4E35S38RS9E39S40S41S42S2E43S44S46RS4E47S48S49S50S56S57S60R64S67RS4E69R70S71S73RS5E74S75S76S79R80S81S82S83S84S85S$27Datum
FromAutor&
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
Neue AntwortF
views only
Antwort
    0R4S
Neue R
ckantwort.
ckantwort
_KategorisierenX
Dokument _bearbeiten
Dokument _senden
_WeiterleitenX
In Ordner _verschieben...X
Aus Ordner _entfernen...
Neues Dokument*
Document
NewDoc.gif|NewDoc.gifX
Neue AntwortF
views only
Antwort
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort.
ckantwort
NewRespToResp.gif|NewRespToResp.gifX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Name
$Index
$FormulaClass
$Formula
$VIEWFORMAT
$ACTIONS
$V5ACTIONS
$Language
$LastBuildTime
$BabelInfo
($All)
TextBox1Alle Dokumente
TextBox2Nach Autor
TextBox3Meine FavoritenX
TextBox4Nach Pr
fstatusX
TitleDokumente:X
AllDocsX
($All)
ByAuthor
By AuthorX
ByStatus
Review StatusX
MyFavDocsX
Meine Favoriten-DokumenteX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ViewMapDataset
$ViewMapLayout
$Language
$LastBuildTime
$BabelInfo
'++LotusScript Development Environment:2:5:(Options):0:74
Option Public
Option Declare
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Initialize
Declare Sub SetSharedVariables
Declare Sub RenderExpireDate(doc As notesdocument)
Declare Function CheckArchiveProtection As Integer
Declare Sub Terminate
'++LotusScript Development Environment:2:5:(Declarations):0:10
'Mark/Unmark Document As Expired:
'Copy Of Mark/Unmark Documents As Expired:
'Mark/Unmark Expired Documents:
Dim UIwork As NotesUIWorkspace
Dim UIview As NotesUIView
Dim Session As NotesSession
Dim db As notesdatabase
Dim doc As notesdocument
Dim UIdoc As notesuidocument
Dim collection As NotesDocumentCollection
Dim i As Integer
Dim PFA As Variant
Dim FormItem As Variant
Dim ExDate As Variant
Dim ExQues As Variant
Dim Subj As Variant
'The following variables are available to be translated
Const Msg1 ="Dieses Dokument vom Typ ' "
Const Msg2 =" ' kann nicht als 'Abgelaufen' markiert werden."
Const Msg3 = " ' wurde bereits als 'Abgelaufen' markiert. M
chten Sie die Ablaufmarkierung l
schen?"
Const Msg4 = "Die angeforderte Aktion wurde abgeschlossen. Die
nderungen werden erst nach dem Speichern des Dokuments wirksam."
Const Msg5 = "Sie m
ssen zuerst ein Dokument ausw
hlen. Hinweis: Die hervorgehobene Zeile darf keine Kategorie sein."
Const msg6 = "Das Dokument wurde noch nicht gespeichert."
Const BoxTitle ="Bereits als 'Abgelaufen' markiert."
Const BoxTitle2 ="Ablauf nicht zul
ssig"
Const msg7 = "Dokumente k
nnen nicht als Abgelaufen markiert werden, da f
r diese Datenbank noch keine Archivierung eingerichtet wurde. W
hlen Sie 'Datei - Datenbank - Archiv', oder klicken Sie auf die Schaltfl
che 'Archivieren' in der InfoBox 'Eigenschaften: Datenbank'."
'End translatable variables
'++LotusScript Development Environment:2:2:Initialize:1:10
Sub Initialize
    Set UIwork = New notesuiworkspace
    Set uiview = uiwork.currentview
    Set session = New NotesSession
    Set db = session.CurrentDatabase
    Set collection = db.UnprocessedDocuments
    Set UIdoc = UIwork.currentdocument
    Dim archProfile As notesdocument
    Set archProfile = db.getprofiledocument("Archivprofil")
    If Not archProfile.hasitem("Enabled") Then
        Msgbox Msg7
        Exit Sub
    End If
    If collection.Count < 1 Then
        Msgbox Msg5
        Exit Sub
    End If
    If uidoc Is Nothing Then
        Goto continue
    Elseif uidoc.isnewdoc Then
        Msgbox Msg6
        Exit Sub
    End If
continue:
    If Not UIdoc Is Nothing And UIview Is Nothing Then
        Set doc = uidoc.document
        Call SetSharedVariables
        If Not(CheckArchiveProtection) Then
            UIWork.editdocument(True)
            Call RenderExpireDate(doc)
            ExQues = doc.GetItemvalue("ExpireQuestion")
            UIdoc.refresh
        End If
    Else
        For i = 1 To collection.Count
            Set doc = collection.GetNthDocument( i )
            Call SetSharedVariables
            If Not(CheckArchiveProtection) Then
                Call RenderExpireDate(doc)
                Call doc.save(True, True, True)
            End If
        Next
    End If
End Sub
'++LotusScript Development Environment:2:2:SetSharedVariables:1:8
Sub SetSharedVariables
    FormItem=doc.GetItemValue("Form")
    ExDate=doc.GetItemValue("ExpireDate")
    PFA = doc.HasItem( "PROTECTFROMARCHIVE" )
    Subj=doc.GetitemValue("Subject")
End Sub
'++LotusScript Development Environment:2:2:RenderExpireDate:1:8
Sub RenderExpireDate(doc As notesdocument)
    Dim UIwork As New notesuiworkspace
    If Not ExDate(0) =""  Then
        ExQues = Messagebox (Subj(0) & Msg3, 4 + 32 + 0 , BoxTitle)
        Select Case ExQues
        Case     Is = 2
            Exit Sub
        Case Is = 6
            Call doc.ReplaceItemvalue("ExpireDate", "")
            If Not UIdoc Is Nothing Then
                Print Msg4
            End If
        Case Is = 7
            Exit Sub
        End Select
    Else
        Call doc.ReplaceItemValue ( "ExpireDate", Now)
        If Not UIdoc Is Nothing Then
            Print Msg4
        End If
    End If
End Sub
'++LotusScript Development Environment:2:1:CheckArchiveProtection:1:8
Function CheckArchiveProtection As Integer
    If PFA Then
        Messagebox Msg1 & FormItem(0) & Msg2 , 0 + 64, BoxTitle2
    End If
    CheckArchiveProtection = PFA
End Function
'++LotusScript Development Environment:2:2:Terminate:1:10
Sub Terminate
End Sub
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$AssistType
$AssistLastRun
$AssistDocCount
$AssistFlags
$AssistTrigger
$AssistInfo
$AssistAction
$AssistQuery
$AssistAction_Ex
$Language
$LastBuildTime
$BabelInfo
'++LotusScript Development Environment:2:5:(Options):0:66
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Initialize
Declare Sub Terminate
Declare Sub Main
Declare Sub GetProfileSettings
Declare Sub CreateLogDocument
Declare Sub ProcessDocuments
Declare Sub EvaluateDocument
Declare Sub ArchiveDocument
Declare Sub FixReaderNames
Declare Sub AddDocumentToLog
Declare Sub CloseLogDocument
Declare Sub MarkLogDocuments
'++LotusScript Development Environment:2:5:(Declarations):0:10
'%INCLUDE "lserr.lss"
'%INCLUDE "lsxbeerr.lss"
Const MAXARCHIVEITEMS = 50
Dim session As NotesSession
Dim dbSource As NotesDatabase
Dim dbArchive As NotesDatabase
Dim docSource As NotesDocument
Dim docArchive As NotesDocument
Dim docLog As NotesDocument
Dim docProfile As NotesDocument
Dim viewArchive As NotesView
Dim dtNow As NotesDateTime
Dim dtExpired As NotesDateTime
Dim dtDocument As NotesDateTime
Dim dtCompare As NotesDateTime
Dim docsCollection As NotesDocumentCollection
Dim rtitem As NotesRichTextItem
Dim item As NotesItem
Dim nidArray() As String
Dim SourcePath As String
Dim SourceServer As String
Dim ArchiveServer As String
Dim ArchivePath As String
Dim ArchiveLog As String
Dim IncludeDocLinks As String
Dim ArchiveExpired As String
Dim ArchiveInactive As String
Dim ExpiredLife As Integer
Dim DocumentLife As Integer
Dim nLogItems As Integer
Dim numDocs As Integer
Dim numDocsArchived As Integer
Dim i As Integer
Dim DoNotRun As Variant
Dim DocCanBeArchived As Variant
'++LotusScript Development Environment:2:2:Initialize:1:10
Sub Initialize
     'initialize some variables
     Set session = New NotesSession
     Set dbSource = session.CurrentDatabase
     Redim nidArray(5)
     nLogItems = 0
     numDocsArchived = 0
     'call the main entry point
     Main
End Sub
'++LotusScript Development Environment:2:2:Terminate:1:10
Sub Terminate

End Sub
'++LotusScript Development Environment:2:2:Main:1:8
Sub Main
'Read the profile document to see what options are enabled and where databases are located
     GetProfileSettings
     If DoNotRun Then Exit Sub

'setup the date/time structures
     Set dtNow = New NotesDateTime("")
     Set dtExpired = New NotesDateTime("")
     Set dtDocument = New NotesDateTime("")
     Set dtCompare = New NotesDateTime("")
     dtNow.SetNow
     dtExpired.SetNow
     dtDocument.SetNow
     dtCompare.SetNow
     If ArchiveExpired = "Yes" Then dtExpired.AdjustDay(ExpiredLife * -1)
     If ArchiveInactive = "Yes" Then dtDocument.AdjustDay(DocumentLife * -1)

'open the archive database
     Set dbArchive = New NotesDatabase(ArchiveServer,ArchivePath)
     If Not (dbArchive.IsOpen) Then
          Messagebox "Archiv-Datenbank konnte nicht ge
ffnet werden.",16,"Fehler"
          Exit Sub
     End If

     'see if we are logging documents, if we are, then create the first one
     If ArchiveLog = "Yes" Then CreateLogDocument
     'process the documents in the database
     'this finds all documents that needs to be archived, archives them, logs them (if necessary), and removes them from this database
     ProcessDocuments
     'mark the log documents in terms of x out of y
     If ArchiveLog = "Yes" Then MarkLogDocuments
End Sub
'++LotusScript Development Environment:2:2:GetProfileSettings:1:8
Sub GetProfileSettings
     'reads the profile document
     Set view = dbSource.GetView("Archiving")
     key = "Archivprofil"
     Set docProfile = view.GetDocumentByKey(key,False)
     If docProfile Is Nothing Then
          'there is no profile document so exit
          DoNotRun = True
     Elseif docProfile.ArchivePath(0) = "" Then
          'there is no archive database
          Msgbox "Sie m
ssen einen Speicherort f
r die Archivdatenbank angeben.",16,"Fehler"
          DoNotRun = True
     Else
          DoNotRun = False
          ArchiveExpired = docProfile.ArchiveExpired(0)
          ArchiveInactive = docProfile.ArchiveInactive(0)
          DocumentLife = docProfile.DocumentLife(0)
          ExpiredLife = docProfile.ExpiredLife(0)
          ArchiveServer = docProfile.ArchiveServer(0)
          ArchivePath = docProfile.ArchivePath(0)
          ArchiveLog = docProfile.ArchiveLog(0)
          IncludeDocLinks = docProfile.IncludeDocLinks(0)
     End If
End Sub
'++LotusScript Development Environment:2:2:CreateLogDocument:1:8
Sub CreateLogDocument
     'creates a new log document, incrementing the counter
     Set docLog = New NotesDocument(dbSource)
     Set rtitem = New NotesRichTextItem(docLog, "Body")
     docLog.Form = "Archive Log"
     dtNow.SetNow
     docLog.ArchiveDate = dtNow.LSLocalTime
     docLog.ProtectFromArchive = 1
     docLog.ExcludeFromView = "D"
     docLog.From = "Archiving"
     docLog.Categories = "(Archiv)"
     docLog.ReplaceItemValue "_ViewIcon", 22
     nLogItems = nLogItems + 1
     'see if we need to redim the array
     If nLogItems Mod 6 = 0 Then Redim Preserve nidArray(nLogItems + 4)
End Sub
'++LotusScript Development Environment:2:2:ProcessDocuments:1:8
Sub ProcessDocuments
     'get a handle to all of the documents in the database
     Set docsCollection = dbSource.AllDocuments
     numDocs = docsCollection.Count
     For i =1 To numDocs
          Set docSource = docsCollection.GetNthDocument(i)
          'see if this document can be archived
          EvaluateDocument
          If DocCanBeArchived Then
               'archive this document
               ArchiveDocument
               If ArchiveLog = "Yes" Then AddDocumentToLog
               docSource.Remove True
          End If
          'see if we have hit the maximum number of entries in a log document; if so close the existing one and create a new one
          If (numDocsArchived Mod MAXARCHIVEITEMS = 0) And (numDocsArchived > 0) Then
               If ArchiveLog = "Yes" Then
                    CloseLogDocument
                    CreateLogDocument
               End If
          End If
     Next
     'we are done processing all of the documents, close the last log document (if necessary)
     If ArchiveLog = "Yes" Then CloseLogDocument
End Sub
'++LotusScript Development Environment:2:2:EvaluateDocument:1:8
Sub EvaluateDocument
     'checks to see if a document should be archived or not
     DocCanBeArchived = False
     'see if this document is protected from archiving
     If docSource.HasItem("ProtectFromArchive") Then
          If docSource.ProtectFromArchive(0) = 1 Then Exit Sub
     End If

'look for a $NoPurge item; if it is a date, compare it to today;
     If (docSource.HasItem("$NoPurge")) Then
          Set Purge = docSource.GetFirstItem("$NoPurge")
          If (Purge.Type = DATETIMES) Then
               Set enddt = New NotesDateTime("")
               Set enddt = Purge.DateTimeValue
               Set nowdt = New NotesDateTime("")
               nowdt.SetNow
               If enddt.TimeDifference(nowdt) >= 0 Then Exit Sub
          Else
               Exit Sub
          End If
     End If

     'see if we should archive documents that expire
     If ArchiveExpired = "Yes" Then
          If docSource.HasItem("ExpireDate") Then
               Set item = docSource.GetFirstItem("ExpireDate")
               Set dtCompare = item.DateTimeValue
               If dtCompare Is Nothing Then
                    Set dtCompare = New NotesDateTime("")
                    dtCompare.SetNow
               Else
                    If dtExpired.TimeDifference(dtCompare) >= 0 Then
                         DocCanBeArchived = True
                         Exit Sub ' we exit here so that we don't archive this document again
                    End If
               End If
          End If
     End If
     'see if we should archive documents that are inactive
     If ArchiveInactive = "Yes" Then
          dtCompare.LSLocalTime = docSource.LastAccessed
          If dtDocument.TimeDifference(dtCompare) >= 0 Then DocCanBeArchived = True
     End If
End Sub
'++LotusScript Development Environment:2:2:ArchiveDocument:1:8
Sub ArchiveDocument
     'copies the source document into the archive database
$Archived and DateArchived might already be present, if this agent failed the last
time it was run.  None of these fields should be on the archived copy, because we
don't want the archive database to inadvertantly archive these documents (it can
archive, but it needs to use its own criteria)
%END REM

     If docSource.HasItem("$Archived") Then docSource.RemoveItem("$Archived")
     If docSource.HasItem("DateArchived") Then docSource.RemoveItem("DateArchived")
     If docSource.HasItem("ExpireDate") Then docSource.RemoveItem("ExpireDate")
     FixReaderNames
     docSource.Save True, True
     Set docArchive = docSource.CopyToDatabase(dbArchive)
     docSource.DateArchived = dtNow.LSLocalTime
     Call docSource.AppendItemValue("$Archived", True)
     docSource.Save True, True
     numDocsArchived = numDocsArchived + 1
End Sub
'++LotusScript Development Environment:2:2:FixReaderNames:1:8
Sub FixReaderNames
     'if the reader access fields are blank, remove them
     If docSource.HasItem("Readers") Then
          If docSource.Readers(0) = "" Then docSource.RemoveItem("Readers")
     End If
     If docSource.HasItem("DocumentReaders") Then
          If docSource.DocumentReaders(0) = "" Then docSource.RemoveItem("DocumentReaders")
     End If

End Sub
'++LotusScript Development Environment:2:2:AddDocumentToLog:1:8
Sub AddDocumentToLog
     'only called if a document was archived and logging was enabled
     If IncludeDocLinks = "Yes" Then
          'the user wants a doclink to the new archived document
          Call rtitem.AppendDocLink(docArchive, "Dokumentverkn
pfung mit " & docSource.Subject(0))
          Call rtitem.AddTab(1)
     End If
     Call rtitem.AppendText("     " & docSource.Subject(0) & " (erstellt von " & docSource.From(0) &   " am " &_
     Format(docSource.Created, "Short Date") & ")")
     Call rtitem.AddNewLine(2)
End Sub
'++LotusScript Development Environment:2:2:CloseLogDocument:1:8
Sub CloseLogDocument
     'saves the log document, adds the note id to the array,
     docLog.Save True, True
     nidArray(nLogItems) = docLog.NoteID
End Sub
'++LotusScript Development Environment:2:2:MarkLogDocuments:1:8
Sub MarkLogDocuments
     'finds all of the log documents just created and marks them in terms of x out of y
     For i = 1 To nLogItems
          Set docLog = dbSource.GetDocumentByID(nidArray(i))
          If Not (docLog Is Nothing) Then
               docLog.Subject = "Protokolldokument " &Cstr(i) & " von " & Cstr(nLogItems) & " (" & Format(docLog.Created, "General Date") & ")"
               docLog.LogCount = Cstr(i)
               docLog.LogTotal = Cstr(nLogItems)
               docLog.ArchiveTrailer = "Archivprotokoll " & Cstr(i) & "von " & Cstr(nLogItems) & " f
r Dokumente auf Server " & _
               ArchiveServer & " von " & dbSource.Title & " (" & dbSource.FilePath & ") bis " & dbArchive.Title & _
               " (" & ArchivePath & ") erfolgreich abgeschlossen am " & _
               Format(dtNow.LSLocalTime, "Short Date") & " um " & _
               Format(dtNow.LSLocalTime, "Long Time") & _
               ".  Abgelaufene Dokumente werden nach " & ExpiredLife & _
               " Tagen archiviert.  Alle anderen Dokumente werden nach " & DocumentLife & " Tagen archiviert, wenn auf sie nicht zugegriffen wird."
               docLog.Save True,True
               Call docLog.CopyToDatabase(dbArchive)
          End If
     Next
End Sub
Lotus Product
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
~;7"H
$AssistType
$AssistLastRun
$AssistDocCount
$AssistFlags
$AssistTrigger
$AssistInfo
$AssistAction
$AssistQuery
$AssistAction_Ex
$Language
$LastBuildTime
$BabelInfo
Tm_,jedS
'++LotusScript Development Environment:2:5:(Options):0:66
Option Public
'++LotusScript Development Environment:2:5:(Forward):0:1
Declare Sub Initialize
Declare Sub SendReminder(EmailType)
Declare Sub MoveToNextReviewer
'++LotusScript Development Environment:2:5:(Declarations):0:10
Dim s As NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim documents As NotesDocumentCollection
Dim note As NotesDocument
Dim parent As NotesDocument
Dim emaildoc As NotesDocument
Dim dt As NotesDateTime
Dim item As NotesItem
Dim rtitem As NotesRichTextItem
Dim CurrentReviewers As Variant
Dim FutureReviewers As Variant
Dim ReviewSeq As Variant
Dim ReviewWindow As Variant
Dim NewList() As Variant
Dim ListMax As Integer
Dim NextReviewer As Variant
Dim OldDueDate As Variant
'++LotusScript Development Environment:2:2:Initialize:1:10
Sub Initialize

     Set s = New NotesSession
     Set db = s.CurrentDatabase
     Set dt = New NotesDateTime("")
     dt.SetNow
     Set documents = db.Search("@Today => @Date(DueDateTime) & Status = ""In Review""", Nothing, 0)
     If documents.Count = 0 Then Exit Sub

     For d = 1 To documents.Count
          Set note = documents.GetNthDocument(d)
          ReviewWindow = note.ReviewWindow
          Select Case ReviewWindow(0)
          Case "MoveOn"
               MoveToNextReviewer
               SendReminder("WindowExpired")
               If ReviewSeq = "Serial" Then
                    If FutureReviewers(0) <> "None" Then SendReminder("NotifyNextReviewer")
               End If
          Case "Reminder"
               CurrentReviewers = note.CurrentReviewers
               SendReminder("Reminder")
          End Select
          If note.IsResponse Then
               note.RemoveItem("DueDateTime")
               note.Save True, True
          End If
     Next

End Sub
'++LotusScript Development Environment:2:2:SendReminder:1:8
Sub SendReminder(EmailType)

     If note.IsResponse Then Exit Sub

     Set maildoc = New NotesDocument(db)
     Set rtitem = New NotesRichTextItem(maildoc, "Body")
     maildoc.InheritedSubject = note.Subject
     maildoc.InheritedDbTitle = db.Title

     Select Case EmailType
     Case "Reminder"
          maildoc.SendTo = CurrentReviewers
          maildoc.Subject = "Pr
fung des Dokuments
llig"
          maildoc.FlowStatus = "Bitte schlie
en Sie Ihre Pr
fung des Dokuments ab. Sie werden diese Mitteilungen solange erhalten, bis die Pr
fung abgeschlossen ist."
          Call rtitem.AppendDocLink(note, "Verkn
pfung mit
berfalligem Dokument")
          maildoc.DueDateTime = OldDueDate
     Case "WindowExpired"
          maildoc.SendTo = CurrentReviewers
          maildoc.Subject = "Pr
ffrist f
r Dokument abgelaufen"
          maildoc.FlowStatus = "Ihre Frist f
r die Pr
fung dieses Dokuments ist abgelaufen."
          Call rtitem.AppendDocLink(note, "Verkn
pfung mit
berfalligem Dokument")
          maildoc.DueDateTime = OldDueDate
     Case "NotifyNextReviewer"
          maildoc.SendTo = note.CurrentReviewers
          maildoc.Subject = "Dokument mu
 gepr
ft werden"
          maildoc.FlowStatus = "Bitte nehmen Sie sich die Zeit, dieses Dokument noch vor der unten angegebenen Frist zu pr
fen."
          Call rtitem.AppendDocLink(note, "Verkn
pfung mit zu pr
fendem Dokument")
          maildoc.DueDateTime = note.DueDateTime
     End Select

     maildoc.Form = "Bookmark"
     On Error Resume Next
     Call maildoc.Send (False)

End Sub
'++LotusScript Development Environment:2:2:MoveToNextReviewer:1:8
Sub MoveToNextReviewer

     ListMax = 0
     Set dt = New NotesDateTime("")
     dt.SetNow
     ReviewStyle = note.ReviewStyle
     position = Instr(ReviewStyle(0), ".")
     ReviewSeq = Left(ReviewStyle(0), position - 1)
     Versioning = Mid(ReviewStyle(0), position + 1)
     OldDueDate = Datevalue(note.DueDateTime(0))
     dt.LSLocalTime = OldDueDate
     ReviewerLogEntry = "Pr
ffrist abgelaufen am " & Format(dt.LSLocalTime, "Short Date") & " , ohne da
 die Pr
fung abgeschlossen wurde von  "
     dt.SetNow

     Select Case ReviewSeq
     Case "Parallel"
'For Response Reviews, we maintain the status in the parent so remove these
          If note.IsResponse Then
               note.RemoveItem("PreviousReviewers")
               note.RemoveItem("CurrentReviewers")
               note.RemoveItem("FutureReviewers")
          Else
'If it is a parent, move CurrentReviewers to PreviousReviewers and set CurrentReviewers to "None"
               CurrentReviewers = note.CurrentReviewers
               LateReviewers = Evaluate("@Implode(CurrentReviewers; "", "")", note)
               Set item = note.GetFirstItem("ReviewerLog")
               item.AppendToTextList(ReviewerLogEntry & LateReviewers(0))
               PreviousReviewers = note.PreviousReviewers
               If PreviousReviewers(0) = "None" Then
                    note.PreviousReviewers = CurrentReviewers
               Else
                    Set item = note.GetFirstItem("PreviousReviewers")
                    item.AppendToTextList(CurrentReviewers)
               End If
               note.CurrentReviewers = "None"
          End If
          note.InProcess = "None"
          note.Status = "Pr
fung abgeschlossen"
          note.RemoveItem("DueDateTime")
          note.DocumentAuthors = note.From
     Case "Serial"
          CurrentReviewers = note.CurrentReviewers
          Set item = note.GetFirstItem("ReviewerLog")
          item.AppendToTextList(ReviewerLogEntry & CurrentReviewers(0))
          PreviousReviewers = note.PreviousReviewers
          If PreviousReviewers(0) = "None" Then
               note.PreviousReviewers = CurrentReviewers(0)
          Else
               Set item = note.GetFirstItem("PreviousReviewers")
               item.AppendToTextList(CurrentReviewers(0))
          End If
          FutureReviewers = note.FutureReviewers
'Put the first person in the future reviewers list in current reviewer and remove that person from future reviewers list
          note.CurrentReviewers = FutureReviewers(0)
          If Ubound(FutureReviewers) = 0 Then
               note.FutureReviewers = "None"
          Else
               ListMax = Ubound(FutureReviewers) - 1
               Redim NewList (ListMax)
               x = 0
               For y = 1 To ListMax
                    NewList(x) = FutureReviewers(y)
                    x = x + 1
               Next
               note.FutureReviewers = NewList
          End If
'Calculate when the review is due, based upon ReviewTime
          If FutureReviewers(0) = "None" Then
               note.RemoveItem("DueDateTime")
               note.Status = "Pr
fung abgeschlossen"
               note.DocumentAuthors = note.From
          Else
               ReviewTime = note.ReviewTime
               dt.SetNow
               If Isnumeric(ReviewTime(0)) Then
                    dt.AdjustDay(ReviewTime(0))
                    note.DueDateTime = dt.LSLocalTime
               Else
                    note.RemoveItem("DueDateTime")
               End If
               Redim NewList(1)
               Originator = note.From
               NextReviewer = note.CurrentReviewers
               NewList(0) = Originator(0)
               NewList(1) = NextReviewer(0)
               note.DocumentAuthors = NewList
          End If
     End Select

     note.Save True, True

End Sub
Lotus Product
CurrentReviewers
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
-Czx~P]
$AssistType
$AssistLastRun
$AssistDocCount
$AssistFlags
$AssistTrigger
$AssistInfo
$Comment
$AssistAction
$AssistQuery
$AssistAction_Ex
$Language
$LastBuildTime
$BabelInfo
$ACLDigest$Signature$UpdatedBy$Name$ReplVersion$TITLE$ReplSrcServers$ReplClassMasks$ReplFormula$ReplView$ReplPrivateFolder$ReplFields$PublicAccess$Flags$Language$LastBuildTime$BabelInfo$ScriptLib$ScriptLib_O$FrameSet$Fonts$HTMLDocumentStyles$Info$$ScriptName$Background$Body$WindowTitle$WebFlags$SubForms$$Script_OformnameFromDateTimeCreatedPrivateExpireSubjectCategoriesBodyOriginalSubject$Fields$ACTIONS$V5ACTIONS$$XMB_2$$XMB_3DocumentAuthorsDocumentReadersLastEditor$OLEObjField$OLEObjRichTextFieldReviewersPreviousReviewersCURRENTREVIEWERSFutureReviewersReviewStyleReviewWindowReviewTimeNotifyAfterReviewerLog$Script$$Reviewers$Reviewers_OReviewTime_1SaveChoicesImmediateParentSubject$$FormScript$$$FormScript_ODeleteOptionsArchiveLocationArchiveServerArchivePathCopyOptions_ViewIcon$OLEObjProgIDOLEBodyDate_1TimeCreated_1$AUTOLAUNCH$$XMB$LicenseeDocLife$ManualArchivers_OObsoleteLifeDocumentLife$MessageTypeLogCountLogTotalArchiveDateArchiveTrailernProfileStatus$$ProfileAuthors$ProfileAuthors_O$$SubjectOp$SubjectOp_O$$ProfileStrings$ProfileStrings_O$$ProfileCategories$ProfileCategories_O$$ProfileStatus$ProfileStatus_O$$ProfileDocType$ProfileDocType_O$HLMLastServer$HLMLastChecked$NoPurge$HLTypeCategoryOpEventOpReplicaID$HLTitle$QueryTypeAuthorMatchProfileAuthorsSubjectMatchSubjectOpProfileStringsCategoryMatchProfileCategoriesStatusMatchProfileStatusDocMatchProfileDocTypeAdvFormula$HLEnabled$HLMonitorType$HLFormula$HLSubscriptionOLERoutines$DesignVersion$Version$Formula$FormulaClass$Collation$TYPE$Index$Collation1$Collation2$VIEWFORMAT$Collation3$Collation4$ViewMapDataset$ViewMapLayout$LeftToDo$AssistType$AssistLastRun$AssistDocCount$AssistFlags$AssistTrigger$AssistInfo$AssistRunInfo$AssistVersion$AssistAction$AssistQuery$AssistAction_Ex$Comment$Operation$Scan$ImagesWide$ImagesHigh$ImagesColorize$ImageNames$ImageData$SiteMapList$TemplateModTime$TemplateServerName$TemplateFileName$DefaultFrameset$FlagsNoRefreshIconBitmap$Collection$ViewContainer
GIF89a
?___OOO///
/CS#%
)+{"Z>%H
r:AOQK3W~8G
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
C!i>@2S]!sZ[
cfW|>KMhPv5
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
<*C$2
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
pF!#v
!}@/&:<
|8y:G|KDs369s
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
TTZE    Y
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
TTZE    Y
GIF89a
ox\>sV
X}YcJ
OxQ$T
WEGuh
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
?___///
a$IX*
^<QS g>@
"q-    _KfNz
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
OOO///
B P@:6
\l>@T
1QIy4
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
*OeyMV]
q9){E
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
( kS|U
w7t9Fw
Jn258n
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
p(nB@N
sl"!^ I
&j<>8($&
MC'`+
2%;J
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
y'qI}Z
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
HjCb|
%3r?<\]_
|9I a
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
HQ$    u
KW^T j=?]
$NPwQ
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
ZKw!a
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
@R$`)
@` Ll8
L! c:<~0Y
4?`9DFy
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
XfzMF
uZ7"
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
WEb;=})
x0:FHJ
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
OOO///
sZJ.1
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
rUVNY
<=    <)
-&<L 6
t7DFHyn
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
p_\}ri
G^lqx
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
(GIF89a
A/v    L
L%"W9
Ey*QWZ
]oVmj
[rv/c
yNk{s
@)WQ|wt
B4:5U}
j=fJ
:t7>acB
YoH7
8~5hy
SwhVR8
%-s3HL
GGxz8
@bDD2
nq(Dg
H5Bw2$
h*9rI
|"z<\YB/;
{bKZv
K[y&U
:qFGP'
f]g>j
4`YcU
R-:Ku_
BZt:d<c
Y@Zdj)
C]T]?
6;/%U
-d">kg
V6C&)
!R96F
Sx('D
y0"kD
AvOi5
Z+Fq%
<Fir5"\
R)33t\
h:T{}`
S_Be<r
oYE@3
7T1v`
V1U"0
5)4fn0
5OJN|"
KC|    [
h~A4_|
a'B/    M
a"%nq
*&Y.G
[_zg`fKpR#
u*"!hl
,A&'8f
(Z@B0
BUo[1
0,(+o7?
JAP`d
7rowr
    6'O9p
V5/8rW}
jsxKnr
_;c-|
`H,)5kh285A+-
Vcn<E
yFE6}
UMG-}
;51Nc~
"7NR^R
;^Y1/
^qVCME
}\VW8
9-tpr
q(q$[Q
5Z93c
yR/FT s@R
LAh3h
SmvqC
4eSvvw
qw~rWh
9j'vj
 {8j7
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
2F9    z
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesFrom
FromAutor des DokumentsX
de-DE
00000306##################
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesPrivate
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
PrivateXz
Private
de-DE
000002F6#####################################
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesExpire
expiredate
Abgelaufen am
expiredateK
Expirez
Expire
de-DE
000002FA########################
Categories
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesCategories
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
de-DE(lK
000002FE############################
$Modified
    1S2S3S
$TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$LANGUAGE
$Flags
    0SL1S4S5S3724
$TITLE
CN=Shaun McGale/OU=DUB/O=Lotus
#######################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
CN=Catherine Duffy/O=Irisc:\notes4\data\doclib4.ntfDoclibOfficeFramesetRF
CN=Debbie Branco/O=IrisCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusMS Office Bibliothek (V5.0)
MS Office Library
#1StdR50DocLibMSde-DE
0000030E#####
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesde-DE9pK
00000312###########
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notesde-DE
00000316############
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
CN=Ryan Jansen/O=IrisJoe BlowCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesOLERoutines1s34Qde-DEA K
0000011A
##########################################################
C34WQ
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MasterDocLibOfficeOutlineMasterDocLibOfficeOutlinede-DE
00000122#####################
ResponseBanner
OriginalSubjectBodyCategoriesSubjectExpirePrivateTimeCreatedDateFromformname
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
AntwortResponsede-DEC$K
00000132#####################
9423A8DCC796F2690FB19D73C187B03E67843E4301C6054E658E2C2D65E5AC9D
DocumentWorkflow
BodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocumentde-DEa*K
0000012E##################################################
StatusDueDateTime
Subject$26
DueDateTime$26Y
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesPr
fstatus|Review Status,
Status$40$41SubjectFrom$26DueDateTime$Conflict$REF
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Original von
ReviewStyle
fung durch
LastEditor
Subject
Subject
    6S9RS4E16RS9E22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
CurrentReviewers
FutureReviewers
Keiner
    5S6S8S10S
Statush
Status
forma
archive
    L1S5S6S7S8S9S10S18Sde-DE
0000016E########################################################
My Favorites|My Favorite Documents/L1
From$27FYpd
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesMeine Favoriten|My Favorite Documents
$29$30$27From$Conflict
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
Status
StatusY
Subject
$VersionOpt
Subject
  (Originaldokument im Pr
fzyklus)"
ReviewStyle
ParallelG
Subject
  (Gepr
ft von
LastEditor"
Subject
  (Gepr
ft von
PreviousReviewers
Archive
Subject
Subject
(Antwort auf
OriginalSubject
Subject
 (Antwort auf "
OriginalSubject
    6S9RS4E12S13S14S15S20RS8E22RS4E27RS8E28S29S31RS4E35S38RS9E39S40S41S42S2E43S44S46RS4E47S48S49S50S56S57S60R64S67RS4E69R70S71S73RS5E74S75S76S79R80S81S82S83S84S85S
    L1Sde-DE
0000017A###############################
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus NotesPrivateOle
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
tmpUseOle
PrivTxt
    0R3S4S5S6S7S8S10S12S
PrivateOle
de-DE
00000302################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
GIF89a
H2$@}
\8)FP
49>Tq_%O6
c @*V3@
{{8',
Zr#%C
}F>2y
#m~J+
,)cGJ
pUy#Wv
';.WHW
3    gFc
tAiqX4
#XI=H
E8DU8v
mGgFe
X3_#7}
'C2od
_%4GET
5Xtot
DI~nw%
phYHQ
)R"s'
o^9`Q
8DVYoEfr
j|Yx*(
yJ     ~U
0Jx_Y
<YCkp
<oY/e9
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
GIF89a
yVU*h
!z61+_
O(&4J
q2\Ws
!~    ]L
sb]a$
!3+r4
%@cW    N
Ymj({
k5eH3
(u#rg
+9o(%+z
GsNGs}Vh
}J'nm
pFJSx
xXw~A
yR    nPt
'fT5UI
}9Hiu
&nPos8
jG$FP
~yyN'
U'qc/
#7]/9A
9V=c\
XlVJu_
5Zeix
9vTOj
c[    jc
NK|si
)_|WM
W6lzdG
?&|6:
H8 mx
p%E-V
e8QQ4a
[s`{qA5
u'}B
Ce=Yo
Sy;x{
o!$Wna
|}Y(
gOQ<l
0OEiI
V="qI
+m*W&
U &HHK^8y
E5Cc#5)
U{'2'
(@41k3G
lip-_\%
fAv71
je6*i
c(/%9
Le*._
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Language
$LastBuildTime
$BabelInfo
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
&:[pY(y
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
RSAFO
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
RSAFO
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
RSAFO
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
RSAFO
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
RSAFO
Alle Dokumente
($All)
NotesView
All Documents
Nach Kategorie
Nach Kategorie
NotesView
By Category
Nach Autor
Nach Autor
NotesView
By Author
fstatus
fstatus
NotesView
Review Status
Meine Favoriten
Meine Favoriten-DokumenteX
NotesView
My Favorites
NotesView
NotesView
NotesView
NotesView
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
c X|p
$SiteMapList
$Language
$LastBuildTime
$BabelInfo
Times New Roman
bullet
    0S0E
    Fenster schlie
Verwenden der Microsoft Office BibliothekX
 @  @@ @` @
@@ @@@@@`@@
`@ `@@`@``@
Mit dieser Datenbank k
nnen Sie Informationen
ber Dokumente erfassen und verfolgen.
Funktionen der Datenbank:X
gen Sie dieser Datenbank ein Dokument hinzu
    Klicken Sie in einer Ansicht auf die Aktionsschaltfl
che 'Neues Dokument'.
 Sie k
nnen Dokumentinformationen auf verschiedene Weise eingeben:
ber den Notes Editor, durch das Scannen einer Vorlage oder durch das Importieren oder Anh
ngen einer Datei.
So erstellen Sie ein Dokument mit Hilfe von MS Office-AnwendungenX
hlen Sie die Men
funktion 'Erstellen - MS Office' oder die entsprechende Schaltfl
che und anschlie
end einen der folgenden Dokumenttypen: Excel-Arbeitsmappe, Paint-Bild, PowerPoint-Pr
sentation, Word-Dokument. Diese Dokumente k
nnen aber nur dann erstellt werden, wenn die passende Anwendung installiert ist. Unterst
tzt werden Office 95 und Office 97.
So antworten Sie auf ein DokumentX
Markieren Sie das Dokument in einer Ansicht, und w
hlen Sie anschlie
end 'Erstellen - Antwort'.X
So antworten Sie auf eine AntwortX
Markieren Sie die Antwort, auf die Sie wiederum antworten m
chten, und w
hlen Sie anschlie
end 'Erstellen - R
ckantwort'.X
    So markieren Sie ein Dokument als 'Privat'
    Sie k
nnen die Aktionen 'Als Privat markieren' und 'Als
ffentlich markieren' in der Schablone verwenden, um festzulegen, ob ein anderer Benutzer ein bestimmtes Dokument lesen kann. Wenn Sie z. B. das Abfassen eines Dokuments noch nicht abgeschlossen haben, k
nnen Sie auf die Aktion 'Als Privat markieren' klicken, damit andere Benutzer das Dokument nicht sehen k
nnen. Sobald Sie Ihre Arbeit in dem Dokument abgeschlossen haben, k
nnen Sie auf die Aktion 'Als
ffentlich markieren' klicken, um das Dokument anderen Benutzern zug
nglich zu machen. Wenn ein Dokument nach dem Einreichen f
r die Pr
fung als Privat markiert wurde, kann es vom Autor und den Pr
fern gelesen werden.X
    ACL-EinstellungenX
    Diese Anwendung sieht vor, da
 alle Benutzer mit Ausnahme des Managers Autorzugriff haben. Damit der Pr
fzyklus richtig funktioniert, reicht Editorzugriff nicht aus. Anonymer Zugriff ist nicht zul
ssig.
Funktionen
    Dokument-Pr
fzyklusX
    Der Dokumentautor hat die M
glichkeit, den Pr
fzyklus f
r das Dokument einzurichten. Er klickt hierf
r einfach auf die Aktionsschaltfl
che 'Pr
fzyklus einrichten' und gibt die erforderlichen Informationen ein.  X
    Hinweis:
      Bei der Eingabe der Pr
fernamen sollten Sie
    @Domain
    nicht verwenden. Hinzugef
gte Dom
nen werden n
mlich entfernt, und dies k
nnte beim Weiterleiten einer Anforderung zu Problemen f
hren. Geben Sie zudem ausschlie
lich Personennamen als Pr
fer ein. Gruppennamen werden nicht unterst
tzt.X
    Einen Pr
fzyklus l
schen
    Dokumentbibliothek, SmartSuite 96 Bibliothek und MS Office Bibliothek stellen eine Schaltfl
che f
r die Aktion 'Pr
fzyklus l
schen' zur Verf
gung, auf die nur der Dokumentverfasser Zugriff hat. Sie k
nnen die Aktion entweder vor oder nach dem Einreichen des Dokuments f
r die Pr
fung verwenden. Hierbei sind folgende Richtlinien zu beachten:X
    o    Einen Pr
fzyklus vor dem Einreichen f
r die Pr
fung l
schen:  W
hlen Sie diese Option, wenn Sie (als Verfasser) die Pr
fzyklus-Einstellungen
ndern m
chten, bevor die Pr
fer eine Benachrichtigung erhalten.X
    o    Einen Pr
fzyklus nach dem Einreichen l
schen:  Wenn die Pr
fer mit der Pr
fung des Dokuments bereits begonnen oder diese abgeschlossen haben, wird diese Bearbeitung gespeichert. Wenn die Pr
fer von der anstehenden Pr
fung benachrichtigt wurden, diese aber noch nicht begonnen haben, erhalten sie eine Mitteilung, da
 eine Pr
fung nicht mehr erforderlich ist.
farten der Microsoft Office BibliothekX
    Serielle Pr
fung:X
      Die Dokumente werden einzeln und nacheinander an die vom Autor gew
hlten Pr
fer weitergeleitet.X
    o    Alle
berarbeitungen werden in einem Dokument ausgef
hrt. Daneben wird eine unbearbeitete Kopie des Originaldokuments gespeichert.
    Serielle Pr
fung (alle
nderungen bewahren): X
    Die Dokumente werden einzeln und nacheinander an die vom Autor gew
hlten Pr
fer weitergeleitet.X
    o    Die Bearbeitungen werden in einer Kopie des Originals ausgef
hrt, die auch alle Kommentare der bisherigen Pr
fer enth
    o    Alle alten Versionen (einschlie
lich einer Kopie des Originaldokuments) werden zu Antwortdokumenten.
    Dokumentreservierungen:X
      Anforderungen f
r Dokumentpr
fungen werden parallel (d.h. gleichzeitig) weitergeleitet. Sobald ein Pr
fer das Dokument
ffnet, wird es auf dem Server gesperrt. Hierdurch wird jeder Benutzer, der das Dokument bearbeitet, gewarnt, da
 die Pr
fung l
uft.X
    o    Pr
fkommentare oder -bearbeitungen werden in eine Kopie des Originaldokuments eingef
    o    Wie bei den anderen Dokumenten wird stets eine unbearbeitete Kopie des Originals gespeichert.X
    Antwortpr
fung:X
     Identisch mit Dokumentreservierungen (aber ohne Dateisperrung).
    o    Pr
fkommentare oder -bearbeitungen werden als Antwortdokumente des Originaldokuments gespeichert.  X
    o    Wie bei den anderen Dokumenten wird stets eine unbearbeitete Kopie des Originals gespeichert.X
llige Pr
fungen verarbeitenX
    Wenn der Agent '
llige Pr
fungen bearbeiten' aktiviert wird, werden diejenigen Dokumente ausgew
hlt, die gegenw
rtig gepr
ft werden und deren Pr
ffristen abgelaufen sind. Je nach Pr
fart leitet der Agent diese zum n
chsten Pr
fer weiter und kennzeichnet sie als abgeschlossen bzw. benachrichtigt den aktuellen Pr
fer, da
 die Pr
fung
llig ist.
    Sperrung des Dokuments aufhebenX
    Gelegentlich bleibt ein Dokument versehentlich gesperrt. Entwickler und Manager k
nnen die Aktion 'Sperrung des Dokuments aufheben' im Men
 'Aktionen' der Ansicht 'Pr
fstatus' starten, um die Sperrung aufzuheben.
    Archivierung
    Um die Archivierung f
r Microsoft Office Bibliotheken einzurichten, klicken Sie auf die Schaltfl
che 'Archivieren' auf dem zweiten Register der Datenbankeigenschaften. Geben Sie die Informationen ein, und klicken Sie auf 'OK'. Die Archivierung wird auf dem Server ausgef
hrt. Eine Archivdatenbank wird automatisch erstellt.X
    Dokumente als 'Abgelaufen' markieren.  X
    Die Archivierungsfunktion arbeitet mit Dokumenten, die als 'Abgelaufen' markiert wurden. W
hlen Sie ein Dokument in einer Ansicht, und f
hren Sie im Aktionsmen
 die Funktion 'Dokument als 'Abgelaufen' markieren/Markierung aufheben' aus.
    Mehrere Dokumente kategorisieren
    Wenn Sie mehrere Dokumente kategorisieren m
chten, w
hlen Sie sie aus, und verwenden Sie 'Aktionen - Kategorisieren'.  W
hlen Sie eine vorhandene Kategorie, oder erstellen Sie eine neue, und dr
cken Sie auf 'OK'. Die ausgew
hlten Dokumente werden nun entsprechend kategorisiert.
    OLE/ActiveXX
    Diese Schablone wurde f
r das Zusammenwirken mit Microsoft Office 95- und 97-Anwendungen entwickelt. Sie greift auf das OLE-Konzept von DocObjects (auch als ActiveX bekannt) zur
ck, bei dem das OLE-/ActiveX-Objekt innerhalb des Dokumentfensters gestartet wird. Es hat dadurch den Anschein, da
 der Objekt-Server als eigene Anwendung ausgef
hrt wird.X
    Bitte informieren Sie sich im Abschnitt 'Fehlersuche' der Notes Client 5.0 Versionshinweise
ber etwaige Fehler in dieser Schablone.
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
RSAFO
Times New Roman
    0S0E
    Fenster schlie
ber Microsoft Office Bibliothek
 @  @@ @` @
@@ @@@@@`@@
`@ `@@`@``@
r ist diese Datenbank gedacht?
    Diese Datenbank gibt Notes Benutzern die M
glichkeit, Dokumente mit Microsoft Word, Excel, Powerpoint oder Paint zu erstellen, ohne Notes zu verlassen. Dar
berhinaus fungiert sie als elektronisches Archivierungssystem, in dem Referenzdokumente abgelegt sind, auf die Mitglieder einer Arbeitsgruppe gemeinsam zugreifen k
nnen. Die Datenbank kann die unterschiedlichsten Unterlagen enthalten, von Word-Dokumenten
ber Umweltauswirkungen f
r eine Ingenieursgruppe, bis hin zum Wirtschaftsgutachten einer Gruppe von Kreditspezialisten, das mit Excel erstellt wurde.X
    Abgesehen von einem Ablageort f
r Dokumente, die mit Microsoft-Anwendungen erstellt wurden, bietet die Dokumentbibliothek weitere wichtige Funktionen zur Dokumentenverwaltung, wie zum Beispiel die M
glichkeit, Pr
fzyklen einzusetzen, die Archivierung usw.X
    Wer verwendet die Datenbank?
    Jeder, der ein Dokument aufbewahren oder vorhandene Dokumente pr
fen m
chte, kann diese Datenbank verwenden.
    Wichtige FunktionenX
fungszyklus:X
     Wird f
r den Umlauf eines Dokuments an eine Reihe von Empf
ngern verwendet.
    Dokumentarchivierung:X
     Wird verwendet, um abgelaufene Dokumente in eine Archivdatenbank zu verschieben.X
    OLE/ActiveX:
     Beim Aktivieren einer Microsoft Office Anwendung aus einem Dokument heraus erscheint diese an Stelle des Dokuments und nicht in einem separaten Fenster. Es sieht f
r den Benutzer so aus, als ob die OLE-Anwendung selbst
ndig l
uft, w
hrend aber nach wie vor Notes aktiv ist.
nderungsvorschl
    Volltextsuche: X
    Wenn Sie diese Notes Funktionalit
t bei Datenbanken nutzen m
chten, die mit dieser Schablone angelegt wurden, w
hlen Sie im Men
 'Datei' die Optionen 'Datenbank - Eigenschaften...'. Klicken Sie auf das Volltext-Register, und erstellen Sie einen Volltextindex.X
    Wo finden Sie weitere Informationen?
    -  Weitere Informationenn finden Sie im Dokument X
    Benutzen dieser DatenbankX
     oder unter http://www.notes.net in der Dokumentationsdatenbank 'Best Practices: Templates and Sample Databases' (BPTEMP.NSF).
    ZugriffskontrolleX
    -  X
    Wichtig:
     Die Zugriffsebene f
r alle Anwender dieser Datenbank sollte X
    AutorX
     sein. Dies verhindert ein unbefugtes Bearbeiten von Dokumenten in der Datenbank. Die Autorenfelder innerhalb der Masken legen fest, wer bestimmte Dokumente bearbeiten/
berpr
fen darf. Es treten Fehler auf, wenn ein Anwender mit Editorzugriff versucht, ein Dokument zu pr
fen und hierzu nicht berechtigt ist.
    Wichtiger HinweisX
    - Die Schablone 'MS Office Bibliothek (5.0)' sollte nur verwendet werden, um neue Datenbanken anzulegen. Das Aktualisieren vorhandener Dokumentbibliotheken mit Hilfe dieser Schablone wird nicht unterst
tzt. X
    **Diese Schablone ist nicht f
r die Verwendung mit Web-Browsern vorgesehen.X
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
RSAFO
Neues Dokument*
Document
Neue AntwortF
views only
Response
    0R4S
Neue Antwort auf HauptdokumentP
resp. documents only
Response
    0R4S
Neue R
ckantwort6
Response to Response
Dokument bearbeitenX
    0S0E
Speichern und schlie
    4R11S17S
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
AbbrechenXJ
SaveOptions
    1S2S3S
Neu\Dokument*
Document
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
Neues Dokument*
Document
NewDoc.gif|NewDoc.gifX
Neue AntwortF
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue Antwort auf HauptdokumentP
resp. documents only
Response
    0R4S
NewResp.gif|NewResp.gifX
Neue R
ckantwort6
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
Dokument bearbeitenX
    0S0E
edit.gif|edit.gifX
Speichern und schlie
    4R11S17S
save.gif|save.gifX
Als 'Privat' markierenF
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
Als '
ffentlich' markierenD
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
AbbrechenXJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX
Neu\Dokument*
Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Excel-ArbeitsmappeX:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Paintbrush-Bild6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\PowerPoint-Pr
sentation6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
Neues MS Office Dokument\Word-Dokument2
WordDoc Document
NewDoc.gif|NewDoc.gifX
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$ACTIONS
$V5ACTIONS
$Body
$Language
$LastBuildTime
$BabelInfo
06/12/97 12:37:38 PM Ryan Jansen/Iris added [-Default-]
06/12/97 12:37:38 PM Ryan Jansen/Iris deleted [-Default]
03/25/97 01:36:16 PM Ryan Jansen/Iris updated [OtherDomainServers]
03/25/97 01:36:12 PM Ryan Jansen/Iris updated [LocalDomainServers]
03/25/97 01:36:00 PM Ryan Jansen/Iris updated [OtherDomainServers]
03/25/97 01:35:57 PM Ryan Jansen/Iris added [OtherDomainServers]
03/25/97 01:35:53 PM Ryan Jansen/Iris updated [LocalDomainServers]
03/25/97 01:35:47 PM Ryan Jansen/Iris added [LocalDomainServers]
03/25/97 01:35:40 PM Ryan Jansen/Iris updated [-Default]
03/25/97 01:35:20 PM Ryan Jansen/Iris updated [-Default]
03/25/97 01:35:16 PM Ryan Jansen/Iris added [-Default]
03/25/97 01:35:12 PM Ryan Jansen/Iris deleted Ryan Jansen/Iris
03/25/97 01:35:11 PM Ryan Jansen/Iris deleted OtherDomainServers
03/25/97 01:35:09 PM Ryan Jansen/Iris updated LocalDomainServers
03/25/97 01:35:03 PM Ryan Jansen/Iris updated -Default-
02/19/97 09:27:18 AM Ryan Jansen/Iris updated Ryan Jansen/Iris
02/19/97 09:27:18 AM Ryan Jansen/Iris added Ryan Jansen/Iris
02/19/97 09:27:18 AM Ryan Jansen/Iris updated -Default-
02/19/97 09:27:18 AM Ryan Jansen/Iris added LocalDomainServers
02/19/97 09:27:18 AM Ryan Jansen/Iris added OtherDomainServers
-Default-
LocalDomainServers
[LocalDomainServers]
[OtherDomainServers]
[-Default-]
DoclibOfficeFrameset|DoclibOfficeFrameset
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
dspTemplateNamedspTemplateName
dspDbTitledspDbTitle
AntwortResponse
DokumentDocument
ReviewOptionsReviewOptions
ckantwortResponse to Response
MS Office\Excel-ArbeitsblattExcelWorksheet Document
MS Office\Paint-DateiPaintbrush Document
MS Office\Word-DokumentWordDoc Document
(OLEChgSubject)OLEChgSubject
MS Office\PowerPoint-Pr
sentationPowerPoint Document
(DocProperties)DocProperties
Meine Favoriten|My Favorite Documents
Dokument als 'Abgelaufen' markieren/Markierung aufheben
cancel.gifcancel.gif
ClearReviewCycle.gifClearReviewCycle.gif
edit.gifedit.gif
MarkDocAsExpired.gifMarkDocAsExpired.gif
MarkPrivate.gifMarkPrivate.gif
MaskPublic.gifMarkPublic.gif
MyRevIsComplete.gifMyRevIsComplete.gif
NewDoc.gifNewDoc.gif
NewRespToMain.gifNewRespToMain.gif
NewRespToResp.gifNewRespToResp.gif
NewResp.gifNewResp.gif
save.gifsave.gif
SubmitForReview.gifSubmitForReview.gif
properties.gifproperties.gif
SetupReviewCycle.gifSesupReviewCycle.gif
DoclibOutline.gifDoclibOutline.gif
DoclibDocHeader.gifDoclibDocHeader.gif
Arch.gifArch.gif
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
pDbTitle
AntwortResponse
DokumentDocument
ReviewOptionsReviewOptions
ckantwortResponse to Response
DoclibOfficeFrameset|DoclibOfficeFrameset
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
dspTemplateNcmedspTemplateName
dspDbTitledspDbTitle
AntwortResponse
DokumentDocument
ReviewOptionsReviewOptions
ckantwortResponse to Response
DoclibOfficeFrameset|DoclibOfficeFrameset
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
dspTemplateNamedspTemplateName
dspDbTitledspDbTitle
AntwortResponse
DokumentDocument
ReviewOptionsReviewOptions
ckantwortResponse to Response
MS Office\Excel-ArceitsblattExcelWorksheet Document
DoclibOfficeFrameset|DoclibOfficeFrameset
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
dspTemplateNamedspTemplateName
dspDbTitledspDbTitle
AntwortResponse
DokumentDocument
ReviewOptionsReviewOptions
ckantwortResponse to Response
MS Office\Excel-ArbeitsblattExcelWorksheet Document
MS Office\Paint-DateiPaintbrush Document
DoclibOfficeFrameset|DoclibOfficeFrameset
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
dspTemplateNamedspTemplateName
dspDbTitledspDbTitle
AntwortResponse
DokumentDocument
RevicwOptionsReviewOptions
ckantwortResponse to Response
MS Office\Excel-ArbeitsblattExcelWorksheet Document
MS Office\Paint-DateiPaintbrush Document
MS Office\Word-DokumentWordDoc Document
DoclibOfficeFrameset|DoclibOfficeFrameset
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
dspTemplateNamedspTemplateName
dspDbTitledspDbTitle
AntwortResponse
DokumentDocument
ReviewOptionsReviewOptions
ckantwortRessonse to Response
MS Office\Excel-ArbeitsblattExcelWorksheet Document
MS Office\Paint-DateiPaintbrush Document
MS Office\Word-DokumentWordDoc Document
(OLEChgSubject)OLEChgSubject
FromAutor des DokumentsX
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes!Template Development/O=Lotus Notes
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
PrivateXz
Private
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
tmpUseOle
PrivTxt
    0R3S4S5S6S7S8S10S12S
PrivateOle
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotqsCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
hlt alle Dokumente, die
berpr
ft werden und dabei abgelaufene F
lligkeitsdaten aufweisen. Je nach Pr
fart wird das Dokument an den n
chsten Pr
fer weitergeleitet, als 'Abgeschlossen' markiert, oder es wird eine Nachricht an den aktuellen Pr
fer gesendet, da
 die Pr
fung
llig ist.
CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
ate Development/O=Lotus Notes
DoclibOfficeFrameset|DoclibOfficeFrameset
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibOutline.gifDoclibOutline.gif
CN=Debbie Branco/O=IrisCN=Aotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocument
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Dokument als 'Abgelaufen' markieren/Markierung aufheben
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGala/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspDbTitledspDbTitle
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspTemplateNamedspTemplateName
CN=Dabbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
edit.gifedit.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Debbie BrancoCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkDocAsExpired.gifMarkDocAsExpired.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB!O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPrivate.gifMarkPrivate.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPublic.gifMarkPublic.gif
CN=Dabbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Aotes
Meine Favoriten|My Favorite Documents
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\Excel-ArbeitsblattExcelWorksheet Document
CN=Debbie Branco/O=IrisCN=Lotuq Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumb because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
BasterDocLibOfficeOutlineMasterDocLibOfficeOutline
dspTemplateNamedspTemplateName
dspDbTitledspDbTitle
AntwortResponse
DokumentDocument
ReviewOptionsReviewOptions
ckantwortResponse to Response
MS Office\Excel-ArbeitsblattExcelWorksheet Document
MS Office\Paint-DateiPaintbrush Document
MS Office\Word-DokumentWordDoc Document
(OLEChgSubject)OLEChgSubject
MS Office\PowerPoint-Pr
sentationPowerPoint Document
(DocProperties)DocProperties
Meine Favoriten|My Favorite Documents
Dokument als 'Abgelaufen' markieren/Markierung aufheben
cancel.gifcancel.gif
ClearReviewCycle.gifClearReviewCycle.gif
edit.gifedit.gif
MarkDocAsExpired.gifMarkDocAsExpired.gif
MarkPrivate.gifMarkPrivate.gif
MarkPublic.gifMarkPublic.gif
MyRevIsComplete.gifMyRevIsComplete.gif
NewDoc.gifNewDoc.gif
NewRespToMain.gifNewRespToMain.gif
NewRespToResp.gifNewRespToResp.gif
NewResp.gifNewResp.gif
save.gifsave.gif
SubmitForReview.gifSubmitForReview.gif
properties.gifproperties.gif
SetupReviewCycle.gifSetupReviewCycle.gif
DoclibOutline.gifDoclibOutline.gif
DoclibDocHeader.gifDoclibDocHeader.gbf
Arch.gifArch.gif
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, and thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S2S9S15S17S19SX
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Arch.gifArch.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Ryan Jansen/O=IrisCN=Shaun McGale/OU=DUB/B=Lotus
AntwortResponse
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Arch.gifArch.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Josepb Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
cancel.gifcancel.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Verschiedenes
CategoriesDr
cken Sie die Eingabetaste, um die Liste der Schl
sselw
rter zu sehen oder ein neues Sch
sselwort hinzuzuf
In the case of reading an existing document, it is not necessary to do the @DbColumn because we don't support the use of Keyword Synonyms in this application, anb thus translation doesn't need to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
IsComplete.gif
NewDoc.gifNewDoc.gif
NewRespToMain.gifNewRespToMain.gif
(DocProperties)DocProperties
Meine Favoriten|My Favorite Documents
Dokument als 'Abgelaufen' markieren/Markierung aufheben
cancel.gifcancel.gif
ClearReviewCycle.gifClearRevierCycle.gif
edit.gifedit.gif
expiredate
Abgelaufen am
expiredateK
Expirez
Expire
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotasCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Ryan Jansen/O=IrisCN=Shaun McGale/OU=DUB/O=Lotus
AntwortResponse
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun!McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Arch.gifArch.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
cancel.gifcancel.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
ClearReviewCycle.gifClearReviewCycle.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibDocHeader.gifDoclibDocHeader.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibOfficeFrameset|DoclibOfficeFrameset
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development!O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibOutline.gifDoclibOutline.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocument
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Dokument als 'Abgelaufen' markieren/Markierung aufheben
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O1Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspDbTitledspDbTitle
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspTemplateNamedspTemplateName
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
edit.gifedit.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Debbie BrancoCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkDocAsExpired.gifMarkDocAsExpired.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NatesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPrivate.gifMarkPrivate.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPublic.gifMarkPublic.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/AU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Meine Favoriten|My Favorite Documents
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
te Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Tamplate Development/O=Lotus Notes
dspDbTitledspDbTitle
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\Paint-DateiPaintbrush Document
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Ryan Jansen/O=IrisCN=Shaun McGale/OQ=DUB/O=Lotus
AntwortResponse
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Arch.gifArch.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN1Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
cancel.gifcancel.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
ClearReviewCycle.gifClearReviewCycle.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibDocHeader.gifDoclibDocHeader.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN1Lotus Notes Template Development/O=Lotus Notes
DoclibOfficeFrameset|DoclibOfficeFrameset
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Templaqe Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DoclibOutline.gifDoclibOutline.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocument
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Deveaopment/O=Lotus Notes
Dokument als 'Abgelaufen' markieren/Markierung aufheben
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspDbTitledspDbTitle
CN=Debbie Branco/O1IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
dspTemplateNamedspTemplateName
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
edit.gifedit.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Debbie BrancoCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Tamplate Development/O=Lotus Notes
MarkDocAsExpired.gifMarkDocAsExpired.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPrivate.gifMarkPrivate.gif
CN=Debbie Branco!O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MarkPublic.gifMarkPublic.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MasterDocLibOfficeOutlineMasterDocLibOfficeOutline
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
Meine Favoriten|My Favorite Documents
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus!NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\Excel-ArbeitsblattExcelWorksheet Document
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
(DocProperties)DocProperties
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun MbGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
xazm`
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
SubmitForReview.gifSubmitForReview.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lorus Notes
SetupReviewCycle.gifSetupReviewCycle.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
save.gifsave.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Developbent/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
ckantwortResponse to Response
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
*Nb:O
ReviewOptionsRevierOptions
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
properties.gifproperties.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
QobH7
CN=Ryan Jansen/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Ryan Jansen/O=IrisJoe BlowCB=Ryan Jansen/O=IrisCN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewResp.gifNewResp.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewRespToResp.gifNewRespToResp.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewRespToMain.gifNewRespToMain.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Develbpment/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
NewDoc.gifNewDoc.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MyRevIsComplete.gifMyRevIsComplete.gif
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\Word-DokumentWordDoc Document
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus"NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
MS Office\PowerPoint-Pr
sentationPowerPoint Document
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
(DocProperties)DocPropertiesB
MS Office\Paint-DateiPaintbrush Document
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kieraan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
r versehentlich gesperrte Dokumente. Entwickler und Manager k
nnen
ber die Ansicht 'Pr
fstatus' darauf zugreifen.
Lotus NotesCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
CN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
(OLEChgSubject)OLEChgSubject
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Joseph Kiernan/OU=DUB/O=LotusCN=Shaun McGale/OU=DUB/O=LotusCN=Lotus Notes Template Development/O=Lotus Notes
$Modified
    1S2S3S
$TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$LANGUAGE$C1$
$Flags
    0SL1S4S5S
$TITLE
de-DE
(ProcessExistingDbDlg)
($Subscription)
DocumentWorkflow
CUA3x
ResponseBanner
Periodic Archive
Nach _Autor|By Author
Nach Kategorie|By Category
($All)|($All)
Process Late Reviews
(Unlock Document)
action bar
Hauptnavigator
actoin bar
DoclibOfficeOutline
used in main and resp forms
34CiQ
$ACTIONS
Outline frame graphic
From
Private
Expire
Categories
OLERoutines
C34WQ
fstatus|Review Status
PrivateOle
CN=Shaun McGale/OU=DUB/O=Lotus
Archivprotokoll
Times New Roman
 ArchiveLog
$MessageType
Arch.gif|Arch.gif
ArchiveProfile
Archivprofil
    1S2S3S4S
Archivprotokoll
LogCount
 von
LogTotal
ArchiveDate
Auf die Archivierungsfunktionen k
nnen Sie nun folgenderma
en zugreifen:
hlen Sie 'Datei - Datenbank - Eigenschaften', und klicken Sie auf 'Archivierungseinstellungen'.
Vorhandene Archivierungseinstellungen werden aktualisiert, wenn Sie dieses Dialogfeld zum ersten Mal verwenden.
    1S2S3S4S5S6S7S8S9S10S11S12S2E
Diese Funktionalit
t ist Teil der Datenbankeigenschaften. Auf dieses Dialogfeld kann nur von Notes Clients aus zugegriffen werden.
    0R1S2E2S
ArchiveProfile
Archivprofil
Notes
Nmsg"
ArchiveProfile
Archivprofil
Notes
Wmsg"
    0R4S5S6S7S8S9S11S12S13S14S16R17S18S20RT22S23S24S25S26S27S29S30S31S32S34RTT35S36S38RT
ArchiveTrailer
ArchiveTrailer
    Hidden:
Archivprotokoll f
ArchiveDate
    1S2S
Subject
(Archiv)
Categories
_Kategorisieren
Dokument _bearbeiten
Dokument _senden
_Weiterleiten
In Ordner _verschieben...e
Aus Ordner _entfernen
AbbrechenJJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gif?
_Kategorisieren
Dokument _bearbeiten
Dokument _senden
_Weiterleitenr
In Ordner _verschieben...
Aus Ordner _entfernen
Abbrechen
SaveOptions
    1S2S3S
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
DocLife
$ManualArchivers_O
ObsoleteLife
DocumentLife
$Language
$LastBuildTime
$BabelInfo
$Info
$WindowTitle
$$ScriptName
ArchiveDate
$Body
$V5ACTIONS
$ACTIONS