是否可以在 Progress-4GL 中创建常量?

问题描述

下午好, 是否可以在 Progress-4GL 中创建常量?

有人问了同样的问题 here,但问题是基于面向对象的编程(我没有这样做)。

提前致谢

解决方法

ABL 中没有 constant 关键字。

创建常量值的最简单方法是使用静态属性。这些可以在任何代码中使用,甚至是程序代码。

class ConstantValues:
  define static public PI as decimal initial 3.14159 get.
end class.

您可以添加一个私有 setter 并在静态构造函数中进行赋值,而不是 initial 值。

如果你不能或不想使用这种方法,你可以使用预处理器。如果您需要共享这些值,请在包含中定义预处理器并在您的程序(甚至是类)中使用它们。

但这 - 对我来说 - 如果您要创建新的常量值,则需要做更多的工作。

,

即使不是常量并且可能很老派,您也可以定义可以作为常量工作的预编译器语句。

有可能是全局 (&GLOBAL-DEFINE) 而不是全局 (&SCOPED-DEFINE)

也可以取消定义,检查定义和其他基本的东西。

这些是在编译时定义的,因此它们不能在程序运行时动态更改。

&SCOPED-DEFINE const1 1
&GLOBAL-DEFINE const2 hello

DISPLAY {&const1} "{&const2}".