#if 1
	sql.SetParam(0, cat.GetKey());
	sql.Execute("select ID, TEXT from ITEM_TYPE where ITEM_CATEGORY_ID = ? order by TEXT");
#else
	SqlBool wh;
	if(!IsNull(cat.GetKey()))
		wh = ITEM_CATEGORY_ID == cat.GetKey();
	sql * Select(ID, TEXT).From(ITEM_TYPE).Where(wh).OrderBy(TEXT);
#endif

void Test::remove_person(void)
{
    try
    {
        SQL.SetParam(0, sql_person(0));
	SQL.ExecuteX("DELETE FROM person WHERE id = ?");
    }
    catch (const SqlExc& e)
    {
        sql_person.CancelRemove();
        Exclamation("[* " + DeQtfLf(e) + "]");
    }
}