15、大型机编程语言、技术与数据库系统全解析

大型机编程语言、技术与数据库系统全解析

1. REXX语言基础与数组特性

REXX语言在大型机编程中有着独特的应用。以下是一段简单的REXX代码示例：

First_name.1 = 'Joe'
First_name.2 = 'Alice'
do  Counter = 0  while first_name.Counter <> '' 
   say  'Name: 'First_name.counter
end

这段代码的作用是从0开始计数，直到 first_name.Counter 的值为空。不过，这种方法存在局限性，如果数据集中有空值，程序会终止。更好的做法是先统计数据集中的项目数量，再将其作为条件变量。

在数组方面，一般编程语言的数组下标从0开始，但REXX不同，它可以使用任意值作为下标，不过程序员通常还是习惯从0开始。

2. 面向对象的COBOL

传统的COBOL语言存在一些重大局限，比如只使用全局变量，通过段落将代码划分为模块，这使得大型程序的管理和维护变得极为复杂。

为了应对这些问题，20世纪90年代，COBOL引入了面向对象的特性，即OO COBOL。它具备面向对象语言的典型特征，如继承、接口、抽象和多态，这使得编程方式更加现代化，也便于与微软的.NET等系统协作。

然而，OO COBOL并未广泛流行，主要原因可能是程序员更倾向于使用C++或Java等其他语言。

3. 编程技术之复制成员

作为COBOL程