*-- (c) Microsoft Corporation 1995 tsBaseForm::Init() thisform.Refresh() this.nSaveSelect = SELECT() IF thisform.lstReport.ListCount > 0 thisform.lstReport.ListIndex = 1 ENDIF