У меня есть база данных с включенным мягким удалением, и я сохраняю эти удаленные документы в представлении с именем «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' ... как мне это сделать ????