This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
~Kirk Breresalyli 2.Nov.09 12:41 AM a Web browser Domino DesignerAll ReleasesAll Platforms
Below is my reporting code: It only works with 1 status - vstatus=Cstr(dialog.Status(0)). As Status is a multi-value field, what is a quick way to get multiple status values selected from the dialog box?
continue = ws.DialogBox("DepartmentDialog",True, True, False, False, False, False,"Department Query",Dialog, True)
Set uiview = ws.CurrentView
Set view = uiview.View
If vstatus<>"" Then
NewFormula = |SELECT (@Begins(Department;"|& searchstring & |"))& status="| & vstatus & |" & ScheduledFinish > [| & sdate & |] & ScheduledFinish < [| & edate & |]|
End If
If vstatus="" Then
NewFormula = |SELECT (@Begins(Department;"|& searchstring & |")) & DateStamp > [| & sdate & |] & DateStamp < [| & edate & |]|
End If
Set collection=db.search(NewFormula,Nothing,0)
If collection.Count=0 Then
Messagebox "No records are found......",MB_OK,"Report Status...."
Exit Sub
End If
If collection.Count>0 Then
Call collection.PutAllInFolder("SearchResult")
End If
Return to top
Print this page
