ObjectScriptには、エラー（ステータスコード、例外、SQLCODEなど）を処理する方法が少なくとも3つあります。 ほとんどのシステムコードにはステータスが使用されていますが、例外は、いくつかの理由により、より簡単に処理することができます。 レガシーコードを使用している場合、さまざまな手法の変換にいくらか時間が掛かりますが、 参考として、次のスニペットをよく使用しています。 皆さんのお役にも立てればと思います。
///SQLCODEのステータス: set st = $$$ERROR($$$SQLError, SQLCODE, $g(%msg)) //埋め込みSQL set st = $$$ERROR($$$SQLError, rs.%SQLCODE, $g(rs.%Message)) //動的SQL ///SQLCODEの例外: throw ##class(%Exception.SQL).CreateFromSQLCODE(SQLCODE,%msg) //埋め込みSQL throw ##class(%Exception.SQL).CreateFromSQLCODE(rs.%SQLCODE,rs.%Message) //動的SQL throw:(SQLCODE'=0)&&(SQLCODE'=100) ##class(%Exception.SQL).
.png)
.png)
.png)
.png)
.png)