Monday, November 08, 2010 at 12:02 AM.

---

system.verbs.apps.uBASE.examples.msgStates

<<open the states database created by the newStates script
	<<display each of the state names in Frontier's main window

local (ubasefolder, fnum, count, key, i);
ubase.launch ();
ubasefolder = file.folderFromPath (ubase.appinfo.path);
fnum = ubase.openFile (ubasefolder + "States Database");
count = ubase.countRecords (fnum);
key = ubase.getFirstRecord (fnum);
for i = 1 to count {
	msg (key);
	key = ubase.getNextRecord (fnum, key)};
ubase.closeFile (fnum)

---

This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.