30.11.6 CBLBELL
CBLBELLサービスルーチンは,警告音を鳴らす機能を提供するものです。
- 形式
CALL 'CBLBELL'
- 引数
-
なし。
- 戻り値
-
0:正常終了した場合
-1:エラーが発生した場合
- 使用例
IDENTIFICATION DIVISION. PROGRAM-ID. SAMPLE1. : DATA DIVISION. WORKING-STORAGE SECTION. : PROCEDURE DIVISION. : CALL 'CBLBELL'. IF RETURN-CODE NOT = 0 THEN CBLBELLエラー処理 END-IF. :