PL/Tcl 函数中的 Tcl 代码或者从 PL/Tcl 函数中调用的代码可以抛出一个错误,错误可以由执行某些非法操作产生或者通过使用 Tcl error
命令或者 PL/Tcl 的elog
命令产生。Tcl 中可以使用 Tcl catch
命令捕获这类错误。如果一个错误没有被捕捉但是被允许传播到该PL/Tcl函数执行的顶层,它会在该函数的调用查询中被报告为一个SQL错误。
相反,在 PL/Tcl 的spi_exec
、spi_prepare
以及spi_execp
命令中发生的SQL错误会被报告为 Tcl 错误,因此它们也可以被 Tcl 的catch
命令捕获(这些PL/Tcl命令中的每一个都在一个子事务中运行它的SQL操作,该子事务在错误时会被回滚,这样任何部分完成的操作也会被自动清除)。同样地,如果一个错误被传播到顶层而没有被捕获,它会转变成SQL错误。
Tcl 提供了一个errorCode
变量,它表示有关于一个错误的附加信息,它的格式易于 Tcl 程序解释。该变量的内容符合 Tcl 列表格式,第一个词标识报告该错误的子系统或者库,之后的内容则留给子系统或者库来填充。对于 PL/Tcl 命令报告的数据库错误,第一个词是POSTGRES
,第二个词是 PostgreSQL 的版本号,剩下的部分是域名称/域值构成的对,它们提供有关该错误的详细信息。域 SQLSTATE
、condition
以及message
总是会被提供(前两个表示附录 A中所示的错误代码和情况名称)。可能出现的域包括 detail
、 hint
、context
、 schema
、table
、column
、 datatype
、constraint
、 statement
、 cursor_position
、 filename
、lineno
以及 funcname
。
使用 PL/Tcl 的errorCode
信息的一种便捷方式是把它载入到一个数组中,这样域名称就变成了数组下标。这样做的代码看起来像这样
if {[catch { spi_exec $sql_command }]} {
if {[lindex $::errorCode 0] == "POSTGRES"} {
array set errorArray $::errorCode
if {$errorArray(condition) == "undefined_table"} {
# deal with missing table
} else {
# deal with some other type of SQL error
}
}
}
(双冒号显式地指定errorCode
是一个全局变量)。
备案信息: 粤ICP备15087711号-2
Copyright © 2008-2024 啊嘎哇在线工具箱 All Rights.
本站所有资料来源于网络,版权归原作者所有,仅作学习交流使用,如不慎侵犯了您的权利,请联系我们。