home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Demos / Component Software / FileFlex 2.0.3.sit / FileFlex 2.0.3 / Unsupported & Undocumented / RESTGUID / RESTGUID.DIR / 00008_by state.ls < prev    next >
Encoding:
Text File  |  1996-07-23  |  203 b   |  10 lines
  1. on mouseUp
  2.   global restDB, stateDEX
  3.   if the hilite of member "by state" = 1 then
  4.     doUniqList(stateDEX, "STATE", "stateList")
  5.   else
  6.     put EMPTY into field "stateList"
  7.   end if
  8.   updateStage()
  9. end
  10.