「COBOL」OpenCOBOL のインストール

COBOL をさわる必要に迫られたので、ちょっと環境作ってみました。その時のメモ。

[ 環境情報 ]
CentOS 6.2
OpenCOBOL 2.0

1. OpenCOBOL のダウンロード

以下の Web ページからダウンロードする。

・OpenCOBOL - Browse /open-cobol at SourceForge.net
http://sourceforge.net/projects/open-cobol/files/open-cobol/

今回は OpenCOBOL 2.0 をダウンロードした。


2. 必要なパッケージのインストール

OpenCOBOL のインストールに必要なパッケージがあるのでインストールしておく。
以下の Web ページに情報がある。

・OpenCOBOL - Browse /open-cobol/2.0 at SourceForge.net
http://sourceforge.net/projects/open-cobol/files/open-cobol/2.0/

僕の環境では "GNU MP" と "Berkeley DB" がなかったので、yum でインストールした。

yum install gmp gmp-devel
yum install db4 db4-devel


3. OpenCOBOL のコンパイル、インストール

ダウンロード資材を展開して、以下コマンドを実行。

./configure --prefix /usr/local/cobol/2.0
make
make install

今回は インストールディレクトリを "/usr/local/cobol/2.0" とするので、上記のように prefix を指定する。

"/etc/profile" に環境変数の設定も行なっておく。

export COBOL_HOME=/usr/local/cobol/2.0
export PATH=$PATH:$COBOL_HOME/bin

"/etc/ld.so.conf" に以下の設定を追記する。追記したら "ldconfig" たたいておく。

/usr/local/cobol/2.0/lib


上記で作業完了です。cobc コマンド実行できるか確認しておく。

cobc -version
cobc (OpenCOBOL) 2.0.0
Copyright (C) 2001,2002,2003,2004,2005,2006,2007 Keisuke Nishida
Copyright (C) 2006-2012 Roger While
This is free software; see the source for copying conditions.  There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Built     Oct 31 2013 23:59:25
Packaged  Feb 11 2012 12:36:31 UTC
C version "4.4.7 20120313 (Red Hat 4.4.7-3)"


いつくかサンプルプログラムを。

Hello World を表示するプログラム ( hello.cob )

       identification division.
       program-id.    sample.
      *
       environment    division.
      *
       data           division.
      *
       procedure      division.
       main.
           accept num from console.
           display "Hello World" upon console.
           stop run.
cobc -x hello.cob
./hello

■ コマンドラインから数字の入力を受け付けるプログラム ( inputnum.cob )

       identification division.
       program-id.    sample.
      *
       environment    division.
      *
       data           division.
       working-storage section.
       01 num pic 9(1).
      *
       procedure      division.
       main.
           accept num from console.
           display "input num is "num upon console.
           stop run.
cobc -x inputnum.cob
./inputnum
1
input num is 1
./inputnum
9
input num is 9


サンプルプログラムは以下の Web ページを参考にさせていただきました。

COBOLプログラミング入門
http://tallercolibri.com/

結構決まりにうるさい印象を受けました・・・
なかなか苦労しそうです。

以上です。