Lotus notes 为什么{截断}显示在文档的窗口标题中？

偶尔我们会得到一个无法编辑的文档。发生这种情况时，{Truncated}将显示在文档的窗口标题中。这是什么原因？我创建了一个代理来创建一个新文档，并使其成为所有子文档的父文档。这是我们编辑数据的唯一方法。如有任何想法，将不胜感激

2017年6月15日更新： 下面是添加注释的代码。此代码在应用程序中使用多次。我似乎是在第一次执行代码时发生的。代码位于共享操作调用的脚本库中

Sub Reviewer_DR_Create_Comment
    On Error GoTo processError
    Dim session As New NotesSession , db As NotesDatabase , doc As NotesDocument
    Dim workspace As New NotesUIWorkspace , uidoc As NotesUIDocument

        Set db = session.CurrentDatabase
    Set doc = db.CreateDocument
    Set uidoc = workspace.CurrentDocument

    Call doc.MakeResponse( uidoc.document )

    doc.ProcedureWriter = uidoc.document.ProcedureWriter
    doc.ManualNumber = uidoc.document.ManualNumber
    doc.ProcedureNumber = uidoc.document.ProcedureNumber
    doc.ProjectedRevNumber = uidoc.document.ProjectedRevNumber
    doc.DraftLetter = uidoc.document.DraftLetter
    doc.Facility = uidoc.document.Facility
    doc.PCRNumber= uidoc.document.PCRNumber
    If Right(uidoc.document.action(0),11) = "Concurrence"  Then  doc.Concurrence="Yes" 
    If uidoc.EditMode Then Call uidoc.Document.Save(True, False)
    Call uidoc.close(True)
    Call Refresh_PR_Views
    doc.form = "(Comments - Draft Procedure)"
    Set uidoc = workspace.EditDocument( True , doc)

    Exit Sub
    processError:
    MessageBox LogError()       ' Put up message and send to error database
    Exit Sub    
End Sub

调用Refresh\u PR\u视图： 子刷新\u PR\u视图 关于错误转到错误处理程序

    Dim s As New NotesSession
    Dim db As NotesDatabase
    Dim ws As New NotesUIWorkspace
    Dim uid As NotesUIDocument
    Dim doc As NotesDocument
    Dim errmsg As String
    Dim v As NotesView
    Dim v1 As NotesView
    Dim v2 As NotesView
    Dim v3 As NotesView
    Dim v4 As NotesView
    Dim v5 As NotesView
    Dim v6 As NotesView

    Set db=s.CurrentDatabase
    Set v=db.Getview("Procedure Review - Doc Number")
    Set v1=db.Getview("Procedure Review - Driver/Sub-Driver")
    Set v2=db.Getview("Procedure Review")
    Set v3=db.Getview("Procedure Review - By Priority")
    Set v4=db.Getview("Procedure Review - Status")
    Set v5=db.Getview("Procedure Review - By Title")
    Set v6=db.Getview("Procedure Review - Sub Driver/Driver")

    Call v.Refresh()
    Call v1.Refresh()
    Call v2.Refresh()
    Call v3.Refresh()
    Call v4.Refresh()
    Call v5.Refresh()
    Call v6.Refresh()
    Call ws.Viewrefresh()

NormalExit:
    Exit Sub
ErrorHandler:
errmsg="APS Utilities SCRIPT LIBRARY: Refresh_PR_Views ROUTINE: Got error # " & CStr(Err) & " - "  & Error$ & " on line " & CStr(Erl)
    If s.IsOnServer Then
            Print errmsg
    Else
        MessageBox errmsg
    End If
    Resume NormalExit
End Sub

填写注释表单后，他们单击保存和退出按钮。代码如下：

Sub Click(Source As Button)
    'Print "Starting"
Dim Session As New NotesSession 
Dim db As NotesDatabase 
Dim doc As NotesDocument 
Dim NewDoc As NotesDocument
Dim ws As New NotesUIWorkspace
Dim Parent As NotesDocument
Dim xuidoc As Variant

    Set db = session.CurrentDatabase
    Set uidoc = ws.CurrentDocument
    Set doc = uidoc.document
    Set parent = db.GetDocumentByUNID ( Doc.ParentDocumentUNID )
    Set xuidoc = ws.CurrentDocument

If uidoc.EditMode Then Call uidoc.save
Call uidoc.Close
'Refresh Parent
Call ws.EditDocument( True , Parent , , ,  ,False)
Call ws.ReloadWindow
Call xuidoc.RefreshHideFormulas

---

End Sub

这可能是由于有人设置了将replicator同步的数据量限制为仅摘要项加上40k的富文本。如果文档以这种方式向下复制到本地副本，它通常不会以截断的形式复制回来，但有几种方法（例如，将截断的注释剪切并粘贴为新文档）可能发生这种情况。

这可能是由于有人设置了将replicator同步的数据量限制为仅摘要项加上40k的富文本。如果文档以这种方式向下复制到本地副本，它通常不会以截断的形式复制回来，但也有可能发生这种情况（例如，将截断的注释剪切并粘贴为新文档）。

我找到了问题的原因。保存和退出按钮代码顺序错误。我从另一个注释表单的另一个保存和退出按钮复制了代码，错误消失了。感谢您的建议和帮助

---

MJ

我找到了问题的原因。保存和退出按钮代码顺序错误。我从另一个注释表单的另一个保存和退出按钮复制了代码，错误消失了。感谢您的建议和帮助

---

MJ

我检查了副本设置，但该限制未启用，因此，我认为这不是问题所在。当父文档以只读模式打开，并且它的一个子文档被编辑和保存时，似乎会发生这种情况。父文档会获得{Truncated}前缀，尽管我无法一致地再现此问题。问题可能在过去某个时间发生在不同的副本中。我不确定如何理解其他副本。这是一个新文档。如果它是在您正在查看的同一副本中创建的新文档，那么我同意我的潜在解释不太可能。它是如何创建的？由Notes客户端中的用户执行？网络用户？代理？它是由用户在Notes客户端中创建的。下面是添加注释的代码。此代码在应用程序中使用多次。我似乎是在第一次执行代码时发生的。代码位于共享操作调用的脚本库中。我检查了副本设置，但该限制未启用，因此，我认为这不是问题所在。当父文档以只读模式打开，并且它的一个子文档被编辑和保存时，似乎会发生这种情况。父文档会获得{Truncated}前缀，尽管我无法一致地再现此问题。问题可能在过去某个时间发生在不同的副本中。我不确定如何理解其他副本。这是一个新文档。如果它是在您正在查看的同一副本中创建的新文档，那么我同意我的潜在解释不太可能。它是如何创建的？由Notes客户端中的用户执行？网络用户？代理？它是由用户在Notes客户端中创建的。下面是添加注释的代码。此代码在应用程序中使用多次。我似乎是在第一次执行代码时发生的。代码位于共享操作调用的脚本库中。哪些行的顺序不正确？如果其他人也有类似的问题，最好能说得更具体一些。我们有哪些线路出了故障？如果其他人也有类似的问题，最好更具体一点。