[(define st (sql-statement InterOfficeDirectory))]
SQL Test
[(define rowcount (sql-repeat st (lastname firstname)
("select lastname, firstname from employee where lastname='Lewis' and deleted=0")
(brl
] - [lastname], [firstname]
[)))]
[(define plural (> rowcount 1))]
There [(if plural "were" "was")]
[rowcount]
[(if plural "matches" "match")] for the search.