COBOL を整える。

＝金融や行政の基幹システムで今も動く COBOL を、桁位置と PIC 句の道具つきで学ぶ

COBOLとは

事務処理のために作られた言語で、英語に近い書き方と10進数の正確な計算を特徴とし、今も金融や行政の基幹システムで動いています。

誕生	1959年
作った人・組織	CODASYL（米国の政府・企業が参加した委員会）。グレース・ホッパーの FLOW-MATIC の影響を受けています
型の付け方	静的型付け（PIC 句で桁数と種類を宣言する）
動かし方	コンパイルして実行ファイルを作る（GnuCOBOL は C に変換してからコンパイルする）
ファイルの拡張子	.cob / .cbl
手元で動かすには	`cobc -x main.cob && ./main（GnuCOBOL）`

銀行・保険・証券の勘定系システムで、今も COBOL のプログラムが動いています。
官公庁や自治体の基幹システム（税・住民記録など）にも、COBOL で作られたものがあります。
メインフレーム（大型汎用機）の上で動くことが多く、メインフレームの保守とセットで扱われます。
金額を10進数の固定小数点で扱えるため、2進数の浮動小数点で起きる端数の誤差を避けやすく、お金の計算に向いています。
経済産業省の「DXレポート」（2018年）は、複雑化・老朽化・ブラックボックス化した既存システムが残ると2025年以降に大きな損失が出るおそれがあると指摘し（「2025年の崖」）、COBOL で書かれた古い基幹システムもこの文脈で話題になりました。

金融や公共分野を担当する SIer では、既存システムの保守を担う人向けに、今も新人研修で COBOL を扱うことがあります。データ部と手続き部を分けて書く構成や、PIC 句による桁数の考え方を、実際の帳票処理やファイル処理を題材に学びます。

そもそも COBOL とは

COBOL（コボル）は1959年に生まれた言語で、米国の政府・企業が参加した委員会 CODASYL が仕様をまとめました。英語の文章に近い書き方で、お金の計算に欠かせない10進数の正確な計算が得意です。書いたプログラムはコンパイルして実行ファイルにします。

最近の言語と比べると書く量は多くなりますが、何をしているかが読み取りやすいのが特徴です。変数の桁数や種類は PIC 句で宣言します。長く動き続けるシステムが多いため、新しく作るより、既存のプログラムを保守・改修する場面が中心です。

このページの桁位置の定規や PIC 句の道具で、COBOL の書き方を試してみてください。

C・C++・Java・C#・COBOL・VBA の6ページで、同じ5つのお題を同じ順に並べています。言語を切り替えると、書き方の違いがそのまま比べられます。

このページではコードを実行できません。表示している出力とエラーのメッセージは、GnuCOBOL 3.1.2 で実際にコンパイル・実行して、一字一句同じになることを確かめたものです。

コード（.cob / .cbl）

       IDENTIFICATION DIVISION.
       PROGRAM-ID. HELLO.
       PROCEDURE DIVISION.
           DISPLAY "Hello, World!".
           STOP RUN.

実行すると

Hello, World!

プログラムは「部（DIVISION）」に分けて書きます。DIVISION や PROGRAM-ID は8桁目から（A領域）、DISPLAY などの文は12桁目から（B領域）書くのが固定形式の決まりです。文の終わりにはピリオドを付けます。