COBOL言語のサブプログラムとデータ連携を理解しよう!|基礎ガイド
COBOL(コボル)言語を使いこなすための、サブプログラムとデータ連携とは
COBOL(コボル)言語のサブプログラムとその使用方法とは?
サブプログラムは、サブルーチンとも呼ばれています。ルーチンという言葉から想像できるように、ある処理、作業を1つの手続きとしてまとめたプログラムをこう呼びます。サブプログラムは、このような作りのプログラムのため、様々な場面で繰り返し利用する事ができるだけでなく、サブプログラム化する事で、プログラムの可読性や保守性を高める事ができます。
ここでは、COBOL(コボル)言語のメインプログラムからサブプログラムを呼び出し、サブプログラムから画面にメッセージを表示するという処理の書き方をご紹介しますので、しっかりその書き方及び使用方法について理解しましょう。
書き方:
CALL プログラム名
使用例:
・メインプログラム
・サブプログラム
使用例は、メインプログラム(SUB_SAMPLE01)からCALL文でサブプログラム(SUB_SAMPLE01KO)を呼び出し、サブプログラム側で、画面にメッセージを表示しています。メインプログラムはサブプログラムを呼び出すだけで、実際の処理はサブプログラム側で記述する事になりますので、プログラムを機能単位に分けて管理する事ができます。
実行結果:
COBOL(コボル)言語のサブプログラムへのデータ連携
COBOL(コボル)言語の基本的なサブプログラムの使い方について理解いただけたところで、次はメインプログラムで作成したデータをサブプログラムに連携する方法をご紹介します。
COBOL(コボル)言語のサブプログラムへのデータ連携は、主に値渡しと参照渡しというデータ連携の方法があります。値渡しは、メインプログラムで作成したデータをサブプログラムに渡すだけで、そのデータをサブプログラムで加工、編集しても、メインプログラムのデータ項目には影響を与えません。
一方、参照渡しは、データ項目を共通のデータ領域に持つため、サブプログラムで加工、編集した結果をメインプログラムで活用する事ができます。では、順に値渡しと参照渡しの書き方及び使用方法について見ていきましょう。
書き方1:サブプログラムへのデータ連携(値渡し)
CALL プログラム名 USING BY CONTENT データ項目
使用例1:
・メインプログラム
・サブプログラム
使用例は、メインプログラム(SUB_SAMPLE02)で、サブプログラム(SUB_SAMPLE02KO)の呼び出しと取得した日付の引き渡しを行い、サブプログラム側で、メインプログラムから引き渡されたデータの画面表示をしています。このように、USING文を利用するとプログラム間のデータ連携を行う事ができます。
実行結果1:
書き方2:サブプログラムへのデータ連携(参照渡し)
CALL プログラム名 USING [BY REFERENCE] データ項目
使用例2:
・メインプログラム
・サブプログラム
使用例は、メインプログラム(SUB_SAMPLE03)で、サブプログラム(SUB_SAMPLE03KO)の呼び出しとデータの引き渡しを行い、サブプログラム側で、引き渡されたデータの加算を行っています。実行結果を見ていただければおわかりになるかと思いますが、値渡しと参照渡しでサブプログラムの呼び出し前後の結果が変わっている事に気づかれると思います。このように参照渡しのデータ連携では、サブプログラムの処理結果をメインプログラムでも活用する事ができます。
実行結果2:
COBOL(コボル)言語のサブプログラム利用における基本事項や注意事項
- サブプログラムを呼び出すCALL文の間の空白や改行は、自由に設定できます。
- CALL文で[ON EXCEPTION]指定をすると、サブプログラムが実行できなかった場合の処理を記述する事ができます。
- CALL文で[NOT ON EXCEPTION]指定をすると、サブプログラムが実行できた場合の処理を記述する事ができます。
- データ連携(参照渡し)で指定する[BY REFERENCE]は、省略する事ができます。
サブプログラムへのデータ連携、COBOL(コボル)プログラムの活用法
COBOL(コボル)言語のサブプログラムへのデータ連携の基本的な書き方や使用例について理解いただけたでしょうか?最後に活用法として、サブプログラムとデータ連携する際に、RETURN-CODEという予め宣言されている項目を利用する事がありますので、その使用例をご紹介します。
基本的な使用方法は、先にご紹介した書き方が理解いただけていれば、それ程難しい内容ではないと思いますので、しっかり理解して活用していっていただければと思います。
サンプルプログラム:
・メインプログラム
- IDENTIFICATION DIVISION.
- PROGRAM-ID. SUB_SAMPLE04.
- ENVIRONMENT DIVISION.
- DATA DIVISION.
- WORKING-STORAGE SECTION.
- PROCEDURE DIVISION.
- *> RETURN-CODEの活用
- CALL "SUB_SAMPLE04KO".
- IF RETURN-CODE < ZERO
- THEN
- DISPLAY "ERROR RETURN-CODE:" RETURN-CODE
- END-IF.
- STOP RUN.
- END PROGRAM SUB_SAMPLE04.
・サブプログラム
- IDENTIFICATION DIVISION.
- PROGRAM-ID. SUB_SAMPLE04KO.
- ENVIRONMENT DIVISION.
- DATA DIVISION.
- WORKING-STORAGE SECTION.
- PROCEDURE DIVISION.
- MOVE -1 TO RETURN-CODE.
- EXIT.
- END PROGRAM SUB_SAMPLE04KO.
実行結果:
いかがでしたでしょうか?頻繁に使われる処理を共通のサブプログラムとして作成しておく事は、COBOL(コボル)言語においても、よく行われます。ちょうど予め用意されている関数を利用するイメージに近いでしょうか。
また、今回ご紹介したサブプログラムとのデータ連携は、メインプログラムの処理をシンプルにし、更にはプログラムを分担して作成するという事にもつながりますので、是非しっかり活用できるよう理解を深めていただければと思います。
この記事を読んだ人は、こちらの記事も読んでいます
【未経験者歓迎】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つのヒント|学習講座