progress-4gl - 动态数组或调整大小扩展？

Question

这是一个多余的问题。 Progress 10.2B中有动态数组或列表吗？

示例:

我创建了一个名为“InventoryTransaction”的基类。我从 Progress 中读取了一个 MSSQL 表，我想为找到的每条记录创建一个 InventoryTransaction 类的实例，然后将其添加到“列表/数组”中，以便稍后处理它们。

是否有像 MyArray:Add(MyItem) 这样的东西会自动将数组大小增加 +1，然后将 MyItem 的实例添加到数组中？

我发现函数 EXTENT 可以动态设置数组的大小，但在读取 MSSQL 表中的所有事务之前我不知道计数。或者，我可以在读取所有事务之前执行“select count(*) from MyTable”以检索计数，然后扩展数组。

谢谢!星期五快乐!塞巴斯蒂安

Answer 1

您可以创建“不确定”数组。即

define variable x as decimal extent no-undo.

不确定数组变量可以处于两种状态之一:固定或不固定，这意味着它要么具有固定维度，要么没有。不确定数组变量在首次定义时具有不固定的维度。您可以通过以下方式修复不确定数组变量的维度:

• 定义变量时初始化数组值，

• 使用 INITIAL 选项

• 设置数组变量中的元素数量

• 使用 EXTENT 语句

• 将确定数组赋给不确定数组，将其固定为确定数组的维度

• 将数组参数传递给过程、用户定义函数或基于类的方法，使不确定数组变量成为传递确定数组的目标，将不确定数组固定为数组的维度确定数组

一旦固定，ABL 会将固定的不确定数组视为确定数组。