如何计算一个正在进行的领域4GL的总和？

Question

我已经写了一个查询来计算一个字段中的总和，但我可以获得总记录。让我分享一下我所写的内容。

DEFINE VARIABLE I AS INTEGER NO-UNDO.
FIND FIRST shth_pus_head WHERE shth_pus_head.push_id = "P0000078" NO-LOCK 
NO-ERROR.
FOR EACH shtd_pus_det OF shth_pus_head NO-LOCK:
i = i + 1.
END.
DISPLAY i.

我需要的是当我计算qty列中的总和时我想要sum = 1560。

（注意 - 数量列表字段是shtd_pus_det.qty）

Check the attached image

Answer 1

您的代码不计算总金额。它计算记录的数量。要总结这些记录中的shtd_pus_det.qty字段，您可以编写如下代码：

define variable tot_qty as integer no-undo.

for each shtd_pus_det no-lock where shtd_pus_det.push_id = "P0000078":
  tot_qty = tot_qty + shtd_pus_det.qty.
end.
display shtd_pus_det.qty.