У меня есть база данных с мягким удалением, и я сохраняю эти удаленные документы в виде с именем «DeletedDocuments»
у меня есть действие в этом представлении, чтобы удалить мягко удаленные документы постоянно ...
У меня есть формула HideWhen для действия, утверждающая, что действие должно скрываться, когда представление не содержит никаких документов
Следование за сценарием действия
Function deleteSelectedDocuments As Boolean
deleteSelectedDocuments=False
Call setObjectVars()
Dim documentCollection As NotesDocumentCollection
Dim userChoice As Integer
On Error Goto errHandler
Set documentCollection=gDB.UnprocessedDocuments
If documentCollection.Count=0 Then
Msgbox "You have not selected any documents. Please choose some to delete em",,"No documents selected"
Else
userChoice=Msgbox ("Do you want to delete " & Cstr(documentCollection.Count) & " document(s)?",64+100, _
"Please confirm...")
If userChoice=6 Then
Call documentCollection.RemoveAll(True)
Call gWk.ReloadWindow()
Call gWk.ViewRefresh
End If
End If
deleteSelectedDocuments=True
Exit Function
errHandler:
Print "Error ***" & Error & " occured on line ***" & Cstr(Erl) & "*** with error number ***" & Cstr(Err) & "*** while attempting to delete selected documents"
Msgbox "Error ***" & Error & " occured on line ***" & Cstr(Erl) & "*** with error number ***" & Cstr(Err) & "*** while attempting to delete selected documents"
Exit Function
End Function
Я хочу обновить свой вид после удаления документов, а также обновить HideWhen формулы ...
я получил что-то вроде uiDoc.RefreshHideFormulas
но uiDoc здесь не работает ...
и при этом я не могу использовать @Command ([RefreshHideFormulas]) в 'eveluate' ...
как мне это сделать ????