从VBA调用PL / SQL块并检查它是否已成功执行

Question

我有以下VBA代码，我用它来调用PL / SQL块。在PL / SQL块中正确处理异常。

如何确定PL / SQL块中是否有任何异常？非常感谢

Sub ApplyOrder(sOrder As String)

Dim sSQL As String

' Construct the SQL statement
sSQL = "BEGIN b2_apply_pkg.apply_order('" & sOrder & "'); END; "

'Execute the statement
oraDatabase.DbExecuteSQL sSQL

End Sub