从Progress OpenEdge数据库中的表中获取前100条记录(例如SELECT TOP 100 ..)

Question

如何从Progress OpenEdge数据库中的表中获取有限数量的记录？

像SQL中的东西:

SELECT TOP 100 * FROM MyTable

我能找到的唯一丑陋的解决方案是循环显示所有记录并在显示100个记录时中断.但感觉应该有一些更好的方法.

Answer 1

如果您使用的是4GL,您可能还希望使用OPEN QUERY和MAX-ROWS来实现您正在寻找的结果.下面显示了一个带有计数器的传统FOR EACH循环,然后是一个带有MAX-ROWS的QUERY:

define variable i as integer no-undo.
define frame a with 10 down.

for each customer no-lock break by name:
  i = i + 1.
  display i custNum name discount.
  if i >= 5 then leave.
end.

define query q for customer scrolling.

open query q for each customer no-lock break by name max-rows 5.

do i = 1 to 5 with frame a:
  get next q.
  display i custNum name discount.
end.

Answer 2

如果您使用的是SQL-92引擎,那么类似于:

SELECT TOP 100 FROM pub.customer;

应该工作得很好.

如果您使用的是4GL引擎,那么您不应该尝试将SQL与4GL混合.它只会导致痛苦,痛苦和痛苦.4GL不是SQL.由于市场营销的原因,很长一段时间以前有很多SQL-89语句被放入4GL中.试图使用它们会导致严重的情绪创伤.你被警告了.