This.ListIndex = 1 IF ThisForm.lAppendMode && This variable tests if it's in EDIT mode. This.Value= ThisForm.amachines[1] ENDIF