第三十六章 Cach 命令大全 ZTRAP 命令

描述引數示例

使用指定的錯誤**強制執行錯誤。

ztrap:pc ztraparg ztrap:pc $zerror

ztrap:pc $ze

ztrap命令接受命令後置條件和引數間接。ztrap具有三種形式：

不帶引數的ztrap會強制使用錯誤**進行錯誤。

ztrap ztraparg強制執行錯誤，錯誤**為，其中***x是ztraparg指定的字串的前四個字元。如果指定表示式而不是帶引號的字串文字，則編譯器將計算該表示式並使用結果字串的前四個字元。計算表示式時，caché會從數字中刪除加號以及前導和尾隨零。 ztraparg的所有其餘字元將被忽略。

ztrap$zerror不會強制出現新錯誤。它會在當前程式堆疊級別停止執行，並彈出堆疊級別，直到找到另乙個錯誤處理程式為止。然後，使用當前錯誤**在該錯誤處理程式中繼續執行。

可選的後置條件表示式。如果後置條件表示式為true（計算為非零數值），則caché執行命令。如果後置條件表示式為假（計算為零），則caché不執行命令。

字串文字或計算結果為字串的表示式。可以為ztraparg指定以下任何值：

ztrap "fred"
; generates 
ztrap "fred"
; generates 
ztrap "freddy"
; generates 
ztrap "foo"
; generates 
ztrap " foo"
; generates 
ztrap "@#$%"
; generates >
ztrap ""
; generates 
ztrap ""
""; generates

ztrap 1234
; generates 
ztrap 2+2
; generates 
ztrap 10/3
; generates 
ztrap +
0.700
; generates 
ztrap $zpi  ; generates 
ztrap $char(64
)_$char(37
); generates >
ztrap ""
; generates 
ztrap ""
""; generates

ztrap命令接受引數間接。

當ztrap引數是特殊變數$zerror時，將執行特殊處理，這在$ztrap錯誤處理程式中很有用。ztrap $zerror不會強制出現新錯誤。它會在當前程式堆疊級別停止執行，並彈出堆疊級別，直到找到另乙個錯誤處理程式為止。然後，使用當前錯誤**在該錯誤處理程式中繼續執行。此錯誤處理程式可能位於其他命名空間中。

這種將控制傳遞給錯誤處理程式的方法比使用舊版zquit命令更可取。

本示例說明如何將ztrap命令與表示式配合使用以產生錯誤**：

; 此時，例程發現錯誤 ... ztrap "er23"

...

當例程執行並且發現預期的錯誤情況時，輸出如下所示：

label+offset^routine

此示例顯示後置條件的使用如何影響ztrap命令：

;
ztrap:y<0 "yneg"
;

當例程執行且y為負時，輸出為：

label+offset^routine

本示例說明如何在ztrap命令中使用引數間接定址：

;
set erptr="ermsg"
set ermsg="wxyz";;
ztrap @erptr

輸出為：

label+offset^routine

下面的示例顯示乙個ztrap命令，該命令呼叫在先前上下文級別定義的$ztrap錯誤陷阱處理程式。

/// d ##class(pha.test.command).testztrap()
classmethod testztrap()

(pha.test.command)

.testztrap()

$ztrap set to:

+2022

^pha.test.command.

1main $estack=

0main $ecode= $zerror=

suba $estack=

1onerr $estack=

0onerr $ecode=

,zztrap, $zerror=

ztestztrap+

15^pha.test.command.

第三十六章 Cach 命令大全 ZTRAP 命令

第三十六章神女

第三十六象己亥

第三十章 Cach 命令大全 VIEW 命令

第三十六章 Cach 命令大全 ZTRAP 命令

第三十六章 神女

第三十六象 己亥

第三十章 Cach 命令大全 VIEW 命令

相關推薦

第三十六章神女

第三十六象己亥