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

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

1. 编程基础与语言特性

1.1 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 开始。

1.2 面向对象的 COBOL

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

为了应对这些问题，20 世纪 90 年代，COBOL 语言引入了面向对象的特性，即 OO COBOL。这使得编程可以采用更现代的方法，并且更容易与微软的 .NET 等系统协同工作。OO COBOL 具备面向对象语言的典型特征，如继承、接口、抽象和多态。