Refresh Method
Object: frmreports
Expand/Collapse source code of procedure Refresh Source Code
LOCAL lcFilter
SELECT repolist

lcFilter = "ctype = '" + IIF(thisform.opgOutputType.optReports.Value = 1, ;
                            "REPO", ;
                            "LIST") + "'"

SET FILTER TO &lcFilter
LOCATE
thisform.lstReport.Requery()