ADD 宣告

ADD 1 TO cobol

這會修改變數 cobol。溢位默默忽略。

ADD 1 TO cobol GIVING GnuCOBOL

這不會修改 cobol,ADD 的結果儲存在 GnuCOBOL 中。同樣,儲存分配的溢位被靜默忽略(該欄位將在大小錯誤上保持其舊值,並且不會引發異常)。

ADD
    a b c d f g h i j k l m n o p q r s t u v w x y z
    GIVING total-of
    ON SIZE ERROR
        PERFORM log-problem
    NOT ON SIZE ERROR
        PERFORM graph-result
END-ADD

允許多個輸入,顯式儲存大小測試。COBOL 有一個內在的 FUNCTION E,所以它不是單個字母識別符號的明智選擇。

COBOL 中的 SIZE ERROR 取決於型別和/或 PICTUREPIC 9 欄位只能安全地儲存從 0 到 9 的值,在這種情況下,10 的中間結果將觸發 ON SIZE ERROR 短語。