Is there such a db_ function that returns the columns of the records as TCL variables within a TCL page ?
Then i don't need to use palliatives such as
db_1row select_project_type_id "select * from im_projects where project_id = project_id" -column_array row
set project_type_id $row(project_type_id)
set project_nr $row(project_nr)
set project_name $row(project_name)
set parent_id $row(parent_id)
...