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引擎，那么就像：

从pub.customer中选择TOP 100;

应该可以正常工作。

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

Answer 3

请点击链接下载该文件。希望问题能够回答 OpenEdge Database

Answer 4

DEFINE VARIABLE我是INTEGER NO-UNDO。

对于每个客户NO-LOCK，宽度为320：

ASSIGN i = i + 1.

如果i <= 100则 DISP CustNum地址平衡城市联系国家CreditLimit折扣
姓名电话PostalCode SalesRep州条款。

END。

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

4 个答案: