Lotus Notes 将公式转换为代理

Question

如何将我的公式转换为代理？我在一个视图中写了一个剩余天数的公式，想让它成为一个代理。

公式：

FIELD DaysLeft := @If(ExpDate = ""; ""; @Integer((ExpDate - @Today)/60/60/24))

我在一个视图中有很多列，所以它会像：

FIELD DaysLeft1 := @If(ExpDate1 = ""; ""; @Integer((ExpDate1 - @Today)/60/60/24))
FIELD DaysLeft2 := @If(ExpDate2 = ""; ""; @Integer((ExpDate2 - @Today)/60/60/24))
FIELD DaysLeft3 := @If(ExpDate3 = ""; ""; @Integer((ExpDate3 - @Today)/60/60/24))

保留选项默认值：

声明：

 Dim session As NotesSession
 Dim db As NotesDatabase
 Dim view As NotesView

初始化：

Sub Initialize
Dim doc As NotesDocument
Set session = New NotesSession
Set db = session.currentdatabase

FIELD DaysLeft := @If(ExpDate = ""; ""; @Integer((ExpDate - @Today)/60/60/24))

End Sub

这些对象的代码应该是什么？

Answer 1

创建类型为 "Formula" 的代理：

您可以在那里添加您的公式。您改为创建了一个 LotusScript 代理。