COBOL
プログラムで使用する変数及びデータ並びにその型について記述する。プログラムで使用する変数及びデータのすべては、DATA DIVISIONで定義しなければならない。
「DATA DIVISION」は、「FILE SECTION」と「WORKING-STORAGE SECTION」に大別される。データの型の宣言は、PICTURE(PIC)句によって行う。
呼ばれたプログラムが呼んだプログラムから引数でデータを受け取る場合は、それらの包含構造や基本項目の型を呼ばれたプログラムの「LINKAGE SECTION」で宣言する。
COBOLにおけるデータの分類
COBOLのデータは、次の3つに分類される。
変数 (Variables)
定数 (Literals)
表意定数 (Figurative Constants) - あらかじめ名称が定められている特定の意味を持つ定数(表意定数)を利用できる。この定数の実体は、実行されるシステムよってその意味が有効になるように実現される。たとえば、HIGH-VALUES、LOW-VALUESがある。
COBOLの扱うデータの特徴とメンテナンス
COBOLの代表的な変数型(項類)に、次のものがある。
数字項目 (numeric item) - 例:99999 または 9(5)
英数字項目 (alphanumeric item) - 例:XXXXX または X(5)
C言語やJavaなどの登場後も、COBOLは主に商用計算記述用として、主に金融業界や行政サービスなどで広く使用されている。
COBOL言語規格は、ローカル変数が作りにくく論理制御機能面が弱かった古典的言語からの脱皮を図っている。オブジェクト指向を採用し、入れ子プログラムを可能としたうえ、COBOLからCOBOLクラスライブラリのみならずJavaのクラスライブラリも呼べるようにするなど、相互運用性や共同開発容易性、安全性を改善してきている。
2019年現在、COBOL Cowboys社の調査では2000億行のCOBOLプログラムが現役で、フォーチュン500企業の90%がCOBOLプログラムを使い続けている。またマイクロフォーカス社のDerek Britton氏は「COBOLシステムを運用している組織が万単位で存在」「この言語が世界のトランザクション処理システムのうちの70%で用いられている」と述べた。
数多くの新しい言語やフレームワークが現れた現代、COBOLで作られるシステムはレガシーであり、システム刷新時に仕様を把握した有識者が居ない事や、新技術への対応の難しさが問題になる事がある。
出力
この例では DISPLAY命令を使って文字列をコンソールまたは標準出力に出力している。
COBOLはレコードレイアウトの決まったファイルの処理に使われることが多い。その場合はふつう、ファイル節(FILE SECTION)にレコードとそれを構成するデータ群の定義を書く。そして、実行部(PROCEDURE DIVISION)のREAD文、WRITE文などでそのレコードを読み書きする。
「PROGRAM-ID」(プログラム識別名)を記述する。
「AUTHOR」(作成者名)、「DATE-WRITTEN」(作成日)等の文法もあったが廃要素となった。