从浏览中获取所选行

Question

我正在尝试使用browse in Progress-4gl，它将运行控制键来显示浏览中选定的行数，以及来自临时表的所有选定行的总数量。我已经能够很容易地获得总行数，但是当尝试从我创建的临时表中获得总数量时，它只有最后选择的行值。如何从所选行中为每个行运行？下面是我为浏览准备的一些代码：

on CTRL-L of browse-1 in frame a do:
   assign buf-cnt = 0.
   /***  FOR EACH BROWSE RECORD SELECTED **/
       assign jqty = jqty + int(tt.tt-qty).
   assign jlines = browse-1:num-selected-rows.
  display
       jlineslabel "Selected Number Of Lines"
       jqtylabel "Quantity Of All Lines"
       with frame fselect down row 5 centered overlay.
  pause.
end. /* on CTRL-L */

Answer 1

如果我正确地理解了这个问题，您可能需要与浏览关联的查询句柄的num-result属性--应该是browse-1:query。所以：

jqty = browse-1:query:num-results.

Answer 2

对于任何想知道的人来说。

on CTRL-L of browse-1 in frame a do:
 assign buf-cnt = 0
        jqty = 0.
 do x = 1 to browse-1:num-selected-rows:
   stat = browse-1:fetch-selected-row(x).
   for each usrw_wkfl no-lock where
            usrw_wkfl.usrw_key1 = "862" and
            entry(1,usrw_wkfl.usrw_key2) = tt.tt-part and
            usrw_wkfl.usrw_key4 = tt.tt-dest and
            usrw_wkfl.usrw_key3 = tt.tt-duedate and
            usrw_wkfl.usrw_charfld[3] = tt.tt-qty:
      assign jqty = jqty + int(tt.tt-qty).
   end. /* for each usrw_wkfl */
 end. /* do x = 1 to browse-1 */
 assign jlines = browse-1:num-selected-rows
        jtotal = browse-1:query:num-results.
 display
      jlines         column-label "Selected Number!Of Lines"
      jtotal         column-label "Total Number!Of Lines"
      jqty           column-label "Quantity Of!All Lines"
      with frame fselect down row 5 centered overlay.
 pause.

结束。CTRL-L上的/* */