COBOL言語の「EXIT文」とは?機能や使い方を解説します | 用語辞典
COBOL(コボル)言語の予約語EXITを使った処理の終了とは
COBOL(コボル)言語のEXIT文とは?
EXIT(英語)は、日本語に訳すると「出口」という意味です。
COBOL(コボル)言語のEXIT文は、サブルーチンを終了します。
EXIT文の形式:EXIT
EXIT文は節の終了を意味し、サブルーチンとして呼び出された節を終了し、制御を呼び出し元に戻します。
■書式
出口段落名 EXIT.
■構文規則
<出口段落名>
サブルーチンの出口の段落名を記述します。
■使用例
実際にサブルーチンでEXIT文を使用したプログラム例をご紹介します。
このプログラムは、コンソールに入力を促すメッセージを表示し、数字の0から9までの1文字を入力させる処理を繰り返すプログラムです。数字の9が入力されるとプログラムを終了します。また、0から9以外が入力されるとエラーメッセージを表示します。
■実行結果
はじめに入力を促すメッセージが表示されます。
数字の0を入力してみます。
入力を促すメッセージが繰り返し表示されます。
次に数字の8を入力してみます。
入力を促すメッセージが繰り返し表示されます。
次に英字のAを入力してみます。
エラーメッセージが表示され、入力を促すメッセージが表示されます。
次に数字の9を入力してみます。
プログラムが終了しました。
EXIT文のCOBOL(コボル)言語における基本事項やルールについて
EXIT文は節の実行を終わらせる命令です。この命令がないと、PERFORMでサブルーチンを呼び出しても、呼び出し元に制御が戻らず、意図したところでサブルーチンを終了させることができません。
COBOL(コボル)言語のEXIT文を使うときの注意点
EXIT文をサブルーチン内にいくつも記述すると、出口がたくさんあって、わかりにくくデバッグが難しいプログラムになってしまいます。出口はできるだけ1つにまとめて、EXIT文は1カ所に記述するようにしましょう。
EXIT文を使ったCOBOL(コボル)プログラムの活用方法
EXIT文は、PROGRAM句を使って、サブルーチンの終了以外にも副プログラムを終了させることができます。また、最上位の主プログラムであれば、処理全体を終了させることができます。
では、「COBOL(コボル)言語のEXIT文とは?」でご紹介したサンプルプログラムを、主プログラムと副プログラムに分けて、副プログラムをEXIT PROGRAMで終了させてみましょう。
■主プログラム
- ******************************************************************
- * Author:
- * Date:
- * Purpose:
- * Tectonics: cobc
- ******************************************************************
- IDENTIFICATION DIVISION.
- PROGRAM-ID. EXIT-SUMPLE2.
- DATA DIVISION.
- FILE SECTION.
- WORKING-STORAGE SECTION.
- 01 WORKING-AREA.
- * リターンコード
- 03 RET PIC 9(1).
- PROCEDURE DIVISION.
- *-------------------------------------------
- * 主手続
- *-------------------------------------------
- MAIN-PROCEDURE.
- * リターンコードの初期化
- MOVE ZERO TO RET.
- CALL "EXIT-SUMPLE3" USING BY REFERENCE RET.
- DISPLAY RET.
- IF RET NOT = 9 THEN
- GO TO MAIN-PROCEDURE
- END-IF.
- STOP RUN.
- END PROGRAM EXIT-SUMPLE2.
■副プログラム
- ******************************************************************
- * Author:
- * Date:
- * Purpose:
- * Tectonics: cobc
- ******************************************************************
- IDENTIFICATION DIVISION.
- PROGRAM-ID. EXIT-SUMPLE3.
- DATA DIVISION.
- FILE SECTION.
- WORKING-STORAGE SECTION.
- 01 WORKING-AREA.
- * コンソール入力バッファ
- 03 CONSOLE-INPUT PIC X(1).
- LINKAGE SECTION.
- 01 LNK_AREA.
- 03 RET_CODE PIC 9(1).
- *-------------------------------------------
- * 副手続
- *-------------------------------------------
- PROCEDURE DIVISION USING LNK_AREA.
- *-------------------------------------------
- * コンソール表示&入力処理
- *-------------------------------------------
- DISPLAY-INPUT-PROC.
- MOVE SPACE TO CONSOLE-INPUT.
- DISPLAY "数字を1文字入力してください".
- DISPLAY "0-8:CONTINUE 9:EXIT".
- ACCEPT CONSOLE-INPUT FROM CONSOLE.
- IF (CONSOLE-INPUT < 0) OR
- (CONSOLE-INPUT > 9) THEN
- DISPLAY "入力値が誤っています"
- END-IF.
- DISPLAY-INPUT-PROC-END.
- MOVE CONSOLE-INPUT TO RET_CODE.
- EXIT PROGRAM.
- END PROGRAM EXIT-SUMPLE3.
■実行結果
はじめに入力を促すメッセージが表示されます。
数字の0を入力してみます。
入力を促すメッセージが繰り返し表示されます。
次に数字の8を入力してみます。
入力を促すメッセージが繰り返し表示されます。
次に英字のAを入力してみます。
エラーメッセージが表示され、入力を促すメッセージが表示されます。
次に数字の9を入力してみます。
プログラムが終了しました。
EXIT文は、サブルーチンやプログラムの実行を終わらせ、上位モジュール(呼び出し元)に制御を戻す重要な命令です。構造化プログラミングでは欠かせない命令なので、ぜひ使い方を覚えてくださいね。
この記事を読んだ人は、こちらの記事も読んでいます
あなたのCOBOL技術を活かしませんか?
COBOL入門のカテゴリー
1. 優良社員が多数在籍しています
2. 即日派遣、又は請負います
3. 安心価格で請負います
4. 同時、協力会社募集中です
1. 正社員
2. 契約社員
3. 個人事業主
などの
求人情報
が閲覧できます。
目指せ!COBOLダントツ一番企業。
創業当初の話や理念が閲覧できます。
応募条件
※2020年5月31日を以って、締切りました。
18歳~28歳の方。
正社員採用において、北川社長の著書『祈り方が9割』を読んで感想文を事前に提出すると、無条件で最終面接まで進むことができます。
COBOLとは、どのようなプログラミング言語なのか、初心者にもわかりやすく、文法の例をあげて解説してます。
COBOL入門の人気記事
- COBOL言語とは?プログラムの書き方やルールを解説!|基礎ガイド
- 【COBOL言語】条件分岐処理の代名詞「IF文」について知ろう|用語辞典
- COBOL言語の「MOVE文」とは?転記のルールをご紹介します|用語辞典
- COBOL言語の「STRING文」とは?文字連結の基礎知識と注意点|用語辞典
- 多枝分岐ってなに?COBOL言語の「EVALUATE文」を知ろう!|用語辞典
- COBOL言語の「PICTURE句」とは?基本事項を解説します!|用語辞典
- COBOL言語で計算処理をするなら「COMPUTE文」|用語辞典
- COBOL言語の「REDEFINES句」とは?使い方を確認しよう!|用語辞典
- 覚えておけば楽ができる?COBOL言語の「COPY文」の使い方|用語辞典
- COBOL言語の文字列操作のパターンを理解しよう!|基礎ガイド
- COBOL言語の初期化処理に重宝する「INITIALIZE文」とは?|用語辞典
- COBOL言語の「LOW-VALUE」の使い方について理解しよう!|基礎ガイド
- COBOL言語の「OCCURS句」について知ろう!学ぶべき基本とは|用語辞典
- COBOL言語初心者も安心! 難解「CALL文」をスッキリ解決|用語辞典
- COBOL言語の「PERFORM文」とは。実行制御について解説!|用語辞典
- COBOL言語の繰り返し処理のパターンを理解しよう!|基礎ガイド
- COBOL言語の「定数」の種類と使い方について理解しよう!|用語辞典
- COBOLのDBアクセスパターンを学ぼう!「FETCH」|応用ガイド
- COBOL言語の「DISPLAY文」は、ディスプレイ出力の為にある|用語辞典
- COBOL言語の「VARYING句」は便利?使用方法を学びましょう|用語辞典