In the following example, the BeforeAF event procedure sets a user-defined calculated field in the second additional footer:
Private Sub Report_BeforeAF(By Val Level As Integer, SuppressBand _ As Boolean) If Level = 2 Then If CustomerName = "Aaron Fitz Electric" Then 'Set a user-defined calculated field Status = "Preferred" End If End If End Sub