COBOL往事

COBOL往事

    偶然看到网上文章介绍说，用模拟器软件Hercules在PC机上模拟IBM大型机，使用它来练习使用COBOL语言开发软件。本人已经很多年不做COBOL开发了，再次看到熟悉的代码，感觉很亲切。10年前，本人用COBOL语言做过几年财会系统开发，但不是在IBM机器上，而是HP机器上。
    回想当年，2002年毕业进入一家大型台资企业，开始接触从未见过的COBOL语言，在学习阶段，得到了老同事的大力教导，很快就进入了实际开发阶段。
    当时COBOL的开发环境是在HP3000型服务器上, 使用的操作系统是MEP/iX，数据库Turbo Image，客户机在Windows平台上安装终端HP Reflection以访问服务器。当时COBOL这方面的书籍很少见，看的大多都是台湾出的繁体版的书籍，MEP/iX操作系统的中文书籍更是没有，只有一本内部整理的培训手册，已经很不错了。
    开发COBOL程序一般是在Windows平台上将程序编辑好后，通过HP Reflection终端上传到服务器，然后编译服务器上的程序。这里有一个很有特色的编辑器HE2000(汉书2000)，是台湾人开发的，非常强大，似乎是专为COBOL打造的，特别适合编辑COBOL程序，但好像只有繁体版，不清楚后来有没有新的版本。
    COBOL语言中让我印象深刻的是，英语式语法，例如INITIALIZATION,DISPLAY,ZERO，有的单词比较长等等，并且大多都是大写，定义的变量单词间用中杠'-'来连接。
    COBOL语言特别适合处理数据库的数据，有一个技术KASM FILE非常有特点，它在COBOL程序中定义，是一个数据集，类似一个表，但它会驻留在内存中，插入数据时不用关心顺序，能方便地定义KEY，并且会按KEY自动排序，在一些复杂的业务逻辑需要处理时，将数据库数据读出后写入KASM FILE,然后对KASM FILE进行处理，输出报表等等时，只需要将KASM FILE输出即可，在业务逻辑变更