TCL列表或SQL中的变量

Question

我遇到了尝试在orasql中使用列表的问题。还有另一种方法吗？我知道我可以循环使用foreach并将值设置为字符串变量，但我认为所有这些小数据库拉动需要更长的时间。我也可以运行一个查询，但我不是DBM，我似乎无法将查询时间缩短，它比我在这里布置的要复杂得多，我需要用户尽快拉出它。 我怎么能这样做：

orasql $DB(db) "select this from this_table"
orafetch $DB(db) {
    lappend list1 @1
}
orasql $DB(db) "select that from that_table where this in ($list1)"
orafetch $DB(db) {
    lappend that @1
}

Answer 1

这是你想要做的吗？

select that
from that_table
where this in (select this from this_table);