问进度4gl :计数记录？

EN

规则1 --进度是而不是 SQL。在4gl中尝试使用SQL的过程中，除了痛苦和痛苦之外，什么都没有。

4gl确实支持一些有限的SQL-89语法，例如：

select count(*) from customer.

但这是很久以前就放在产品中的，实际上只是为了满足90年代初面向清单的产品评估。有时，它对于临时查询中的快速攻击是有用的，但对于严肃的使用却不是很有用。“这是一个很好的演示”。通过SQL-92接口支持真正的SQL。它是一个独立于4gl的产品，通常用于支持报表工具，如水晶报告或其他什么。

如果每个订单有一个"so_mstr“，并且您需要知道每个客户的订单数量，那么计算这些记录的简单的4gl方法是：

define variable i as integer no-undo.

for each so_mstr no-lock where so_mstr.so_domain = "xxx" break by so_mstr.so_cust:
  i = i + 1.
  if last-of( so_mstr.so_cust ) then
    do:
      display so_mstr.so_cust i.
      i = 0.
    end.
end.

您的代码试图做一些“不同”的事情，所以我关于每个客户的销售订单号码的唯一性的假设可能是错误的(但对于某些人来说，这似乎是一个非常糟糕的设计)。

对于每一个涉及中断组和自动计数函数，您可以做更复杂的事情，但是这些选项并不是更快，而且IMHO，它们的可读性更低。特别是对于刚开始使用4gl的人。

(就性能而言，您也可以使用“字段列表”，但是只有当连接通过WAN而不是通过共享内存进行连接时才真正重要，这会使语法复杂化。我不想做一个简单的例子。)