COBOL言語の「GOBACK文」とは?使用例などを解説します! | 用語辞典
COBOL2002規格により追加されたCOBOL(コボル)言語の予約語GOBACKとは
COBOL(コボル)言語のGOBACK文とは?
GO BACK(英語)は、日本語に訳すると「~へ戻る」、または「回帰する」という意味です。
COBOL(コボル)言語のGOBACK文は、プログラムの実行を終了し、制御を呼び出し元のプログラムに戻します。
GOBACK文の形式:GOBACK
GOBACKは、プログラムの実行を終了し、CALLで呼び出したプログラムに制御を戻します。使われ方としては、主プログラムから副プログラムを実行する場合の、副プログラム側の終了命令として使われます。
■書式
GOBACK
■使用例
実際にGOBACKを使用したプログラム例をご紹介します。
このプログラムは、「こんにちは」とういうメッセージを表示するプログラムです。19行目を見てください。「STOP RUN」ではなく、「GOBACK」でプログラムを終了しています。
■実行結果
「STOP RUN」でプログラムを終了させたときと同じように、特に問題なくプログラムが終了しました。
GOBACK文のCOBOL(コボル)言語における基本事項やルールについて
GOBACK文は、プログラムの実行を終了させ、呼び出し元のプログラムに制御を返す命令です。GOBACK文のあとに命令を書いても、実行されません。
COBOL(コボル)言語のGOBACK文を使うときの注意点
GOBACK文をプログラムのたくさんの場所に書くと、山盛りのスパゲティのように、プログラムの開始と終了がわかりにくいプログラムになってしまいます。GOBACK文はできるだけ1カ所にしましょう。
GOBACK文を使ったCOBOL(コボル)プログラムの活用方法
COBOL2002規格では、GOBACK文にGIVING句を与えると、リターンコードを呼び出し元のプログラムに返却することができます。呼び出し元の主プログラムはRETURNING句によって、副プログラムのリターンコードを受け取ることができます。
では、GIVING句とRETURNING句を使って副プログラムのリターンコードを主プログラムに返却するプログラム例をご紹介します。
プログラム例では、副プログラムは入力された値で10を割り算し、結果を表示します。副プログラムに入力できる値は0、2、5の3つで、0、2、5以外を入力すると、エラーメッセージを表示し、再入力をうながします。主プログラムは、副プログラムを呼び出し、副プログラムからのリターンコードを表示します。
■主プログラム
- ******************************************************************
- * Author:
- * Date:
- * Purpose:
- * Tectonics: cobc
- ******************************************************************
- IDENTIFICATION DIVISION.
- PROGRAM-ID. GOBACK_SUMPLE2.
- DATA DIVISION.
- FILE SECTION.
- WORKING-STORAGE SECTION.
- 01 WORKING-AREA.
- 03 DISPLAY-BUF PIC X(30).
- 03 RET PIC 9(1).
- PROCEDURE DIVISION.
- *-------------------------------------------
- * 主手続
- *-------------------------------------------
- MAIN-PROCEDURE.
- MOVE SPACE TO DISPLAY-BUF.
- MOVE ZERO TO RET.
- CALL "GOBACK_SUMPLE3" RETURNING RET.
- STRING "戻り値=" RET DELIMITED BY SPACE INTO DISPLAY-BUF.
- DISPLAY DISPLAY-BUF.
- STOP RUN.
- END PROGRAM GOBACK_SUMPLE2.
■副プログラム
- ******************************************************************
- * Author:
- * Date:
- * Purpose:
- * Tectonics: cobc
- ******************************************************************
- IDENTIFICATION DIVISION.
- PROGRAM-ID. GOBACK_SUMPLE3.
- DATA DIVISION.
- FILE SECTION.
- WORKING-STORAGE SECTION.
- 01 WORKING-AREA.
- 03 CONSOLE-INPUT PIC 9(1).
- 03 RESULT PIC 9(1).
- 03 DISPLAY-BUF PIC X(30).
- PROCEDURE DIVISION.
- *-------------------------------------------
- * 主手続
- *-------------------------------------------
- MAIN-PROCEDURE.
- * コンソール入力エリアの初期化
- MOVE ZERO TO CONSOLE-INPUT.
- MOVE SPACE TO DISPLAY-BUF.
- EXEC-DISPLAY-INPUT-PROC.
- * コンソール表示&入力
- DISPLAY "0、2、5 のいずれかの値を入力してください".
- ACCEPT CONSOLE-INPUT FROM CONSOLE.
- * 0、2、5以外が入力された場合、コンソール表示&入力を繰り返す
- IF (CONSOLE-INPUT = 0) OR
- (CONSOLE-INPUT = 2) OR
- (CONSOLE-INPUT = 5) THEN
- COMPUTE RESULT = 10 / CONSOLE-INPUT
- STRING "結果=" RESULT DELIMITED BY SPACE
- INTO DISPLAY-BUF
- DISPLAY DISPLAY-BUF
- ELSE
- DISPLAY "入力値が誤っています"
- GO TO EXEC-DISPLAY-INPUT-PROC
- END-IF.
- GOBACK GIVING RESULT.
- END PROGRAM GOBACK_SUMPLE3.
はじめに0、2、5の入力を促すメッセージが表示されます。
数字の5を入力してみます。
割り算の結果と戻り値に2が表示され、プログラムが終了しました。
GOBACK文はプログラムの実行を終了するだけでなく、CALL文と組み合わせることにより、リターンコードを返却することができ、呼び出し先の副プログラムの処理の結果を、呼び出し元の主プログラムに返却することができます。GOBACK文を上手く使うことで、副プログラムの処理結果により、主プログラムの実行制御を変えるなど、プログラミングの幅が広がります。
この記事を読んだ人は、こちらの記事も読んでいます
【未経験者歓迎】COBOLプログラマー・システムエンジニアの募集
COBOL入門のカテゴリー
1. 優良社員が多数在籍しています
2. 即日派遣、又は請負います
3. 安心価格で請負います
4. 同時、協力会社募集中です
1. 正社員
2. 契約社員
3. 個人事業主
などの 求人情報 が閲覧できます。
目指せ!COBOLダントツ一番企業。
創業当初の話や理念が閲覧できます。
応募条件
※2020年5月31日を以って、締切りました。
18歳~28歳の方。
正社員採用において、北川社長の著書『祈り方が9割』を読んで感想文を事前に提出すると、無条件で最終面接まで進むことができます。
COBOLとは、どのようなプログラミング言語なのか、初心者にもわかりやすく、文法の例をあげて解説してます。
COBOL入門の人気記事
- COBOL言語で計算処理をするなら「COMPUTE文」|入門用語辞典
- COBOL言語の「ACCEPT文」の使い方を分かり易く解説|入門用語辞典
- COBOL言語初心者も安心! 難解「CALL文」をスッキリ解決|入門用語辞典
- 徹底解説!一歩先を行くCOBOL言語のCOPY文活用法|応用ガイド
- 一歩先を行くCOBOL言語の表操作!逐次検索と二分検索|応用ガイド
- COBOL言語の加算処理の基本を伝授! 命令文「ADD」とは?|入門用語辞典
- 徹底解説!一歩先を行くCOBOL言語のファイル併合処理|応用ガイド
- COBOL言語でファイルの開閉命令はOPEN文とCLOSE文!|入門用語辞典
- 徹底解説!一歩先を行くCOBOL言語のデータ共有|応用ガイド
- COBOL言語とは?プログラムの書き方やルールを解説!|基礎ガイド
- COBOL言語の歴史とこれまでの進化を知る!廃止・追加機能|基礎ガイド
- COBOL言語のオブジェクト指向について理解しよう!|基礎ガイド
- COBOL言語のディスプレイ出力とコンソール入力について|基礎ガイド
- COBOL言語が得意とする計算処理を体験してみよう!|基礎ガイド
- 一歩先を行くCOBOL言語のユーザ定義関数について|応用ガイド
- 初心者から中級者でも安心!理解できるCOBOL言語の勉強法|学習講座
- 初心者必見!COBOL言語を効率よくマスターする勉強法とは|学習講座
- COBOL初心者が犯しやすいミスとその対策について|学習講座
- COBOL初心者がやってはいけない勉強方法とは?|学習講座
- 一歩先へ行くCOBOLプログラマの知っておくべき4つのヒント|学習講座