PC World 2000 November/PCWorld_2000-11_cd.bin/Akce/setup.exe/data1.cab/CommonDataFilesOptionalTemplates/doclbs5.ntf

Lotus Notes Database | 2000-08-20 | 702KB | 7,587 lines

Knihovna dokument
 Lotus SmartSuite (5.0)
Lotus SmartSuite Library
#1SmartSuiteDocLibR5
*Nb:O
xazm`
QoeH7
CN=John Clair/O=Connect
11/30/99 10:56:03 AM Debbie Branco/Iris updated OtherDomainServers
11/30/99 10:56:00 AM Debbie Branco/Iris added OtherDomainServers
11/30/99 10:55:55 AM Debbie Branco/Iris updated [OtherDomainServers]
11/30/99 10:55:42 AM Debbie Branco/Iris updated [OtherDomainServers]
11/30/99 10:55:35 AM Debbie Branco/Iris added [OtherDomainServers]
11/30/99 10:55:30 AM Debbie Branco/Iris updated [LocalDomainServers]
11/30/99 10:55:24 AM Debbie Branco/Iris added [LocalDomainServers]
11/30/99 10:55:10 AM Debbie Branco/Iris updated -Default-
11/30/99 10:55:06 AM Debbie Branco/Iris updated LocalDomainServers
11/30/99 10:55:04 AM Debbie Branco/Iris updated [-Default-]
11/30/99 10:54:51 AM Debbie Branco/Iris updated [-Default-]
11/30/99 10:54:42 AM Debbie Branco/Iris added [-Default-]
11/30/99 10:54:22 AM Debbie Branco/Iris deleted Debbie Branco/Iris
11/30/99 10:54:21 AM Debbie Branco/Iris updated LocalDomainServers
11/30/99 10:54:18 AM Debbie Branco/Iris added LocalDomainServers
11/30/99 10:54:14 AM Debbie Branco/Iris updated -Default-
11/30/99 10:53:53 AM Debbie Branco/Iris updated Debbie Branco/Iris
11/30/99 10:53:53 AM Debbie Branco/Iris added Debbie Branco/Iris
-Default-
LocalDomainServers
[-Default-]
[LocalDomainServers]
[OtherDomainServers]
OtherDomainServers
CN=Lotus Notes Template Development/O=Lotus Notes###############
30719
CN=Ryan Jansen/O=IrisCN=John Clair/O=Connect############
Cy34Q$ACTIONScs-CZ]0Q
0000030E
CN=Lotus Notes Template Development/O=Lotus NotesesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=ConnectCN=L
##########################################################
##########################################################
OLERoutiness34Q1cs-CZ
0000011A
CN=Lotus Notes Template Development/O=Lotus Notesri
cs-CZ
000002FEm34
DoclibSmartSuiteOutline5
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibSmartSuiteOutline5################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
C34WQ5
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutlinecs-CZ
00000122
CN=Lotus Notes Template Development/O=Lotus Notes=Lotus Notes Templ
##########################################################
##########################################################
save.gif
save.gifsave.gifaction barcs-CZ//Q
000001DA
CN=Lotus Notes Template Development/O=Lotus Notes/O=LotusCN=John Clair/O=ConnectCN=Lotus Notes Templa
My Favorites|My Favorite Documents/L1
From$27FYpdObl
|My Favorite Documentscs-CZg.Q
0000017A
CN=Lotus Notes Template Development/O=Lotus Notes
########################################################
cs-CZ
00000156($Subscription)DC5
$HLSubscription$HLFormula$HLMonitorType$HLEnabledAdvFormulaProfileDocTypeDocMatchProfileStatusStatusMatchProfileCategoriesCategoryMatchProfileStringsSubjectOpSubjectMatchProfileAuthorsAuthorMatch$QueryType$HLTitleReplicaIDEventOpCategoryOp$HLType$NoPurge$HLMLastChecked$HLMLastServer
CN=Lotus Notes Template Development/O=Lotus NotesDevelopment/O=Lotus Notes################################
QoeH7
properties.gif
properties.gifproperties.gifaction barcs-CZ>/Q
000001E2
CN=Lotus Notes Template Development/O=Lotus Notesohn Clair/O=ConnectCN=Lotus Notes
##########################################################
##########################################################
CUA3x
CategoriesSubjectTimeCreatedDateFromResponseBannercs-CZ
00000166
CN=Lotus Notes Template Development/O=Lotus Notesiall McCarthy/OU=DUB/O=
cs-CZ
0000013A
ReviewOptionsReviewOptionsCD5
SaveChoicesReviewTimeNotifyAfterReviewWindowReviewStyle
CN=Lotus Notes Template Development/O=Lotus NotesDevelopment/O=Lotu
##########################################################
cs-CZ
0000014E(ProcessExistingDbDlg)DC5
CopyOptionsArchivePathArchiveServerArchiveLocationDeleteOptions
CN=Lotus Notes Template Development/O=Lotus NotesDevelopment/O=Lotus Notes=John
##########################################################
DocumentWorkflow(DocProperties) | DocProperties
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom$OLEObjProgID_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
Lotus SmartSuite\Se
it progamu 1-2-31-2-3Workbook Documentcs-CZ
0000013E
CN=Lotus Notes Template Development/O=Lotus Notes=Lotus Note
##########################################################
##########################################################
HC34W
dspDbTitledspDbTitlecs-CZ
0000012A
CN=Lotus Notes Template Development/O=Lotus NotesOU=DUB/O=LotusCN=John Clair/O=ConnectCN=L
##########################################################
##########################################################
DocumentWorkflow(DocProperties) | DocProperties5
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Documentcs-CZU,Q
0000014A
CN=Lotus Notes Template Development/O=Lotus Notes Not
##########################################################
##########################################################
##########################################################
mark private.gif
MarkPrivate.gifMarkPrivate.gifaction barcs-CZ
000001BE
CN=Lotus Notes Template Development/O=Lotus Notesn Clair/O=ConnectCN=Lotus Note
##########################################################
##########################################################
mark public.gif
MarkPublic.gifMarkPublic.gifaction barcs-CZ
000001C2
CN=Lotus Notes Template Development/O=Lotus Notesohn Clair/O=ConnectCN=Lotus Notes
##########################################################
##########################################################
new document.gif
NewDoc.gifNewDoc.gifactoin barcs-CZ
000001CA
CN=Lotus Notes Template Development/O=Lotus NotesotusCN=John Clair/O=ConnectCN=Lotus Note
##########################################################
##########################################################
new response.gif
NewResp.gifNewResp.gifaction barcs-CZ(/Q
000001D6
CN=Lotus Notes Template Development/O=Lotus NotesusCN=John Clair/O=ConnectCN=Lotus Note
##########################################################
##########################################################
##########################################################
255D2116B7BDFECF1769F57E5917AA29Lotus NotesCD
CategoriesSubjectArchiveTrailerBodyArchiveDateLogTotalLogCount$MessageType
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLogcs-CZ
0000015A
CN=Lotus Notes Template Development/O=Lotus Noteses Template Development/O=Lotus Note
##########################################################
##########################################################
xazm`
CUA3x
ReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewers
(DocProperties)DocPropertiescs-CZ
00000162
CN=Lotus Notes Template Development/O=Lotus Notes=LotusCN=John Clair/O=ConnectCN=Lotus Notes T
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
C34WQ
dspTemplateNamedspTemplateNamecs-CZ
00000126
CN=Lotus Notes Template Development/O=Lotus NotesotusCN=John Clair/O=Con
##########################################################
##########################################################
$Modified
    1S2S3S
$TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$LANGUAGE
$Flags
    0SL1S4S5S3724
$TITLE
CN=John Clair/O=Connect
##############################################
$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthorsDocumentWorkflowcs-CZ~-Q
0000015E
CN=Lotus Notes Template Development/O=Lotus Notesll McCarth
##########################################################
##########################################################
CategoriesSubject
(OLEChgSubject)OLEChgSubjectcs-CZ
00000152
CN=Lotus Notes Template Development/O=Lotus Notes=LotusCN=John Clair/O=ConnectCN=Lotus Notes Template Developmen
##########################################################
##########################################################
##########################################################
##########################################################
G3Hlavn
 navig
torcs-CZ{.Q
0000017E
CN=Lotus Notes Template Development/O=Lotus Notes=DUB/O=L
##########################################################
##########################################################
'++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 "Dokument pr
 upravuje u
ivatel " & LockedBy(0) & ". Opakujte akci pozd
ji.",_
            0 + 48, "Knihovna dokument
            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 "Dokument je moment
n. Opakujte akci pozd
ji.",_
    0 + 48, "Knihovna dokument
    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 "Dokument pr
 upravuje u
ivatel " & LockedBy(0) & ". Opakujte akci pozd
ji.",_
            0 + 48, "Knihovna dokument
            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 "Dokument je moment
n. Opakujte akci pozd
ji.",_
    0 + 48, "Knihovna dokument
    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("Zadejte n
zev dokumentu.", "Knihovna dokument
", "(Bez n
zvu)")
        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 "Ukl
 dokumentu."
    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) = "
" Then note.Status = StatusList(4)
'If the parent is locked then unlock it
        If ParentIsLocked Then
            CurrentReviewers = parent.CurrentReviewers
            If CurrentReviewers(0) = "
" 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 "Zav
 dokumentu."
    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 = "
    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 "Prob
 aktualizace seznam
 recenzent
   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 & " dne " & 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 = "
        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) = "
" 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 = "
        Else
            PreviousReviewers = note.PreviousReviewers
            If PreviousReviewers(0) = "
" 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) <> "
    And (NotifyAfter(0) = "Final") And (Action(0) <> "Submit") Then
        Exit Sub
    Else
        Print "Odes
 upozorn
    End If
    Set maildoc = New NotesDocument(db)
    Set rtitem = New NotesRichTextItem(maildoc, "Body")
    Select Case Action(0)
    Case "Submit"
        tmpList = CurrentReviewers
        tmpSubject = "Po
adavek na revizi dokumentu  " & Subject(0)
        If note.HasItem("DueDateTime") Then
            tmpFlowStatus = "Prove
te revizi dokumentu nejpozd
ji k n
e uveden
mu datu."
        Else
            tmpFlowStatus = "Prove
te revizi tohoto dokumentu."
        End If
        tmpMessagebox = "N
sleduj
ivatel
m byl odesl
adavek na revizi: "
        If ReviewSeq = "Parallel" Then
            tmpRecipient = "V
ichni recenzenti"
        Else
            tmpRecipient = CurrentReviewers(0)
        End If
    Case "Complete"
        If CurrentReviewers(0) = "
" Then
            tmpList = Originator(0)
            tmpSubject = "Byla dokon
ena revize dokumentu  " & Subject(0)
            tmpFlowStatus = "V
ichni recenzenti dokon
ili revize dokumentu."
            tmpMessagebox = "Autor byl informov
n o dokon
 revize: "
        Else
            Select Case ReviewSeq
            Case "Parallel"
                tmpList = Originator(0)
                tmpFlowStatus = CurrentUser & " - U
ivatel dokon
il revizi tohoto dokumentu."
                tmpSubject = CurrentUser & " - U
ivatel dokon
il revizi dokumentu  " & Subject(0)
                tmpMessagebox = "Autor a n
sleduj
ivatel
 byli informov
ni o dokon
 revize: "
            Case "Serial"
                tmpList = CurrentReviewers(0)
                tmpSubject = "Po
adavek na revizi dokumentu  " & Subject(0)
                If note.HasItem("DueDateTime") Then
                    tmpFlowStatus = Originator(0) & " v
 o revizi dokumentu k uveden
mu term
nu dokon
."
                Else
                    tmpFlowStatus = Originator(0) & " v
 o revizi tohoto dokumentu."
                End If
                tmpMessagebox = "N
sleduj
ivatel
 byli informov
ni o dokon
 revize: "
                If NotifyAfter(0) = "Each" Then
                    maildoc.CopyTo = Originator(0)
                    tmpRecipient = tmpList & " a " & 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, "Propojen
 s dokumentem " & Subject(0))
    Else
        Call rtitem.AppendDocLink(note, "Propojen
 s dokumentem " & Subject(0))
    End If
    maildoc.Form = "Bookmark"
    On Error Goto SendError
    Call maildoc.Send (False)
    Messagebox tmpMessagebox & tmpRecipient & ".", 0 + 64, "Knihovna dokument
    Exit Sub
SendError:
    Messagebox "Pro informaci: U
ivateli  " & tmpRecipient & " nelze nyn
 odeslat po
tou upozorn
.", 0 + 64, "Knihovna dokument
    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 "Zah
 reviz
'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) = "
" And Not(note.HasItem("$VersionOpt")) Then VersionOpt = "3"
    End If
'Reset the field
    If (Versioning = "Versions") Or (PreviousReviewers(0) = "
") 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) = "
" 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) = "
" 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) = "Nov
    StatusList(2) = "P
ipraveno k revizi"
    StatusList(3) = "Prob
 revize"
    StatusList(4) = "Revize byla dokon
    note.StatusList = StatusList
End Sub
Lotus Product
W32I4
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$TITLE
$PublicAccess
$Language
$LastBuildTime
$BabelInfo
$ScriptLib
$ScriptLib_O
tem("Document
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
 18ZB
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
&Arial
DoclibOutline.gif|DoclibOutline.gif
 MasterDocLibOfficeOutline
DoclibSmartSuiteOutline
docliboutline
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$HTMLDocumentStyles
$BackgroundR5
$Info
$DesignerVersion
$$ScriptName
$Body
$Language
$LastBuildTime
$BabelInfo
&Arial
 DbTitlePage
Knihovna Lotus SmartSuiteX
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
Locked
    1S2S3S
DocumentAuthors
CurrentReviewers
    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
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
sob reviz
ReviewStyle
ReviewStyle
Postupn
 revize | Serial.NoVersionsPostupn
 (zachovat v
echny opravy) | Serial.VersionsRezervace dokument
 | Parallel.NoVersionsSou
 odpov
di | Parallel.Versions
ReviewWindow
ReviewWindow
U reviz
 limit | NoLimitP
edat dal
mu recenzentovi po | MoveOnP
nat po | Reminder
Vyhrazen
Upozorn
NofityAfter
NotifyAfter
Upozornit po ka
m recenzentovi | EachUpozornit po posledn
m recenzentovi | Final
ReviewWindow
NoLimit
    1S2S
ReviewTime
ReviewWindow
NoLimit
ReviewTime
ReviewTime
    3S4S6S8S14S
ReviewWindow
NoLimit
ReviewTimeX
Zadejte
ReviewTimeX
Zadejte cel
 kladn
    3S4S6S8S16S21S25S26S28S33S
ReviewTime
dni (dnech)
SaveChoices
SaveChoices
it mo
nosti pro p
. | 1
33333f33
3f33ff3f
f33f3ff3
ff3fffff
33333f33
3f33ff3f
f33f3ff3
ff3fffff
33333f33
3f33ff3f
f33f3ff3
ff3fffff
33333f33
3f33ff3f
f33f3ff3
ff3fffff
adit do kategorie
_Upravit dokument
O_deslat dokument
Po_stoupit
esunout do slo
ky...
_Odebrat ze slo
adit do kategorie
_Upravit dokument
O_deslat dokument
Po_stoupit
esunout do slo
ky...
_Odebrat ze slo
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
$DesignerVersion
$$ScriptName
$Body
$V5ACTIONS
$ACTIONS
CN=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
My Favorites|My Favorite Documents
'++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
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 ="Platnost formul
Const Msg2 =" nelze ukon
Const Msg3 = " ji
 byla ukon
ena. Chcete odstranit p
znak ukon
 platnosti?"
Const Msg4 = "Po
adovan
 akce byla dokon
ena. Zm
ny se projev
 po ulo
 dokumentu."
Const Msg5 = "Nejprve vyberte dokument. Pozn
mka: Je nutn
raznit dokument, nikoli kategorii."
Const msg6 = "Dokument nen
 dosud ulo
Const msg7 = "Platnost dokument
 nelze ukon
it, proto
e v datab
zi dosud nebyla nastavena archivace. Archivaci nastav
te klepnut
m na nab
dku Soubor, podnab
dku Datab
ze, p
kaz Archivovat nebo na tla
tko Nastaven
 archivace v informa
m okn
 Vlastnosti datab
Const BoxTitle ="Platnost ji
 byla ukon
Const BoxTitle2 ="Ukon
 platnosti nen
 povoleno"
'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("Archive Profile")
    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 And uiview Is Nothing 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
W32I4
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
Eya!j
$AssistType
$AssistLastRun
$AssistDocCount
$AssistFlags
$AssistTrigger
$AssistInfo
$DesignerVersion
$AssistAction
$AssistQuery
$AssistAction_Ex
$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
ee=O<m0
$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
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
"MS Sans Serif
 Response
OriginalSubject
OriginalSubject
OriginalSubject
Subject
    1S2S3S10S12S
NewRespTitle
 odpov
 na "
OriginalSubject
    0R1S2S3S4S5S6S
StandardTitle
Odpov
 z celkov
ho po
 na t
ma ""
OriginalSubject
    0R1S2S3S4S8S9S10S11S12S13S14S15S16S17S
NewRespTitle
StandardTitle
    0R4S6S
_Upravit dokumentX
adit do kategorie
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Upravit dokument
    0S0E
it a zav
    4R11S17S
 odpov
views only
Response
    0R4S
 odpov
 na odpov
Response to Response
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
StornoJ
SaveOptions
    1S2S3S
_Upravit dokumentX
adit do kategorie
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Upravit dokument
    0S0E
edit.gif|edit.gifX
it a zav
    4R11S17S
save.gif|save.gifX
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na odpov
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
StornoJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX
    Hidden Fields:    X
OriginalSubject
OriginalSubject
Subject
    7S9S
OriginalSubjectHidden field to store topic of Main DocumentX
    form name (used in RespBanner subform)
Response
formname
ResponseBanner
Obsah:
BodyZadejte text odpov
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$HTMLDocumentStyles
$Info
$SubForms
$DesignerVersion
$$Script_O
$$ScriptName
TimeCreated
$WindowTitle
$ACTIONS
$V5ACTIONS
$Body
$Language
$LastBuildTime
$BabelInfo
MarkPublic.gif|MarkPub
echny dokumenty
($All)
NotesView
All Documents
Podle kategori
Podle kategori
NotesView
By Category
Podle jm
na autora
By Author?
NotesView
By Author
Stav reviz
Stav reviz
NotesView
Review Status
My Favorite Documents?
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
$Language
$LastBuildTime
$BabelInfo
$SiteMapList
$DesignerVersion
 dokumentX*
Document
 odpov
views only
Response
    0R4S
 odpov
 na hlavn
resp. documents only
Response
    0R4S
 odpov
 na odpov
Response to Response
Upravit dokument
    0S0E
it a zav
    4R11S17S
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
StornoJ
SaveOptions
    1S2S3S
\DokumentX*
Document
 dokument sady Lotus SmartSuite\Se
it programu 1-2-3X8
1-2-3Workbook Document
 dokument sady Lotus SmartSuite\Obr
zek programu PaintbrushX>
Dokument programu Paintbrush
 dokument sady Lotus SmartSuite\Prezentace aplikace FreelanceX>
Dokument aplikace Freelance
 dokument sady Lotus SmartSuite\Dokument aplikace Word Pro2
WordPro Document
 dokumentX*
Document
NewDoc.gif|NewDoc.gifX
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na hlavn
resp. documents only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na odpov
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
Upravit dokument
    0S0E
edit.gif|edit.gifX
it a zav
    4R11S17S
save.gif|save.gifX
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
StornoJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX
\DokumentX*
Document
NewDoc.gif|NewDoc.gifX
 dokument sady Lotus SmartSuite\Se
it programu 1-2-3X8
1-2-3Workbook Document
NewDoc.gif|NewDoc.gifX
 dokument sady Lotus SmartSuite\Obr
zek programu PaintbrushX>
Dokument programu Paintbrush
NewDoc.gif|NewDoc.gifX
 dokument sady Lotus SmartSuite\Prezentace aplikace FreelanceX>
Dokument aplikace Freelance
NewDoc.gif|NewDoc.gifX
 dokument sady Lotus SmartSuite\Dokument aplikace Word Pro2
WordPro 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
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
@13dl
O5/l-
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Language
$LastBuildTime
$BabelInfo
$Info
$DesignerVersion
$Body
 1-2-3Workbook Document
it programu 1-2-3
Subject
    4S6S
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
'++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
Lotus123.Workbook
$OLEObjProgIDX
Lotus SmartSuite
it programu 1-2-3X
FromJm
no autora dokumentu
DateDatum a
as vytvo
 dokumentuX
TimeCreatedX
Scope
Soukrom
    0R1S2S
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Soukrom
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Platnost ukon
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
subject
SubjectZadejte stru
 popis tohoto hlavn
matu.Xz
Subject
Subject
dspSubject
    Kategorie:
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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
Podle kategori
    0R4S5S7S9S15S17S19SX
Scope
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
ReviewerLog
    1S2S
OLEBodyX
BodyZadejte text (nebo popis) dokumentu.
Lotus Product
W32I4
Lotus Product
W32I4
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
leftTop?
dspTemplateName|dspTemplateName?
leftNotesView?
MasterDocLibSmartSuiteOutline?
leftBottom
dspDbTitle|dspDbTitle?
NotesView?
($All)|($All)?
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Language
$LastBuildTime
$BabelInfo
$TITLE
$Comment
$FrameSet
$DesignerVersion
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
"MS Sans Serif
 Response to Response
NewDocTitle
 odpov
 na "
Subject
    1S2S3S4S5S6S
StandardTitle
Odpov
 na "
ImmediateParentSubject"
    0R1S2S3S4S5S6S
NewDocTitle
StandardTitle
    0R4S6S
_Upravit dokumentX
adit do kategorie
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Upravit dokument
    0S0E
it a zav
    4R11S17S
 odpov
views only
Response
    0R4S
 odpov
 na odpov
Response to Response
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
StornoJ
SaveOptions
    1S2S3S
_Upravit dokumentX
adit do kategorie
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Upravit dokument
    0S0E
edit.gif|edit.gifX
it a zav
    4R11S17S
save.gif|save.gifX
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na odpov
Response to Response
NewRespToResp.gif|NewRespToResp.gifX
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
StornoJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX
    form name (used in RespBanner subform)
Response to Response
formname
ResponseBanner
Odpov
formname
Response
    1S2S
    na hlavn
 dokument
formname
Response
    1S2S
    na odpov
DateDatum a
as vytvo
 dokumentuX
TimeCreatedX
Readers
    1S2S
PrivateX
ExpireDate
    1S2S
Expire
doclib_header.gifX
Subject
    0S0E
SubjectZadejte stru
 popis t
to odpov
di.Xz
Subject
Subject
dspSubject
Kategorie:
Categories
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.Xz
Categories
Obsah:
BodyZadejte text odpov
    -------------------------------------------------------------------------------------------------------------------------------------------------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
j20My
$HTMLDocumentStyles
$Info
$SubForms
$$Script_O
$$ScriptName
TimeCreated
$WindowTitle
$ACTIONS
$V5ACTIONS
$Body
$Language
$LastBuildTime
$BabelInfo
 WordPro Document
 dokument aplikace Word Pro
Subject
    4S6S
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
'++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
WordPro.Document
$OLEObjProgIDX
Lotus SmartSuite
    Dokument aplikace Word Pro
FromJm
no autora dokumentu
DateDatum a
as vytvo
 dokumentuX
TimeCreatedX
Scope
Soukrom
    0R1S2S
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Soukrom
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Platnost ukon
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
subject
SubjectZadejte stru
 popis tohoto hlavn
matu.Xz
Subject
Subject
dspSubject
    Kategorie:
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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
Podle kategori
    0R4S5S7S9S15S17S19SX
Scope
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
ReviewerLog
tmpUseOle
    1S2S3S2E4S5S2E6S
OLEBodyX
BodyZadejte text (nebo popis) dokumentu.
ReviewerLog
    1S2S
Lotus Product
W32I4
Lotus Product
W32I4
Lotus Product
W32I4
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
ACS11
$HTMLDocumentStyles
$Info
$SubForms
$DesignerVersion
$$ScriptName
_ViewIcon
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$FormScript
$$Reviewers
$Body
$$Script_O
$$$FormScript_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
OU=DUB/O=Lotus
"MS Sans Serif
 Freelance Document
 prezentace aplikace Freelance
Subject
    4S6S
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
'++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
Lotus SmartSuite X
    Prezentace aplikace FreelanceX
FromJm
no autora dokumentu
DateDatum a
as vytvo
 dokumentuX
TimeCreatedX
Scope
Soukrom
    0R1S2S
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Soukrom
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Platnost ukon
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
subject
SubjectZadejte stru
 popis tohoto hlavn
matu.Xz
Subject
Subject
dspSubject
    Kategorie:
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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
Podle kategori
    0R4S5S7S9S15S17S19SX
Scope
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
Scope
    1S2S
OLEBodyX
BodyZadejte text (nebo popis) dokumentu.
Lotus Product
W32I4
Lotus Product
W32I4
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
HEJ:O$;
$HTMLDocumentStyles
$AUTOLAUNCH
$Info
$SubForms
$DesignerVersion
$$ScriptName
_ViewIcon
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$Reviewers
$Body
$$Script_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
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
GIF89a
OOO///
sZJ.1
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
a`"g07
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$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
W32I4
DeleteOptions
Odstranit p
 datab
    Dokumenty jsou archivov
ArchiveLocation
Local
    1S2S
    Archivn
 datab
ze je ulo
ena na serveru:
    Archivn
 soubor:
Local
ArchiveLocation
 | LocalNa serveru | 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
Zadejte n
zev souboru archivn
 datab
    3S4S6S11SArchivePath
    Po vytvo
 archivn
 datab
servers
names.nsf
($ServersLookup)
    1S2S
selectedserver
Server
Vyberte server, na kter
m chcete vytvo
it archivn
 datab
ArchiveServer
servers
    0R1S2S
ArchiveServer
selectedServer
    0R1S2S3S
?_?__
`!b`1
7`^///?
?b___
`bOOO
`<b!R
@If(@IsN
CopyOptions
rovat dokumenty z p
ho archivu do nov
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Language
$LastBuildTime
$BabelInfo
$Info
$DesignerVersion
$$Script_O
$$ScriptName
$$FormScript
$$$FormScript_O
$Body
Untitled
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
q?N    KA
$Info
$WebFlags
$$ScriptName
$Body
$Language
$LastBuildTime
$BabelInfo
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
Jv'x-
$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
( 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
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
!-J>ty
qmCxl
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$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
    Recenzenti:
Reviewers
Reviewers
ReviewersX
Status
StatusListv
PreviousReviewers
    4S6S7S8S9S10S11S12S13S
edchoz
 recenzenti:
PreviousReviewers
PreviousReviewersX
Status
StatusListv
    4S6S7S8S9S
    Aktu
 recenzent:
CurrentReviewers
CurrentReviewers
Status
StatusListv
FutureReviewers
    4S6S7S8S9S10S11S12S13S
    Budouc
 recenzenti:X
FutureReviewers
FutureReviewersX
Status
StatusListv
Status
StatusListv
    4S6S7S8S9S13S15S16S17S18S
    Typ reviz
ReviewStyle
ReviewStyle
Postupn
 revize | Serial.NoVersionsPostupn
 (zachovat v
echny opravy) | Serial.VersionsRezervace dokument
 | Parallel.NoVersionsSou
 odpov
di | Parallel.Versions
    Term
ReviewWindow
ReviewWindow
U reviz
 limit | NoLimitP
edat dal
mu recenzentovi po: | MoveOnP
nat po: | ReminderX
ReviewTime
ReviewTime
ReviewWindow
NoLimit
dni (dnech)
    3S4S6S8S
tmpReviewUnits
    Upozorn
NotifyAfter
NotifyAfter
Upozornit autora po ka
m recenzentovi | EachUpozornit autora po posledn
m recenzentovi | Final
    ....................
ReviewerLog
    1S2S3S4S
Protokol reviz
ReviewerLog
    1S2S
ReviewerLog
ReviewerLogX
Lotus Product
W32I4
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
DocumentWorkflow
Upravit dokument
    0S0E
it a zav
    4R11S17S
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
Odeslat k reviz
Reviewers
Reviewers
    1S2S3S
Reviewers
Knihovna dokument
ete, kte
ivatel
t recenzenty tohoto dokumentu.
    0RR6S7S9S15S17S21S
Reviewers
Froma
Knihovna dokument
Autora dokumentu nelze uv
st v seznamu recenzent
    0RR9S15S21S23S27S
tmpAction
Submit
    0RR1S2S3S
SaveOptions
    0R1S2S3S
GoToField causes any active embedded objects to de-activate
    0R1S
    0R4S
    0R7S12S>
Status
StatusListv
    5S7S8S
Nastavit cyklus reviz
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
Cyklus reviz
    0RR10S12S13S15S20S
Status
StatusList
    0RR1S2S3S9S12S
ReviewCycle
SaveChoices
ReviewStyle
ReviewWindow
ReviewTime
NotifyAfter
SaveChoices
    0R1S2S3S6S7S9S11S14S15S16S17S18S19S20S21S23S
ReviewTime
ReviewWindow
NoLimit
ReviewTimeX
    0RR1S2S3S6S7S9S11S
tmpReviewUnits
ReviewWindow
NoLimit
dni (dnech)
    0R1S2S3S6S7S9S11S
$OLEObjProgID
(DocProperties)
nosti reviz
    0RR6S7Sr
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S
it cyklus reviz
InReview
Status
StatusListv
    1S2S8S10S11S13S15S
ReviewerList
InReview
CurrentReviewers
    0R1S2S6S8S
Status
StatusList
    0RR1S2S3S7S
ReviewSequence
ichni recenzenti sou
    0R1S2S3S
Versioning
Upravit p
 dokument
    0R1S2S3S
NotifyAfter
Upozornit autora po ka
m recenzentovi
    0R1S2S3S
Reviewers
    0R1S2S3S
PreviousReviewers
    0R1S2S3S
CurrentReviewers
    0R1S2S3S
FutureReviewers
    0R1S2S3S
$VersionOpt
    0R1S2S3S
InReview
ReviewerList
Revize dokumentu:
Subject
Revize tohoto dokumentu od v
 nevy
na. D
kujeme za spolupr
tmpCurrentUser"
Subject
    0RR4S8S10S12S13S14S16S18S19S20S24S26S27S28S29S33S35S36S37S38S40S41S42S45S
Knihovna dokument
Cyklus reviz
 byl p
    0RR4S6S
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S17S18S19S20S
Revize je dokon
tmpAction
Complete
    1S2S3S
SaveOptions
    0R1S2S3S
GoToField causes any active embedded objects to de-activate
    0RR1S
    0R4S
    0R7S12S4
tmpCurrentUser
InProcess
Vlastnosti...XJ
OLEChgSubject
    7S8S
tmpUseOle
$OLEVersion
    0S1S2E2S3S4S
StornoJ
SaveOptions
    1S2S3S
Upravit dokument
    0S0E
edit.gif|edit.gifX
it a zav
    4R11S17S
save.gif|save.gifX
it jako soukrom
Scope
Private
    1S2S3S
Scope
Private
    1S2S
MarkPrivate.gif|MarkPrivate.gifX
it jako ve
Scope
Public
    1S2S3S
Scope
Public
    1S2S
MarkPublic.gif|MarkPublic.gifX
Odeslat k reviz
Reviewers
Reviewers
    1S2S3S
Reviewers
Knihovna dokument
ete, kte
ivatel
t recenzenty tohoto dokumentu.
    0RR6S7S9S15S17S21S
Reviewers
Froma
Knihovna dokument
Autora dokumentu nelze uv
st v seznamu recenzent
    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
Nastavit cyklus reviz
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
Cyklus reviz
    0RR10S12S13S15S20S
Status
StatusList
    0RR1S2S3S9S12S
ReviewCycle
SaveChoices
ReviewStyle
ReviewWindow
ReviewTime
NotifyAfter
SaveChoices
    0R1S2S3S6S7S9S11S14S15S16S17S18S19S20S21S23S
ReviewTime
ReviewWindow
NoLimit
ReviewTimeX
    0RR1S2S3S6S7S9S11S
tmpReviewUnits
ReviewWindow
NoLimit
dni (dnech)
    0R1S2S3S6S7S9S11S
$OLEObjProgID
(DocProperties)
nosti reviz
    0RR6S7Sr
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S
SetupReviewCycle.gif|SetupReviewCycle.gifX
it cyklus reviz
InReview
Status
StatusListv
    1S2S8S10S11S13S15S
ReviewerList
InReview
CurrentReviewers
    0R1S2S6S8S
Status
StatusList
    0RR1S2S3S7S
ReviewSequence
ichni recenzenti sou
    0R1S2S3S
Versioning
Upravit p
 dokument
    0R1S2S3S
NotifyAfter
Upozornit autora po ka
m recenzentovi
    0R1S2S3S
Reviewers
    0R1S2S3S
PreviousReviewers
    0R1S2S3S
CurrentReviewers
    0R1S2S3S
FutureReviewers
    0R1S2S3S
$VersionOpt
    0R1S2S3S
InReview
ReviewerList
Revize dokumentu:
Subject
Revize tohoto dokumentu od v
 nevy
na. D
kujeme za spolupr
tmpCurrentUser"
Subject
    0RR4S8S10S12S13S14S16S18S19S20S24S26S27S28S29S33S35S36S37S38S40S41S42S45S
Knihovna dokument
Cyklus reviz
 byl p
    0RR4S6S
tmpCurrentUser
Status
StatusListv
    1S2S6S8S9S13S15S16S17S18S19S20S
ClearReviewCycle.gif|ClearReviewCycle.gifX
Revize je dokon
tmpAction
Complete
    1S2S3S
SaveOptions
    0R1S2S3S
GoToField causes any active embedded objects to de-activate
    0RR1S
    0R4S
    0R7S12S4
tmpCurrentUser
InProcess
MyRevIsComplete.gif|MyRevIsComplete.gifX
Vlastnosti...XJ
OLEChgSubject
    7S8S
tmpUseOle
$OLEVersion
    0S1S2E2S3S4S
properties.gif|properties.gifX
StornoJ
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
W32I4
Lotus Product
W32I4
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
$$Script_O
$$$FormScript_O
$Language
$LastBuildTime
$BabelInfo
 OLEChgSubject
subject
SubjectZadejte stru
 popis tohoto hlavn
matu.Xz
Subject
    Kategorie:
Categories
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$$ScriptName
$Body
$Language
$LastBuildTime
$BabelInfo
 $45,
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
$36Zm
DocumentG
Status
StatusY
Subject
$VersionOpt
Subject
 dokument cyklu reviz
ReviewStyle
ParallelG
Subject
  (Recenzent: "
LastEditor"
Subject
  (Recenzent: "
PreviousReviewers
Archive
Subject
Subject
(Odpov
OriginalSubject
Subject
 (Odpov
OriginalSubject
    6S9RS4E12S13S14S15S20RS8E22RS4E27RS8E28S29S31RS4E35S38RS9E39S40S41S42S2E43S44S46RS4E47S48S49S50S56S57S60R64S67RS4E69R70S71S73RS5E74S75S76S79R80S81S82S83S84S85S&
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
 dokument MS Office\Tabulka aplikace Excel:
ExcelWorksheet Document
 dokument MS Office\Obr
zek programu PaintbrushX6
Paintbrush Document
 dokument MS Office\Prezentace aplikace PowerPoint6
PowerPoint Document
 dokument MS Office\Dokument aplikace Word2
WordDoc Document
 odpov
views only
Response
    0R4S
 odpov
 na odpov
Response to Response
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Tabulka aplikace Excel:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Obr
zek programu PaintbrushX6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Prezentace aplikace PowerPoint6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Dokument aplikace Word2
WordDoc Document
NewDoc.gif|NewDoc.gifX
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na odpov
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
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
WEb;=})
x0:FHJ
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
%rV,:Nn
$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
N}6I
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
Times New Roman
 ArchiveLog
Protokol o archivaci
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
StornoJ
SaveOptions
    1S2S3S
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
StornoJ
SaveOptions
    1S2S3S
cancel.gif|cancel.gifX
$MessageType
Arch.gif|Arch.gifX
ArchiveProfile
Archive Profile
    1S2S3S4S
Protokol o archivaci X
LogCount
 z celkov
ho po
LogTotal
 ze dne
ArchiveDateX
Funkci archivace lze nyn
stupnit v
rem p
Soubor-Datab
ze-Vlastnosti a klepnut
m na tla
tko Nastaven
 archivu."
Existuj
 nastaven
 archivu bude p
evedeno p
i prvn
m zobrazen
 tohoto dialogov
ho okna.
    1S2S3S4S5S6S7S8S9S10S11S12S2E
Tato funkce byla p
na do dialogov
ho okna s vlastnostmi datab
ze. Toto dialogov
 okno lze zp
stupnit pouze prost
ednictv
m klienta programu Notes.
    0R1S2E2S
ArchiveProfile
Archive Profile
Notes
Nmsg"
ArchiveProfile
Archive Profile
Notes
Wmsg"
    0R4S5S6S7S8S9S11S12S13S14S16R17S18S20RT22S23S24S25S26S27S29S30S31S32S34RTT35S36S38RT
ArchiveTrailer
ArchiveTrailer
    Hidden:  X
Protokol o archivaci ze dne
ArchiveDate
    1S2S
SubjectX
(Archiv)
Categories
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
$Info
$$ScriptName
ArchiveDate
$WindowTitle
$ACTIONS
$V5ACTIONS
$Body
$Language
$LastBuildTime
$BabelInfo
"MS Sans Serif
ResponseBanner
Odpov
formname
Response
    1S2S
    na hlavn
 dokument
formname
Response
    1S2S
    na odpov
FromDocument author name
DateThe date/time when the document was composed
TimeCreatedX
Scope
Private
    0R1S2S
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Soukrom
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Platnost ukon
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
Subject
    0S0E
SubjectZadejte stru
 popis t
to odpov
di.Xz
Subject
Subject
dspSubject
Kategorie:
Categories
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.Xz
Categories
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$$ScriptName
TimeCreated
$Body
$Language
$LastBuildTime
$BabelInfo
 dokument
Subject
    4S6S
&Arial
"MS Sans Serif
'++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
Lotus Product
W32I4
 Document'++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
Lotus Product
W32I4
DocumentWorkflow
Knihovna Lotus SmartSuite
    Hlavn
 dokument
FromJm
no autora dokumentu
DateDatum a
as vytvo
 dokumentu
TimeCreated
Scope
Private
    0R1S2S
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
Private
ExpireDate
    1S2S
expiredate
Platnost ukon
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gif
subject
SubjectZadejte stru
 popis tohoto hlavn
matu.
Subject
Subject
dspSubject
    Kategorie:
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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
    0R4S5S7S9S15S17S19S
Status
StatusListv
    4S6S7S8S9S
    Recenzenti:
Reviewers
Reviewers
Reviewers
Status
StatusListv
PreviousReviewers
    4S6S7S8S9S10S11S12S13S
edchoz
 recenzenti:
PreviousReviewers
PreviousReviewers
Status
StatusListv
    4S6S7S8S9S
    Aktu
 recenzent:
CurrentReviewers
CurrentReviewers
Status
StatusListv
FutureReviewers
    4S6S7S8S9S10S11S12S13S
    Budouc
 recenzenti:
FutureReviewers
FutureReviewers
Status
StatusListv
Status
StatusListv
    4S6S7S8S9S13S15S16S17S18S
    Typ reviz
ReviewStyle
ReviewStyle
Postupn
 revize | Serial.NoVersionsPostupn
 (zachovat v
echny opravy) | Serial.VersionsRezervace dokument
 | Parallel.NoVersionsSou
 odpov
di | Parallel.Versions
    Term
ReviewWindow
ReviewWindow
U reviz
 limit | NoLimitP
edat dal
mu recenzentovi po: | MoveOnP
nat po: | Reminder
ReviewTime
ReviewTime
ReviewWindow
NoLimit
dni (dnech)
    3S4S6S8S
tmpReviewUnits
    Upozorn
NotifyAfter
NotifyAfter
Upozornit autora po ka
m recenzentovi | EachUpozornit autora po posledn
m recenzentovi | Final
ReviewerLog
    1S2S3S4S
Protokol reviz
ReviewerLog
    1S2S
ReviewerLog
ReviewerLog
    ....................
BodyZadejte text (nebo popis) dokumentu.
_Upravit dokument
DocumentAuthors
    9S15S
adit do kategorie
Po_stoupit
esunout do slo
ky...
_Odebrat ze slo
O_deslat dokument
_Upravit dokument
DocumentAuthors
    9S15S
adit do kategorie
Po_stoupit
esunout do slo
ky...e
_Odebrat ze slo
O_deslat dokument
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$HTMLDocumentStyles
$Language
$LastBuildTime
$BabelInfo
$Info
$SubForms
$WindowTitle
$DesignerVersion
$Script
$$Script_O
$$ScriptName
$$Reviewers
$Reviewers_O
TimeCreated
ReviewTime
$Body
$V5ACTIONS
$ACTIONS
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
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
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
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
Tu],l
$Info
$Body
$Language
$LastBuildTime
$BabelInfo
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
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
Private
Private
CN=Lotus Notes Template Development/O=Lotus Notes
expiredate
Platnost ukon
expiredateK
Expirez
Expire
CN=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=Lotus Notes Template Development/O=Lotus Notes
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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 naed to be done.
NoCache
By Category
    0R4S5S7S9S15S17S19SX
CN=Lotus Notes Template Development/O=Lotus Notes
expiredate
Platnost ukon
expiredateK
Expirez
Expire
CN=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=Lotus Notes Template Development/O=Lotus Notes
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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
CN=Lotus Notes Template Development/O=Lotus Notes
operties
 nebo obnoven
 platnosti do
save.gifsave.gif
properties
    w.gifSubmitForReview.gif
oclibDocHeader.gif
Arch.gifArch.gif
DoclibOutline.gifDoclibOutline.gif
er.gif
uite\Se
it progamu 1-2-31-2-3Workbook Document
gSubject
uite\Dokument aplikace Word ProWordPro Document
(Archive Log)Archive LogArchiveProfileArchive Profil
cancel.gifcancel.gif
 nebo obnoven
 platnost
ClearReviewCycle.gifCl
DoclibSmartSuiteFrameset|Docif
MarkDo
MasterDocLibSmartSuiteOutlineMasterDocLibSmartQuiteOutli
cancel.gifcancel.gif
(DocProp
MyRevIsComplete.gifMyRevIsComplete.gif
eviewOptions
DokumentDocument
NewRespToMain.gifNewRespToMain.gif
Lotus
Odpov
 na odpov
Response to Response
(Archive Log)Archive LogArchiveProfileArchive ProfileArc
(OLEChgSubject)OLEChgSubject
cancal.gifcancel.gif
.gifcancel.gif
ifcancel.gif
nsen/O=IrisC
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
lance Document
(Archive Log)ArcO=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
cancel.gifcancel.gif
CN=Debbie Branco/O=IrisCA=
le.gif
DoclibOutline.gifDoclibOutline.gif
DoclibDocHeader.gifDoclibDocHeader.gif
Arch.gifArch.gif
FromJm
no autora dokumentu
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
pplication, 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=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
FromJm
no autora dokumentu
CN=Debbie Branco/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
Private
Private
Odpov
 na odpov
Response to Response
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
 nebo obnoven
 platnosti dokumentu
edit.gifedit.gif
SetupReviewCycle.gifSetupReviewCycle.gif
DoclibOutline.gifDoclibOutline.gif
DoclibDocHeader.gifDoclibDocHeader.gif
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutline
save.gifsave.gif
properties.gifproperties.gif
Lotus SmartSuite\Se
it progamu 1-2-31-2,3Workbook Document
dspDbTitledspDbTitle
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Document
MarkPrivate.gifMarkPrivate.gif
MarkPublic.gifMarkPublic.gif
NewDoc.gifNewDoc.gif
NewResp.gifNewResp.gif
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
(DocProperties)DocProperties
ReviewOptionsReviewOptions
dspTemplateNamedspTemplateName
(OLEChgSubject)OLEChgSubject
DoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset
DokumentDocument
Arch.gifArch.gif
cancel.gifcancel.gif
ClearReviewCycle.gifClearReviewCycle.gif
MarkDocAsExpired.gifMarkDocAsExpired.gif
Odpov
Response
MyRevIsComplete.gifMyRevIsComplete.gif
NewRespToMain.gifNewRespToMain.gif
NewRespToResp.gifNewRespToResp.gif
NewRespToResp.gifNewRespToResp.gif
spToResp.gif
cancel.gif
operties
 nebo obnoven
 platnosti do
save.gifsave.gif
properties
    w.gifSubmitForReview.gif
oclibDocHeader.gif
Arch.gifArch.gif
DoclibOutline.gifDoclibOutline.gif
er.gif
uite\Se
it progamu 1-2-31-2-3Workbook Document
gSubject
uite\Dokument aplikace Word ProWordPro Document
(Archive Log)Archive LogArchiveProfileArchive Profil
cancel.gifcancel.gif
 nebo obnoven
 platnost
ClearReviewCycle.gifCl
DoclibSmartSuiteFrameset|Docif
MarkDo
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutli
cancel.gifcancel.gif
(DocProp
MyRevIsComplete.gifMyRevIsComplete.gif
eviewOptions
DokumentDocument
NewRespToMain.gifNewRespToMain.gif
Lotus
Odpov
 na odpov
Response to Response
(Archive Log)Archive LogArchiveProfileArchive ProfileArc
(OLEChgSubject)OLEChgSubject
cancel.gifcancel.gif
.gifcancel.gif
ifcancel.gif
nsen/O=IrisC
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
Agent vybere dokumenty
 na revizi, pro kter
 vypr
el term
n revize. Dokument je potom v z
vislosti na nastaven
sobu revize odesl
n dal
mu recenzentovi, ozna
en jako dokon
 nebo je aktu
mu recenzentovi pouze odesl
no upozorn
 na zpo
 revize.
CN=Marina Bodik/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
 nebo obnoven
 platnosti dokumentu
MarkPublic.gifMarkPublic.gif
NewDoc.gifNewDoc.gif
NewResp.gifNewResp.gif
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
(DocProperties)DocProperties
ReviewOptionsReviewOptions
dspTemplateNamedspTemplateName
(OLEChgSubject)OLEChgSubject
DoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset
Arch.gifArch.gif
cancel.gifcancel.gif
ClearReviewCycle.gifClearReviewCycle.gif
MarkDocAsExpired.gifMarkDocAsExpired.gif
Odpov
Response
MyRevIsComplete.gifMyRevIsComplete.gif
NewRespToMain.gifNewRespToMain.gif
NewRespToResp.gifNewRespToResp.gif
SubmitForReview.gifSubmitForReview.gif
SetupReviewCycle.gifSetupReviewCycle.gif
DoclibOutline.gifDoclibOutline.gif
edit.gifedit.gif
DoclibDocHeader.gifDoclibDocHeader.gif
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Odpov
 na odpov
Response to Response
DokumentDocument
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutline
save.gifsave.gif
properties.gifproperties.gif
Lotus SmartSuite\Se
it progamu 1-2-31-2-3Workbook Document
dspDbTitledspDbTitle
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Document
uite\Prezentace aplikace FreelanceFreelance Document
nce Document
cancel.gif
operties
 nebo obnoven
 platnosti do
save.gifsave.gif
properties
    w.gifSubmitForReview.gif
oclibDocHeader.gif
Arch.gifArch.gif
DoclibOutline.gifDoclibOutline.gif
er.gif
uite\Se
it progamu 1-2-31-2-3Workbook Document
gSubject
uite\Dokument aplikace Word ProWordPro Document
(Archive Log)Archive LogArchiveProfileArchive Profil
cancel.gifcancel.gif
 nebo obnoven
 platnost
ClearReviewCycle.gifCl
DoclibSmartSuiteFrameset|Dhcif
MarkDo
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutli
cancel.gifcancel.gif
(DocProp
MyRevIsComplete.gifMyRevIsComplete.gif
eviewOptions
DokumentDocument
NewRespToMain.gifNewRespToMain.gif
Lotus
Odpov
 na odpov
Response to Response
(Archive Log)Archive LogArchiveProhileArchive ProfileArc
(OLEChgSubject)OLEChgSubject
cancel.gifcancel.gif
.gifcancel.gif
ifcancel.gif
nsen/O=IrisC
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
lance Document
(Archive Log)ArcO=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
cancel.ghfcancel.gif
CN=Debbie Branco/O=IrisCN=
le.gif
DoclibOutline.gifDoclibOutline.gif
DoclibDocH
edit.gifedit.gif
ClearReviewCycle.gifClearReviewCycle.gif
ment/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
cAsExpired.gifMarkDocAsExpired.gif
t aplikace Word ProWordPro Documen
NewDoc.gifNewDoc.gif
MyRevIsComplete.gifMyRevIsCompleplate Development/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=
NewRespToMaiJ
Lotus SmartSuite\Obr
zek programspToResp.gif
properties.gifproperties.gif
SubmitForReview.gifSubmitForReview.gMcCarthy/OU=DUB/O=LotusCN=John(Clair/O=Connect
?b.gifSetupReviewCycle.gif
DoclibOutline.gifDoclibOutline.gif
DoclibDocHeader.gifDoclibDocHeader.gif
Arch.gifArch.gif
cancel.gif
 nebo obnoven
 platnosti dokumentu
NewDoc.gifNewDoc.gif
NewResp.gifNewResp.gif
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
(DocProperties)DocProperties
ReviewOptionsReviewOptions
dspTemplateNamedspTemplateName
(OLEChgSubject)OLEChgSubject
DoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset
Arch.gifArch.gif
cancel.gifcancel.gif
ClearReviewCycle.gifClearReviewCycle.gif
MarkDocAsExpired.gifMarkDocAsExpired.gif
Odpov
Response
MyRevIsComplete.gifMyRevIsCoeplete.gif
NewRespToMain.gifNewRespToMain.gif
NewRespToResp.gifNewRespToResp.gif
SubmitForReview.gifSubmitForReview.gif
SetupReviewCycle.gifSetupReviewCycle.gif
DoclibOutline.gifDoclibOutline.gif
edit.gifedit.gif
DoclibDocHeader.gifDoclibDocHeader.gif
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Odpov
 na odpov
Response to Response
DokumentDocument
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutline
save.gifsave.gif
properties.gifproperties.gif
Lotus SmartSuite\Se
it progamu 1-5-31-2-3Workbook Document
dspDbTitledspDbTitle
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Document
MarkPrivate.gifMarkPrivate.gif
MarkPrivate.gifMarkPrivate.gif
kPrivate.gif
cancel.gif
operties
 nebo obnoven
 platnosti do
save.gifsave.gif
properties
    w.gifSubmitForReview.gif
oclibDocHeader.gif
Arch.gifArch.gif
DoclibOutline.gifDoclibOutline.gif
er.gif
uiteUSe
it progamu 1-2-31-2-3Workbook Document
gSubject
uite\Dokument aplikace Word ProWordPro Document
(Archive Log)Archive LogArchiveProfileArchive Profil
cancel.gifcancel.gif
 nebo obnoven
 platnost
ClearReviewCycle.gifCl
DoclibSmartSuiteFrameset|Docif
MarkDo
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutli
cancel.gifcancel.gif
(DocProp
MyRevIsComplete.gifMyRevIsComplete.gif
eviewOptions
DokumentDocument
NewRespToMain.gifNewRespToMain.gif
Lotus
Odpov
 na odpov
Response to Response
(Archive Log)Archive LogArchiveProfileArchive ProfileArc
(OLEChgSubject)OLEChgSubject
cancel.gifcancel.gif
.gifcancel.gif
ifcancel.gif
nsen/O=IrisC
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
lance Document
(Archive Log)ArcO=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
cancel.gifcancel.gif
CN=Debbie Branco/O=IrisCN=
le.gif
DoclibOutline.gifDoclibOutline.gif
DoclibDocH
edit.gifedit.gif
ClearReviewCycle.gifClearReviewCycle.gif
ment/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
cAsExpired.gifMarkDocAsExpired.gif
t aplikace Word ProWordPro%Documen
NewDoc.gifNewDoc.gif
MyRevIsComplete.gifMyRevIsCompleplate Development/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=
NewRespToMaiJ
Lotus SmartSuite\Obr
zek programspToResp.gif
properties.gifproperties.gif
SubmitForReview.gifSubmitForReview.gMcCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
?b.gifSetupReviewCycle.gif
DoclibOutline.gifDoclibOutline.gif
CN=Marina Bodik/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connect
Lotus SmartSuite\Se
it progamu 1-2-31-2-3Workbook Document
CN=John Thornton/O=IrisCN=Lotus Notes Template Development/O=Lotus NotesCN=Niall McCerthy/OU=DUB/O=LotusCN=John Clair/O=Connect
Times New Roman
    0S0E
t okno
O knihovn
 dokument
 sady Lotus SmartSuite Millennium EditionX
 @  @@ @` @
@@ @@@@@`@@
`@ `@@`@``@
    ** Tato
ablona nen
ena pro pou
ti WWW (v prohl
i) a nen
 podporov
na v syst
mech Macintosh.
emu slou
 tato datab
    Pomoc
to datab
ze mohou u
ivatel
 programu Notes integrovat vytv
 a ukl
 dokument
 aplikac
 Word Pro, Freelance a program
 1-2-3 nebo Paintbrush v sad
 Lotus SmartSuite p
mo do programu Notes. Datab
le slou
 jako elektronick
 obdoba po
e, kter
m pracovn
 skupiny usnad
uje hled
, aktualizaci a tisk po
adovan
ch dokument
. Lze do n
it libovoln
 druh dokument
 - od anal
z vlivu v
roby na
ivotn
 prost
 vytvo
ch v aplikaci Word Pro, kter
ije skupina projektant
 po finan
 anal
zy pro skupinu bankovn
ch analytik
 pracuj
ch s programem 1-2-3.X
    Knihovna dokument
 je datab
ze i rozhran
 ke zpracov
 dokument
 vytvo
ch v aplikac
ch spole
nosti Lotus a obsahuje rovn
 funkce pro spr
vu dokument
 (nap
klad mo
nost archivace a cyklu reviz
    Komu je tato datab
ze ur
    Datab
ze je ur
ena v
ivatel
m, kte
znamy o dokumentech nebo prov
t revize dostupn
ch dokument
    Nejd
 funkceX
    Cyklus reviz
     Slou
 ke sm
 dokumentu n
kolika p
    Archivace dokument
    Slou
esunu dokument
 s ukon
enou platnost
 do archivn
 datab
    OLE/ActiveX:
    Program Notes spou
 aplikace sady Lotus SmartSuite v aktivn
, nikoli v samostatn
m okn
ivatel tak z
 pocit,
e pracuje v p
 aplikaci OLE, a
koli pracuje st
le v programu Notes.X
    Doporu
pravy
    Fulltextov
 vyhled
     Chcete-li v datab
zi vytvo
 podle t
ablony vyu
vat funkc
 fulltextov
ho vyhled
 programu Notes, klepn
te v nab
dce Soubor na p
kaz Datab
ze a Vlastnosti, p
te na kartu Pln
 text a klepnut
m na tla
tko Vytvo
it index vytvo
te fulltextov
 index.
    Kde hledat dal
 informace?
 informace naleznete v dokumentu X
to datab
     nebo v n
sleduj
 datab
zi dokumentace na adrese X
    http://www.notes.net:X
    Best Practices: Templates and Sample Databases (BPTEMP.NSF) (Nejefektivn
 postupy:
ablony a uk
 datab
stupov
 upozorn
ichni u
ivatel
 datab
ze by m
stupov
va na
rovni Autor. T
m se zamez
 neopr
m dokument
ch v datab
zi. U
ivatel
m a reviz
m konkr
ch dokument
 jsou zad
ni v poli Autor jednotliv
ch formul
. Pokud se u
ivatel s p
stupov
mi pr
vy editora pokus
nit dokument, a
koli nen
 jeho opr
m recenzentem, dojde k chyb
 upozorn
ablona knihovny Lotus SmartSuite Library (5.0) by m
t pou
na pouze k vytv
ch aplikac
. Aktualizace st
ch aplikac
 knihovny dokument
 pomoc
ablony nen
 podporov
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$DesignerVersion
$Body
$Language
$LastBuildTime
$BabelInfo
$SUBVIEW1
$45$36
$36$43
$43YPodle jm
na _autora|By Author
$45$42$36$43$Conflict
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
Status
StatusY
Subject
$VersionOpt
Subject
 dokument cyklu reviz
ReviewStyle
ParallelG
Subject
  (Recenzent: "
LastEditor"
Subject
  (Recenzent: "
PreviousReviewers
Archive
Subject
Subject
(Odpov
OriginalSubject
Subject
 (Odpov
OriginalSubject
    6S9RS4E12S13S14S15S20RS8E22RS4E27RS8E28S29S31RS4E35S38RS9E39S40S41S42S2E43S44S46RS4E47S48S49S50S56S57S60R64S67RS4E69R70S71S73RS5E74S75S76S79R80S81S82S83S84S85S
forma
archive
    L1S9Scs-CZ
0000016A
CN=Lotus Notes Template Development/O=Lotus Notes81S82S83S
cs-CZ
0000016EStav reviz
|Review Status:
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
CurrentReviewers
FutureReviewers
    5S6S8S10S
Status$40$41SubjectFrom$26DueDateTime$Conflict$REF
Statush
Status
forma
archive
    L1S5S6S7S8S9S10S18S1%
StatusDueDateTime
Subject$26
DueDateTime$26Y5
CN=Lotus Notes Template Development/O=Lotus Notes######################################
##########################################################
##########################################################
##########################################################
cs-CZ
0000011EDoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset#4C5
CN=Lotus Notes Template Development/O=Lotus Notesemplate Development/O=Lotus N
##########################################################
##########################################################
##########################################################
cs-CZ,+Q
0000012E
DokumentDocumentDocumentWorkflow5
BodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthorsC33D9327075CE06590AC164D3F45C98A0DD239F9264C3B570384CA03FCC90C0A67843E4301C6054E658E2C2D65E5AC9DCN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus NotesDevelopment/O=Lotus No
##########################################################
34CiQpeanutbutter_files.gif
Arch.gifArch.gifcs-CZn/Q
000001F2
CN=Lotus Notes Template Development/O=Lotus Notesthy/OU=DUB/O=LotusCN=John Clair/O=ConnectCN=Lotus Notes
##########################################################
##########################################################
cancel.gif
cancel.gifcancel.gifaction barcs-CZ
000001AE
CN=Lotus Notes Template Development/O=Lotus NotesotusCN=John Clair/O=ConnectCN=Lotus Notes Temp
##########################################################
##########################################################
E4fL35
 nebo obnoven
 platnosti dokumentucs-CZ
00000196"
CN=Lotus Notes Template Development/O=Lotus Notesohn Clair/O=ConnectUkon
 nebo
##########################################################
cs-CZ
00000186Zpracovat opo
 revize
Agent vybere dokumenty
 na revizi, pro kter
 vypr
el term
n revize. Dokument je potom v z
vislosti na nastaven
sobu revize odesl
n dal
mu recenzentovi, ozna
en jako dokon
 nebo je aktu
mu recenzentovi pouze odesl
no upozorn
 na zpo
 revize.*1SfL35
CN=Lotus Notes Template Development/O=Lotus Notes recenzentovi pouze odes
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
(Unlock Document)Agent se pou
e dokument je ne
mysln
 ponech
n v zamknut
m stavu. Je dostupn
m a spr
m v pohledu Stav reviz
.cs-CZ
000001A6=
CN=Lotus Notes Template Development/O=Lotus Notesupn
m a spr
m v pohledu Stav reviz
.cs-CZ
##########################################################
clear review cycle.gif
ClearReviewCycle.gifClearReviewCycle.gifaction barcs-CZ
000001B2
CN=Lotus Notes Template Development/O=Lotus NotesConnectCN=Lotu
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
mark doc as expired.gif
MarkDocAsExpired.gifMarkDocAsExpired.gifaction barcs-CZ
000001BA
CN=Lotus Notes Template Development/O=Lotus NotesConnectCN=Lot
##########################################################
##########################################################
ResponseBanner5
OriginalSubjectBodyCategoriesSubjectTimeCreatedDateFromformname
Odpov
Responsecs-CZV+Q
00000132
CN=Lotus Notes Template Development/O=Lotus Notesy/OU=DUB/O=LotusCN=John Clair/O=ConnectCN=Lotus Notes Tem
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
my review is complete.gif
MyRevIsComplete.gifMyRevIsComplete.gifaction barcs-CZ
000001C6
CN=Lotus Notes Template Development/O=Lotus NotesO=ConnectCN=L
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
new response to main.gif
NewRespToMain.gifNewRespToMain.gifaction barcs-CZ
000001CE
CN=Lotus Notes Template Development/O=Lotus Notesair/O=ConnectCN=Lo
##########################################################
##########################################################
new response to response.gif
NewRespToResp.gifNewRespToResp.gifactoin barcs-CZ /Q
000001D2
CN=Lotus Notes Template Development/O=Lotus Notesair/O=ConnectC
cs-CZ
000001F6Private5
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Private
PrivTxt
    0R3S4S6S8S
Private
Private
CN=Lotus Notes Template Development/O=Lotus Notes##########################################
##########################################################
##########################################################
##########################################################
##########################################################
submit for review.gif
SubmitForReview.gifSubmitForReview.gifaction barcs-CZ6/Q
000001DE
CN=Lotus Notes Template Development/O=Lotus NotesO=ConnectCN=Lotus
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
setup review cycle.gif
SetupReviewCycle.gifSetupReviewCycle.gifaction barcs-CZE/Q
000001E6
CN=Lotus Notes Template Development/O=Lotus NotesConnectCN=Lotu
##########################################################
##########################################################
doclib_4-19.gif
DoclibOutline.gifDoclibOutline.gifOutline frame graphiccs-CZP/Q
000001EA
CN=Lotus Notes Template Development/O=Lotus NotesctCN=Lotus Notes
##########################################################
##########################################################
edit.gif
edit.gifedit.gifaction barcs-CZ
000001B6
CN=Lotus Notes Template Development/O=Lotus Notes/O=LotusCN=John Clair/O=ConnectCN=Lotus Notes Templa
##########################################################
##########################################################
DoclibDocHeader.gif
DoclibDocHeader.gifDoclibDocHeader.gifused in main and resp formscs-CZe/Q
000001EE
CN=Lotus Notes Template Development/O=Lotus Notes N
##########################################################
##########################################################
##########################################################
##########################################################
 $54Datum
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
SubjectN
Subject
Subject
$25Zm
$53Autor,
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
 dokument MS Office\Tabulka aplikace Excel:
ExcelWorksheet Document
 dokument MS Office\Obr
zek programu PaintbrushX6
Paintbrush Document
 dokument MS Office\Prezentace aplikace PowerPoint6
PowerPoint Document
 dokument MS Office\Dokument aplikace Word2
WordDoc Document
 odpov
views only
Response
    0R4S
 odpov
 na odpov
Response to Response
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Tabulka aplikace Excel:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Obr
zek programu PaintbrushX6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Prezentace aplikace PowerPoint6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Dokument aplikace Word2
WordDoc Document
NewDoc.gif|NewDoc.gifX
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na odpov
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
 Status  $40
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
SubjectN
zevFromVytvo
il$26RecenzentiZ
CurrentReviewers
FutureReviewers
    5S6S8S10SDueDateTimeTerm
n dokon
adit do kategorie
_Upravit dokumentn
O_deslat dokument
Po_stoupit
esunout do slo
ky...
_Odebrat ze slo
ky...
 dokument
Document
NewDoc.gif|NewDoc.gif?
 dokument sady Lotus SmartSuite\Se
it programu 1-2-3 8
1-2-3Workbook Document
NewDoc.gif|NewDoc.gif?
 dokument sady Lotus SmartSuite\Obr
zek programu Paintbrush
Dokument programu Paintbrush
NewDoc.gif|NewDoc.gif?
 dokument sady Lotus SmartSuite\Prezentace aplikace Freelance
Dokument aplikace Freelance
NewDoc.gif|NewDoc.gif?
 dokument sady Lotus SmartSuite\Dokument aplikace Word Pro2
WordPro Document
NewDoc.gif|NewDoc.gif?
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gif?
 odpov
 na odpov
Response to Response
NewRespToResp.gif|NewRespToResp.gif?
Odemknout dokument4
(Unlock Document)
Server
    1S2S6S
    0R1S2S6S
Server
    0R7S8S11S13S14S15S16S
MarkPublic.gif|MarkPublic.gif?
adit do kategorie
_Upravit dokument
O_deslat dokument
Po_stoupit
esunout do slo
ky...
_Odebrat ze slo
ky...
 dokuments*
Document
 dokument sady Lotus SmartSuite\Se
it programu 1-2-3
1-2-3Workbook Document
 dokument sady Lotus SmartSuite\Obr
zek programu Paintbrush\>
Dokument programu Paintbrush
 dokument sady Lotus SmartSuite\Prezentace aplikace Freelance
Dokument aplikace Freelance
 dokument sady Lotus SmartSuite\Dokument aplikace Word Pro2
WordPro Document
 odpov
views only
Response
    0R4S
 odpov
 na odpov
Response to Response
Odemknout dokument4
(Unlock Document)
Server
    1S2S6S
    0R1S2S6S
Server
    0R7S8S11S13S14S15S16S
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Language
$LastBuildTime
$BabelInfo
$TITLE
$Index
$Formula
$FormulaClass
$VIEWFORMAT
$Comment
$DesignerVersion
$V5ACTIONS
$ACTIONS
$29$30$27From$Conflict
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
ExpTxt
ExpireDate
DATUM UKON
 PLATNOSTI:
    1S2S5S6S8S9S10S
DocumentG
Status
StatusY
ExpTxt
Subject
$VersionOpt
ExpTxt
Subject
 dokument cyklu reviz
ReviewStyle
ParallelG
ExpTxt
Subject
  (Recenzent: "
LastEditor"
ExpTxt
Subject
  (Recenzent: "
PreviousReviewers
Archive
Subject
Subject
ExpTxt
(Odpov
 na dokument
OriginalSubject
ExpTxt
Subject
 (Odpov
 na dokument "
OriginalSubject
    0RR6S9RS4E12S13S14S15S20RS7E21S22S24RS4E29RS7E30S31S32S33S35RS4E39S42RS7E43S44S3E45S46S47S48S2E49S50S52RS7E53S54S55S56S57S58S64S65S68R72S75RS4E77R78S79S81RS5E82S83S84S85S86S89R90S91S92S93S94S95S96S97S
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
ExpTxt
ExpireDate
DATUM UKON
 PLATNOSTI:
    1S2S5S6S8S9S10S
DocumentG
Status
StatusY
ExpTxt
Subject
$VersionOpt
ExpTxt
Subject
 dokument cyklu reviz
ReviewStyle
ParallelG
ExpTxt
Subject
  (Recenzent: "
LastEditor"
ExpTxt
Subject
  (Recenzent: "
PreviousReviewers
Archive
Subject
Subject
ExpTxt
(Odpov
 na dokument
OriginalSubject
ExpTxt
Subject
 (Odpov
 na dokument "
OriginalSubject
    0RR6S9RS4E12S13S14S15S20RS7E21S22S24RS4E29RS7E30S31S32S33S35RS4E39S42RS7E43S44S3E45S46S47S48S2E49S50S52RS7E53S54S55S56S57S58S64S65S68R72S75RS4E77R78S79S81RS5E82S83S84S85S86S89R90S91S92S93S94S95S96S97S
$27Datum
FromAutor&
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
 odpov
views only
Response
    0R4S
 odpov
 na odpov
Odpov
 na odpov
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
NewDoc.gif|NewDoc.gifX
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na odpov
Odpov
 na odpov
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
780Bq9AResponse~}
($All)
TextBox1V
echny dokumenty
TextBox2Podle jm
na autora
TextBox3Obl
 dokumenty
TextBox4Podle stavu reviz
TitleDokumenty:X
AllDocsX
($All)
ByAuthor
By AuthorX
ByStatus
Review StatusX
MyFavDocsX
 dokumenty
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
$ACLDigest$Signature$UpdatedBy$Name$ReplVersion$TITLE$ReplSrcServers$ReplClassMasks$ReplFormula$ReplView$ReplPrivateFolder$ReplFields$Flags$PublicAccess$ScriptLib_O$ScriptLib$Language$LastBuildTime$BabelInfo$FrameSet$Fonts$HTMLDocumentStyles$BackgroundR5$Info$DesignerVersion$$ScriptName$Body$WindowTitle$WebFlagsReviewTime_1ReviewStyleReviewWindowNotifyAfterReviewTimeSaveChoices$Fields$Babel_Tags$ACTIONS$V5ACTIONS$SubForms$$Script_O$Reviewers_ODocumentAuthorsDocumentReadersLastEditor$OLEObjField$OLEObjRichTextFieldFromDateTimeCreatedSubjectCategoriesReviewersPreviousReviewersCURRENTREVIEWERSFutureReviewersReviewerLogBody$$XMB$$XMB_2$$XMB_3$Licensee$Script$$ReviewersformnameOriginalSubjectPrivateExpireImmediateParentSubject$$$FormScript_ODeleteOptionsArchiveLocationArchiveServerArchivePathCopyOptions$$FormScript_ViewIcon$OLEObjProgIDOLEBodyDate_1TimeCreated_1$AUTOLAUNCHnProfileStatus$ProfileAuthors_O$SubjectOp_O$ProfileStrings_O$ProfileCategories_O$ProfileStatus_O$ProfileDocType_O$HLMLastServer$HLMLastChecked$NoPurge$HLTypeCategoryOpEventOpReplicaID$HLTitle$QueryTypeAuthorMatchProfileAuthorsSubjectMatchSubjectOpProfileStringsCategoryMatchProfileCategoriesStatusMatchProfileStatusDocMatchProfileDocTypeAdvFormula$HLEnabled$HLMonitorType$HLFormula$HLSubscription$$ProfileAuthors$$SubjectOp$$ProfileStrings$$ProfileCategories$$ProfileStatus$$ProfileDocTypeDocLife$ManualArchivers_OObsoleteLifeDocumentLife$MessageTypeLogCountLogTotalArchiveDateArchiveTrailer$DesignVersion$Version$Formula$FormulaClass$Collation$Collection$ViewContainer$TYPE$Index$Collation1$Collation2$VIEWFORMAT$Collation3$Collation4$ViewMapLayout$ViewMapDataset$LeftToDo$AssistType$AssistLastRun$AssistDocCount$AssistFlags$AssistTrigger$AssistInfo$AssistAction_Ex$AssistRunInfo$AssistVersion$AssistAction$AssistQuery$MachineName$Comment$Operation$Scan$ImagesWide$ImagesHigh$ImagesColorize$ImageNames$ImageData$SiteMapList$TemplateModTime$TemplateServerName$TemplateFileName$DefaultFrameset$FlagsNoRefreshIconBitmap$FolderObject$FolderIDTable
 Categories"
Categories
Categories
$54Datum
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
SubjectN
Subject
Subject
$25Zm
$53Autor,
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
 dokument MS Office\Tabulka aplikace Excel:
ExcelWorksheet Document
 dokument MS Office\Obr
zek programu PaintbrushX6
Paintbrush Document
 dokument MS Office\Prezentace aplikace PowerPoint6
PowerPoint Document
 dokument MS Office\Dokument aplikace Word2
WordDoc Document
 odpov
views only
Response
    0R4S
 odpov
 na odpov
Response to Response
adit do kategorie
_Upravit dokumentX
O_deslat dokumentX
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
ky...
 dokumentX*
Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Tabulka aplikace Excel:
ExcelWorksheet Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Obr
zek programu PaintbrushX6
Paintbrush Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Prezentace aplikace PowerPoint6
PowerPoint Document
NewDoc.gif|NewDoc.gifX
 dokument MS Office\Dokument aplikace Word2
WordDoc Document
NewDoc.gif|NewDoc.gifX
 odpov
views only
Response
    0R4S
NewResp.gif|NewResp.gifX
 odpov
 na odpov
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
,7V`
$Index
$FormulaClass
$Formula
$VIEWFORMAT
$ACTIONS
$V5ACTIONS
$Language
$LastBuildTime
$BabelInfo
"MS Sans Serif
FBody
 Paintbrush Document
zek programu Paintbrush
Subject
    4S6S
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
_Upravit dokumentX
DocumentAuthors
    9S15S
adit do _kategorie
Po_stoupit
esunout do slo
ky...X
_Odebrat ze slo
Odeslat doku_mentX
'++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
Lotus SmartSuite
zek programu PaintbrushX
FromJm
no autora dokumentu
DateDatum a
as vytvo
 dokumentuX
TimeCreatedX
Scope
Soukrom
    0R1S2S
variable to translate
PrivTxt
Soukrom
    0R1S2S
end variable to translate
    0R1S
scope
Soukrom
PrivTxt
    0R3S4S6S8S
PrivateX
ExpireDate
    1S2S
expiredate
Platnost ukon
expiredateK
Expire
DoclibDocHeader.gif|DoclibDocHeader.gifX
subject
SubjectZadejte stru
 popis tohoto hlavn
matu.Xz
Subject
Subject
dspSubject
    Kategorie:
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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
Podle kategori
    0R4S5S7S9S15S17S19SX
Scope
tmpUseOle
    1S2S3S2E4S5S2E6S
(DocProperties) | DocProperties
ReviewerLog
    1S2S
OLEBodyX
BodyZadejte text (nebo popis) dokumentu.
Lotus Product
W32I4
Lotus Product
W32I4
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
$DesignerVersion
$$ScriptName
_ViewIcon
TimeCreated
ReviewTime
$WindowTitle
$ACTIONS
$V5ACTIONS
$Script
$$Reviewers
$Body
$$Script_O
$Reviewers_O
$Language
$LastBuildTime
$BabelInfo
'++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 = ""Prob
 revize""", 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) <> "
" 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 = "Term
n revize dokumentu vypr
        maildoc.FlowStatus = "Dokon
ete revizi tohoto dokumentu. Dokud revizi nedokon
te, budete nad
le pravideln
 upozor
ni na opo
 revize."
        Call rtitem.AppendDocLink(note, "Propojen
 s dokumentem, pro kter
 vypr
el term
n revize")
        maildoc.DueDateTime = OldDueDate
    Case "WindowExpired"
        maildoc.SendTo = CurrentReviewers
        maildoc.Subject = "Vypr
el term
n revize dokumentu"
        maildoc.FlowStatus = "
 limit vyhrazen
 pro revizi dokumentu s n
zvem."
        Call rtitem.AppendDocLink(note, "Propojen
 s dokumentem, pro kter
 vypr
el term
n revize")
        maildoc.DueDateTime = OldDueDate
    Case "NotifyNextReviewer"
        maildoc.SendTo = note.CurrentReviewers
        maildoc.Subject = "Po
adavek na revizi dokumentu"
        maildoc.FlowStatus = "Prove
te revizi dokumentu nejpozd
ji k n
e uveden
mu datu."
        Call rtitem.AppendDocLink(note, "Propojen
 s dokumentem ur
m k revizi")
        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 = "Term
n revize vypr
el " & Format(dt.LSLocalTime, "Short Date") & " , tento recenzent v
ak nedokon
il revizi: "
    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) = "
" Then
                note.PreviousReviewers = CurrentReviewers
            Else
                Set item = note.GetFirstItem("PreviousReviewers")
                item.AppendToTextList(CurrentReviewers)
            End If
            note.CurrentReviewers = "
"
        End If
        note.InProcess = "
        note.Status = "Revize byla dokon
        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) = "
" 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 = "
        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) = "
" Then
            note.RemoveItem("DueDateTime")
            note.Status = "Revize byla dokon
            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
W32I4
CurrentReviewers
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Language
$LastBuildTime
$BabelInfo
$TITLE
$AssistType
$AssistLastRun
$AssistDocCount
$Comment
$AssistFlags
$MachineName
$AssistTrigger
$AssistInfo
$AssistQuery
$AssistAction
$AssistAction_Ex
$DesignerVersion
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
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
s+,GYN{
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Comment
$Language
$LastBuildTime
$BabelInfo
(GIF89a
f0Qi3
&1G)J~
|S}g!
E2YcU
!NgK*
@trw/
(1)W@S
gRfS]
,,XAiU
#8_I8ge
hA7:O<JD
'~9cN
Bhu6#
wM^;%-
@`MP+
55IE9ZQB:
VvsRol
M{.SLX
)bu$A
c"1Icdvw
p4+K}&
"x1@1
a+*%g
({0fS
>wO0t
!PiqE
aUE\8-M
mqe|M
r*Hvj9}
6oGKk
w}QjhT
hLC,4k
f8aGux?/y<
6pg2`
%7u9H
o)rTH
6[YXB    yB
6-C(O
, S    ><
P'f'[<
qFhFX
Dhtx>
+hQ7mU
mUu".
ZIpj#
Qb"}TRu
Vg`Y}0(l
i5I8t
89YM9a
&lazST+
r(y<h
`Txh,
bExT$
"IRW<`
3,0&(
eqcGv
.V8u&
jA>mKG
/.Gu
>HaDT
lc;N3
    _({'
a+<Ff
1!DF$ .
b,    %_
'z%qF
!E*]r
P)AvP
DJ]^J
nWl*,
`JPm!
3^cpvW
?<HICHHF
:>QQX&$h[
8M/164
U*&*b]
('nov
@BEF:P
4JJ,'
E    Nz y
*^FjA9U
!;iaK
9D:&4
83%s(g\gJQ
\-V`N
]R4{{W5h
yxxw~y
`'~id[lF
V.8w0
EH}DJ
zeDx$
L'f!'4
T~>X:
HypS9GW
HjdGP
sriri
YPY)|53th
#IeU*u
I($qW
VhV!'
^gXiK~@
R~8lFtS
dWkwg
 !F]sI
6/XJF
<f[CZ
>{(~Y
O    oP]
m++yP
u}%-nm
^:sEz
FJBE~9D
QX{{:
%H]\`
ibc f
9IIIb
xNpnS
6fRy"
(Mh0;
iXE.4
1hyh^"W
`^3w_\`I
_/jCC
!"b"*""^a
z"1"",
Ec1*c8.
c2*"96#
%dAn$Ir
OrdO*
dEz$J.
$W*%Q
%ZJeZ6%F
&P2eT
`Bf`&
JF%Y.
fd.f[
g&&bz%`N
b"gl.gq&
sBgtF
tB's&'y.
iHF(>6iwVi
Z)_Bhw
2"/q#3
$Kr%c
&W2,o2$
4Ss5[
C;tCW1A
1G[4D;
{4HKtD
$W4C74K7
4P3tB
uR'5R
tTCuI
VS5UK5Q
4Ng5I
O7uE+uS
Z7vW+
6lCuU'
6O?uX
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
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
c#AgDckG
$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
a~f~9
^~'Jtx
$ImagesWide
$ImagesHigh
$ImagesColorize
$ImageNames
$ImageData
$Language
$LastBuildTime
$BabelInfo
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
Expire
expiredate
Platnost ukon
expiredateK
Expirez
Expire
cs-CZ
000002EE
CN=Lotus Notes Template Development/O=Lotus Notes
Expirez
##########################################################
PrivateOle
variable to translate
PrivTxt
Private
    0R1S2S
end variable to translate
    0R1S
scope
Private
tmpUseOle
PrivTxt
    0R3S4S5S6S7S8S10S12S
PrivateOle
cs-CZ
000002F6
CN=Lotus Notes Template Development/O=Lotus Notes
    0R3S4S5S6S7S8S10S12S
Private
##########################################################
CategoriesCategories
CategoriesChcete-li zobrazit seznam kl
ch slov nebo p
idat nov
 slovo, stiskn
te kl
vesu ENTER.
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
cs-CZ
000002F2
CN=Lotus Notes Template Development/O=Lotus Notesy
    0R4S5S7S9S15S17S19SX
##########################################################
FromFrom
FromJm
no autora dokumentu
cs-CZ
000002FA
CN=Lotus Notes Template Development/O=Lotus Notes
FromJm
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
R5cs-CZ
00000306
CN=Lotus Notes Template Development/O=Lotus Notess NotesCN=Niall
##########################################################
##########################################################
5cs-CZ40Q
0000030A
CN=Lotus Notes Template Development/O=Lotus Notess NotesCN=Niall M
##########################################################
##########################################################
CN=Catherine Duffy/O=Irisc:\notes4\data\doclib4.ntfDoclibSmartSuiteFramesetRF
CN=Marina Bodik/O=IrisCN=Niall McCarthy/OU=DUB/O=LotusCN=John Clair/O=Connectcs-CZ
ffffaa
fffffffff
fffffffaa
ffffffff
ffffffaa
fffffff
ffffffa
ffffff
fffffa
ffffn
DDDDD
00000302Knihovna dokument
 Lotus SmartSuite (5.0)
Lotus SmartSuite Library
#1SmartSuiteDocLibR5###############################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
$SUBVIEW1
$54$25
Subject
$25$53
$53$25Yd($All)|($All)
$54$51$52Subject$25$53$Conflict$REF
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
Subject
Subject
    L1Scs-CZ
00000172
CN=Lotus Notes Template Development/O=Lotus Notes
##########################################################
##########################################################
Categories$54$25
Subject
$25$53
$53$25YTPodle kategori
|By Category4
Categories$54$51$52Subject$25$53$Conflict$REF
Categories
Categories
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
Subject
Subject
forma
archive
    L1S9Scs-CZD.Q
00000176
CN=Lotus Notes Template Development/O=Lotus Notes
forma
archive
    L1S9Scs-CZD
##########################################################
DocumentWorkflow(DocProperties) | DocProperties5
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom$OLEObjProgID_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
Lotus SmartSuite\Dokument aplikace Word ProWordPro Documentcs-CZ.,Q
00000146
CN=Lotus Notes Template Development/O=Lotus NotesLotus Notes Template Development/O=Lotus Notes
##########################################################
##########################################################
DocumentWorkflow(DocProperties) | DocProperties5
BodyOLEBodyReviewerLogNotifyAfterReviewTimeReviewWindowReviewStyleFutureReviewersCurrentReviewersPreviousReviewersReviewersCategoriesSubjectTimeCreatedDateFrom_ViewIcon$OLEObjRichTextField$OLEObjFieldLastEditorDocumentReadersDocumentAuthors
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Documentcs-CZ    ,Q
00000142
CN=Lotus Notes Template Development/O=Lotus Notess Notes Template Development/O=Lotus Notes
##########################################################
##########################################################
*Nb:O
ResponseBanner
ImmediateParentSubjectOriginalSubjectBodyCategoriesSubjectExpirePrivateTimeCreatedDateFromformname
Odpov
 na odpov
Response to Responsecs-CZ
00000136
CN=Lotus Notes Template Development/O=Lotus NotesClair/O=ConnectCN=Lotus Notes Template D
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
##########################################################
Times New Roman
bullet
    0S0E
t okno
 knihovny dokument
 sady Lotus SmartSuite Millennium EditionX
 @  @@ @` @
@@ @@@@@`@@
`@ `@@`@``@
    **Tato
ablona nen
ena pro pou
ti WWW (v prohl
i) a nen
 podporov
na v syst
mech Macintosh
Pomoc
to datab
ze je mo
 zaznamen
vat a sledovat informace o dokumentech.X
ce s datab
 dokumentu do datab
    V libovoln
m pohledu klepn
te na tla
tko Nov
 dokument.
 Informace lze do dokumentu zad
vat n
kolika zp
soby: zadat je p
mo v editoru programu Notes, naskenovat v
tisk nebo importovat
it soubor.
Vytvo
 dokumentu v aplikaci sady Lotus SmartSuiteX
Klepn
te na nab
dku Tvorba, p
kaz Lotus SmartSuite nebo na tla
tko Nov
 dokument Lotus SmartSuite na pruhu akc
 a vyberte jednu z n
sleduj
ch polo
ek: Se
it programu 1-2-3, Prezentace aplikace Freelance, Obr
zek programu Paintbrush nebo Dokument aplikace Word Pro). Dokumenty nelze spr
 vytvo
it, pokud nem
te nainstalov
 aplikace (podporov
ny jsou aplikace sady Lotus SmartSuite 9 a nov
Odpov
 na dokumentX
Vyberte v pohledu po
adovan
 dokument a v nab
dce Tvorba klepn
te na p
kaz Odpov
Odpov
 na odpov
Vyberte odpov
, na kterou chcete odpov
t, a v nab
dce Tvorba klepn
te na p
kaz Odpov
 na odpov
    Ozna
 dokumentu jako soukrom
    Pomoc
 akce Ozna
it jako soukrom
 a Ozna
it jako ve
ablon
 lze ozna
it, zda dan
 dokument mohou krom
st i jin
ivatel
. Pokud jste nap
klad dosud nedokon
ili pr
ci na ur
m dokumentu, m
ete pomoc
 akce Ozna
it jako soukrom
 znemo
nit ostatn
ivatel
m zobrazen
 tohoto dokumentu. Jakmile dokument dokon
te, m
ete jej pro ostatn
ivatele zp
stupnit pomoc
 akce Ozna
it jako ve
. Jestli
e ozna
te dokument jako soukrom
 po jeho odesl
 k reviz
m, jeho autor a recenzenti k n
mu budou m
t nad
stup.X
    Nastaven
 seznamu p
stupov
ch pr
    Aplikace byla navr
ena tak, aby v
ichni u
ivatel
jimkou mana
era m
stupov
va autora. V p
e maj
va editora, m
e doch
zet k chyb
m ve funkci cyklu reviz
. Anonymn
stup nen
 povolen.X
Funkce
    Cyklus reviz
 dokumentuX
    Autor dokumentu m
nost nastavit pro dokument cyklus reviz
. To lze prov
st klepnut
m na odkaz Nastavit cyklus reviz
 a zad
m pot
ch informac
    Pozn
mka:X
i zad
 jmen schvalovatel
 nepou
vejte funkci
    @Domain. X
 informace o dom
 budou odstran
ny a p
adavku na revizi mohou v
st k obt
m. Jako schvalovatele je nav
 zadat pouze jm
na osob. N
zvy skupin nejsou podporov
 cyklu reviz
    Tato datab
ze obsahuje tla
tko akce P
it cyklus reviz
, kter
 je dostupn
 pouze autorovi dokumentu. Akci je mo
ed i po p
 dokumentu k reviz
m. Postupujte podle n
sleduj
ch pokyn
 cyklu reviz
m dokumentu k reviz
m: Tuto mo
nost vybere autor v p
e chce zm
nit nastaven
 cyklu reviz
ve, ne
 recenzenti obdr
 upozorn
 cyklu reviz
 po p
: Jestli
 recenzenti zah
jili nebo dokon
ili pr
ci na revizi dokumentu, je jejich pr
ce uchov
na. Pokud recenzent dosud pr
ci nezah
jil, bude informov
n o tom,
 revize nen
soby reviz
 knihovny Lotus SmartSuiteX
    Postupn
 revize:
     Dokumenty jsou k reviz
m rozes
ny postupn
 podle po
 recenzent
ho autorem.X
echny
pravy se zapisuj
 do stejn
ho dokumentu, budou v
ak ulo
eny tak
 kopie p
ho dokumentu v nezm
 podob
    Postupn
 revize (zachovat v
echny opravy):X
     Dokumenty jsou k reviz
m rozes
ny postupn
 podle po
 recenzent
ho autorem.X
pravy se ukl
 do kopie p
ho dokumentu, kter
 obsahuje tak
 koment
ech p
edchoz
ch recenzent
echny star
 verze se ukl
 jako odpov
di (podobn
 jako kopie p
ho dokumentu).X
    Rezervace dokument
adavky na revizi dokumentu jsou rozesl
ny sou
. Po otev
 dokumentu n
m z recenzent
 dojde na serveru k
6uzam
& dokumentu. Ostatn
ivatel
m se p
pravami dokumentu zobraz
 varov
 o pr
 prob
 revizi. X
    o    Koment
e nebo
pravy ka
ho recenzenta jsou zaps
ny do kopie p
ho dokumentu.
    o    Podobn
 jako v ostatn
padech je v
dy uchov
na nezm
 kopie p
ho dokumentu.
 odpov
     Shoduje se s rezervacemi dokument
 (soubory v
ak nejsou uzam
eny).
    o    Koment
e nebo
pravy recenzent
 jsou ulo
eny jako odpov
di na p
 dokument.  X
    o    Podobn
 jako v ostatn
padech je v
dy uchov
na nezm
 kopie p
ho dokumentu.
    Zpracov
ch reviz
    Pokud je spu
n agent Zpracovat opo
 revize, vybere dokumenty
 na revizi, pro kter
 vypr
el term
n revize. Pot
 je dokument v z
vislosti na nastaven
sobu revize odesl
n dal
mu recenzentovi, ozna
en jako dokon
, nebo je aktu
mu recenzentovi pouze odesl
no upozorn
 na zpo
 revize.
    Odem
 dokumentuX
as doch
 k situaci, kdy je dokument omylem ponech
n uzam
i a spr
vci maj
 v nab
dce Akce p
stup k p
kazu Odemknout dokument, pomoc
 kter
ho lze dokument odemknout.X
    ArchivaceX
    Archivaci knihovny dokument
 Lotus SmartSuite m
ete nastavit po klepnut
 na tla
tko Archivace na druh
 kart
 informa
ho okna, kter
 zobraz
te klepnut
m na nab
dku Soubor, podnab
dku Datab
ze a p
kaz Vlastnosti. Vypl
te po
adovan
 informace a klepn
te na tla
tko OK. Na serveru nastavte spu
kolu Archivace. Archivn
 datab
ze bude automaticky nastavena.
    Ukon
 platnosti dokument
    Dokumenty, jejich
 platnost byla ukon
ena, lze zpracovat pomoc
 funkce archivace. Vyberte v pohledu dokument a v nab
dce Akce klepn
te na p
kaz Ukon
it nebo obnovit platnost dokumentu.
ce dokument
 do vybran
 kategorie
    Chcete-li do n
 kategorie za
adit v
 dokument
, vyberte jednotliv
 dokumenty a klepn
te na p
kaz Za
adit do kategorie v nab
dce Akce. Potom vyberte po
adovanou kategorii nebo vytvo
te novou a klepn
te na tla
tko OK. Vybran
 dokumenty budou za
azeny do p
 kategorie.X
    OLE/ActivexX
    Tato
ablona byla navr
ena pro spolupr
ci se sadou Lotus SmartSuite Millennium Editon verze 9 nebo nov
edchoz
 verze sady SmartSuite nejsou podporov
ny, proto
ina jejich aplikac
 nepodporuje objektov
 dokumenty).
ablona vyu
 koncepce objektov
ch dokument
 (tzv. ActiveX) technologie OLE, kter
 aktivaci objektu OLE/ActiveX a jeho zv
 na cel
 okno dokumentu. V
sledkem je,
e je server objektu zd
n jako samostatn
 aplikace.
    Informace o probl
mech, kter
i pou
ablony mohou nastat, naleznete ve verzi 5.0 klienta programu Notes v
sti t
 probl
    Pro spr
    Tato datab
ze vych
edpokladu,
e koncov
ivatel str
asu v prost
 programu Notes.
ablona nebude funk
, jestli
ivatel pou
ije funkci Ulo
it do programu Lotus Notes, kter
 je sou
 aplikac
 Lotus 1-2-3 verze 9, Lotus Freelance verze 9 a Lotus Word Pro veze 9. Pokud u
ivatel ulo
 dokument do datab
mto zp
sobem, zobraz
 se chybov
i pokusu o otev
 dokumentu v programu Notes a nikoli v produktu sady SmartSuite. U
ivatel by m
l vytv
et a otev
rat dokumenty v programu Notes nebo v n
 aplikaci sady SmartSuite.X
O=Lotus Notes
O=Lotus Notes
PURSAFO
|.:#U
O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
PURSAFO
$Info
$DesignerVersion
$Body
$Language
$LastBuildTime
$BabelInfo
NewRespToMain.gifNewRespToMain.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
MyRevIsComplete.gifMyRevIsComplete.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
Odpov
Response
CN=Lotus Notes Template Development/O=Lotus Notes
MarkDocAsExpired.gifMarkDocAsExpired.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
NewResp.gifNewResp.gifh
CN=Lotus Notes Template Develo:
Odpov
 na odpov
Response to Responseh
CN=Lotus Notes Template Development/O=Lotus Notes
*Nb:O
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
CN=Lotus Notes Template Development/O=Lotus Notes
Lotus SmartSuite\Dokument apnikace Word ProWordPro Document
CN=Lotus Notes Template Development/O=Lotus Notes
SetupReviewCycle.gifSetupReviewCycle.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
SubmitForReview.gifSubmitForReview.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
NewRespToResp.gifNewRespToResp.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
NewRespToMain.gifNewRespToMain.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
MyRevIsComplete.gifMyRevIsComplete.gifh
CN=Lotus Notes Template De~elopment/O=Lotus Notes
Odpov
Response
CN=Lotus Notes Template Development/O=Lotus Notes
MarkDocAsExpired.gifMarkDocAsExpired.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
NewResp.gifNewResp.gifh
CN=Lotus Notes Templnte Development/O=Lotus Notes
NewDoc.gifNewDoc.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
MarkPublic.gifMarkPublic.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
MarkPrivate.gifMarkPrivate.gifh
CN=Lotus Notes Tnmplate Development/O=Lotus Notes
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Documenth
CN=Lotus Notes Template Development/O=Lotus Notes
Lotus SmartSuite\Se
it progamu 1-2-31-2-3Workbook Document
CN=Lotus Notes Template Development/O=Lotus Notes
ReviewOptionsRevie~Optionsh
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
properties.gifproperties.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
QoeH7
save.gifsave.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutlineh
CN=Lotus Notes Template Development/O=Lotus Notes
Odpov
 na odpov
Response to Responseh
CN=Lotus Notes Template Development/O=Lotus Notes
*Nb:O
Lotu~ SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
CN=Lotus Notes Template Development/O=Lotus Notes
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
CN=Lotus Notes Template Development/O=Lotus Notes
SetupReviewCycle.gifSetupReviewCycle.gifh
CN=Lotus.Notes Template Development/O=Lotus Notes
SubmitForReview.gifSubmitForReview.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
Agent vybere dokumenty
 na revizi, pro kter
 vypr
el term
n revize. Dokument je potom v z
vislosti na nastaven
sobu revize odesl
n dal
mu recenzentovi, ozna
en jako dokon
 neno je aktu
mu recenzentovi pouze odesl
no upozorn
 na zpo
 revize.
CN=Lotus Notes Template Development/O=Lotus Notes
FromJm
no autora dokumentu
CN=Lotus Notes Template Development/O=Lotus Notes
 nebo obnoven
 platnosti dokumentu
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lntus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Document
DoclibOutline.gifDoclibOutline.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
ClearReviewCycle.gifClearReviewCycle.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
cancel.gifcancel.gifh
CN=Lotus Notes Template Development/J=Lotus Notes
Arch.gifArch.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocumenth
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset
CN=Lotus Notes Template Developmenz/O=Lotus Notes
(OLEChgSubject)OLEChgSubjecth
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
dspTemplateNamedspTemplateNameh
CN=Lotus Notes Template Development/O=Lotus Notes
(DocProperties)DocPropertiesh
CN=Lotus Notes Template Development/O=Lotus Notes
xazm`
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
CN=Lotus Notes Template Development/O=Lotus Notes
dspDbTitledspDbTitleh
CN=Lotus Notes*Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocumenth
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibDocHeader.gifDoclibDocHeader.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
edit.gifedit.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibOutline.gifDoclijOutline.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
ClearReviewCycle.gifClearReviewCycle.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
cancel.gifcancel.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
Arjh.gifArch.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocumenth
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibDocHeader.gifDoclibDocHeader.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
jdit.gifedit.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibOutline.gifDoclibOutline.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
ClearReviewCycle.gifClearReviewCycle.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
cancel.gifcancel.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
Arch.gifArch.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
DokumentDocumenth
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibSmartSziteFrameset|DoclibSmartSuiteFrameset
CN=Lotus Notes Template Development/O=Lotus Notes
(OLEChgSubject)OLEChgSubjecth
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
dspTemplateNamedzpTemplateNameh
CN=Lotus Notes Template Development/O=Lotus Notes
(DocProperties)DocPropertiesh
CN=Lotus Notes Template Development/O=Lotus Notes
xazm`
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
CN=Lotus Notes Template Development/O=Lotus Notes
dspDbTitledspDbTitleh
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibDocHeader.gifDoclibDocHeader.gifh
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Lotus Notes Template Development/O=Lotus Notes
Agent se pou
e dokument je ne
mysln
 ponech
n v zamknut
m stavu. Je dostupn
m a spr
m v pohledu Stav reviz
CN=Lotus Notes Template Development/O=Lotus Notes
DoclibSmartSuiteOutline
CN=Lotus Notes Template Development/O=Lotus Notes
CN=Ryan Jansen/O=IrisCN=John Clair/O=Connect
$Modified
    1S2S3S
$TITLE$FormPrivs$FormUsers$Body$Flags$Class$Modified$Comment$AssistTrigger$AssistType$AssistFlags$UpdatedBy$$FormScript_O$LANGUAGE$C1$
$Flags
    0SL1S4S5S
$TITLE
cs-CZ
OLERoutines
C34WQ
(ProcessExistingDbDlg)
($Subscription)
ResponseBanner
CUA3x
DocumentWorkflow
CUA3
|My Favorite Documents
action bar
Hlavn
 navig
Podle jm
na _autora|By Author
Stav reviz
|Review Status
($All)|($All)
Podle kategori
|By Category
Zpracovat opo
 revize
(Unlock Document)
actoin bar
DoclibSmartSuiteOutline
Outline frame graphic
used in main and resp forms
34CiQ
Private
Expire
PrivateOle
Categories
$ACTIONS
Cy34Q
CN=John Clair/O=Connect
$54$51$52Subject$25$53$Conflict$REF$C1$
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
Subject
Subject
$54$25
Subject
$25$53
$53$25
Categories$54$51$52Subject$25$53$Conflict$REF$C1$
Categories
Categories
Scope
Private
ExpireDate
_ViewIcon
    2S3S4S6S8S9S12S14S
DocumentG
$VersionOpt
Origin
l vytvo
ivatel
ReviewStyle
Recenzent:
LastEditor
Subject
Subject
    6S9RS4E16RS9E17S18S22S25RS4E31RS9E32S33S2E37S40RS4E44R47S48S50RS5E52R53S54S56S57S58S59S63S65S66S
Subject
Subject
forma
archive
    L1S9S+
Categories$54$25
Subject
$25$53
$53$25
Arch.gifArch.gif
DokumentDocument
DoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset
(OLEChgSubject)OLEChgSubject
dspTemplateNamedspTemplateName
(DocProperties)DocProperties
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
NewResp.gifNewResp.gif
NewDoc.gifNewDoc.gif
MarkPublic.gifMarkPublic.gif
MarkPrivate.gifMcrkPrivate.gif
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Document
dspDbTitledspDbTitle
Lotus SmartSuite\Se
it progamu 1-2-31-2-3Workbook Document
ReviewOptionsReviewOptions
properties.gifproperties.gif
save.gifsave.gif
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSucteOutline
DokumentDocument
Odpov
 na odpov
Response to Response
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
DoclibDocHeader.gifDoclibDocHeader.gif
edit.gifedit.gif
DoclibOutline.gifDoclibOutline.gif
SetupRcviewCycle.gifSetupReviewCycle.gif
SubmitForReview.gifSubmitForReview.gif
NewRespToResp.gifNewRespToResp.gif
NewRespToMain.gifNewRespToMain.gif
MyRevIsComplete.gifMyRevIsComplete.gif
Odpov
Response
MarkDocAsExpired.gifMarkDocAsExpired.gif
ClearReviewCycle.gifClearReviewCycle.gif
cancel.gifcancel.gif
Arch.gifArch.gif
DokumentDocument
DoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset
(OLEChgSubject)OLEChgSubject
dspTemplateNamedspTemplateName
(DocProperties)DocProperties
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
NewResp.gifNewResp.gif
NewDoc.gifNewDcc.gif
MarkPublic.gifMarkPublic.gif
MarkPrivate.gifMarkPrivate.gif
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Document
dspDbTitledspDbTitle
Lotus SmartSuite\Se
it progamu 1-2-31-2-3Workbook Document
ReviewOptionsReviewOptions
properties.gifproperties.gif
save.gifsave.gif
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutline
DokumentDocument
Odpov
 na odpov
Response to Response
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
DoclibDocHeader.gifDoclibDocHeader.gif
DokumentDocument
Odpov
 na odpov
Response to Response
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
DoclibDocHeader.gifDoclibDocHeader.gif
edit.gifedit.gif
DoclibOutline.gifDoclibOutline.gif
SetupReviewCycle.gifSetupReviewCycle.gif
SubmitForReview.gifSubmitForReview.gif
NewRespToResp.gifNewRespToResp.gif
NewRespToMain.gifNewRespToMain.gif
MyRevIsComplete.gifMyRevIsComplete.gif
Odpov
Response
MarkDocAsExpired.gifMarkDocAsExpired.gif
ClearRcviewCycle.gifClearReviewCycle.gif
cancel.gifcancel.gif
Arch.gifArch.gif
DokumentDocument
DoclibSmartSuiteFrameset|DoclibSmartSuiteFrameset
(OLEChgSubject)OLEChgSubject
dspTemplateNamedspTemplateName
(DocProperties)DocProperties
(Archive Log)Archive LogArchiveProfileArchive ProfileArchiveLog
NewResp.gifNewResp.gif
NewDoc.gifNewDoc.gif
MarkPublic.gifMarkPublic.gif
MarkPrivate.gifMarkPrivate.gif
Lotus SmartSuite\Prezentace aplikace FreelanceFreelance Document
dspDbTitledspDbTitle
Lotus SmartSuite\Se
it progamu 1-2-31-2-3Workbook Document
ReviewOptionsReviewOptions
properties.gifproperties.gif
save.gifsave.gif
MasterDocLibSmartSuiteOutlineMasterDocLibSmartSuiteOutline
Odpov
 na odpov
Response to Response
Lotus SmartSuite\Obr
zek programu PaintbrushPaintbrush Document
Lotus SmartSuite\Dokument aplikace Word ProWordPro Document
DoclibDocHeader.gifDoclicDocHeader.gif
edit.gifedit.gif
DoclibOutline.gifDoclibOutline.gif
SetupReviewCycle.gifSetupReviewCycle.gif
SubmitForReview.gifSubmitForReview.gif
NewRespToResp.gifNewRespToResp.gif
NewRespToMain.gifNewRespToMain.gif
MyRevIsComplete.gifMyRevIsComplete.gif
Odpov
Response
MarkDocAsExpcred.gifMarkDocAsExpired.gif
ClearReviewCycle.gifClearReviewCycle.gif
 nebo obnoven
 platnosti dokumentu
DoclibSmartSuiteOutline
r knihovny dokument
 sady Lotus SmartSuite
'++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 = "Kompilace byla
 dokon
Const COMPILE_SUCCESS_BODY = "Chyby syntaxe nebyly nalezeny a kompilace vzorce byla
 dokon
ena."
Const COMPILE_FAILURE_TITLE = "Chyba syntaxe"
Const COMPILE_FAILURE_BODY = "Ve vzorci byla nalezena nejm
 jedna chyba syntaxe a nelze jej zkompilovat."
Const COMPILE_FAILURE_SAVE_BODY = "Ve vzorci byla nalezena nejm
 jedna chyba syntaxe a dokument nelze ulo
Lotus Product
W32I4
($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
W32I4
'++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
W32I4
'++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
W32I4
'++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
W32I4
'++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
W32I4
'++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
W32I4
'++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
W32I4
$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
Lotus SmartSuite
knihovny
MS Office
SubscriptionFormOutline
Collage.GIF
MainTable
MainTable
klady
swish.gif
zev odb
Zadejte n
zev odb
$HLTitle
nosti na
swish.gif
st tyto nov
 nebo zm
 dokumenty:
$QueryType
echny | allSpl
 vybran
 podm
nky | selOdpov
 vzorci pro v
r (Up
esnit) | adv
QueryType
QueryType
st tyto dokumenty:
AuthorMatch
AuthorMatch
    1S2S
ProfileAuthors
ProfileAuthors
ProfileAuthors
    1S2S3S5S7S
GIF89a
ProfileAuthors
dspProfileAuthors
    Zadejte
no (nap
klad Josef Novak/ABC/Odbyt/CZ).
    Zadejte slova nebo jejich
sti (textu
& vyhovuj
klad auto
SubjectMatch
SubjectMatch
    1S2S
SubjectOp
obsahuje libovoln
 ze slov|contm
 na za
tku|beg
ProfileStrings
    Zadejte slova nebo jejich
sti (textu
6plat
& vyhovuje nap
klad slovo
6plat
6platebn
CategoryMatch
Kategorie|1
CategoryMatch
    1S2S
ProfileCategories
nocache
$HLMonitorDB
By Category
    8S10S12S
    Vyberte ze seznamu alespo
 jednu kategorii.
StatusMatch
Stav reviz
StatusMatch
    1S2S
ProfileStatus
 dokumenty | NewDokumenty u kter
ch prob
 revize | In ReviewDokumenty u kter
ch byly revize dokon
eny | Review Complete
    Vyberte alespo
 jeden po
adovan
 stav reviz
DocMatch
Dokument Office |1
DocMatch
    1S2S
ProfileDocType
Tabulka aplikace Excel | ExcelWorksheet DocumentObr
zek programu Paintbrush | Paintbrush DocumentPrezentace aplikace PowerPoint | PowerPoint DocumentDokument aplikace Word | WordDoc Document
    V seznamu vyberte alespo
 jeden typ dokument
 MS Office.
    Vzorec pro v
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
W32I4
    Zkontrolovat syntaxi
    Stav:
swish.gif
as posledn
 kontroly:
.,$ //:
$HLMLastChecked
 k dispozici
$HLMLastChecked
    2S3S4S6S8S
Disp$HLMLastChecked
    Posledn
 kontrolovan
 server:
$HLMLastChecked
 k dispozici
$HLMLastServer
$HLMLastServer
    2S3S4S6S8S9S10S12S14S18S
Disp$HLMLastServer
$HLMError
    1S2S
va o stavu:
$HLMError
    1S2S
$HLMError
Disp$HLMError
r:
$HLEnabled
Zapnut|1Do
 vypnut|0
basics
basics
 informace
swish.gif
    Typ sledov
$HLMonitorType
Vzorec|1
    ID repliky:
$HLMonitorDBh
$HLMonitorDB
 k dispozici
$HLMonitorDB_Display
    Vzorec:
AdvFormula
$HLFormula
    Marker:
hidden field needed for headlines
    0R1S
Subscriptions
$HLSubscription
adit do kategorie
_Upravit dokument
edit.gif
O_deslat dokument
Po_stoupit
esunout do slo
ky...
_Odebrat ze slo
    2S7S12S
ok.gif
StornoF
SaveOptions
    1S2S3S
cancel.gif
adit do kategorie
_Upravit dokument
O_deslat dokument6
Po_stoupit
esunout do slo
ky...
_Odebrat ze slo
    2S7S12S
StornoF
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
$DesignerVersion
$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