How to 'group by' using variables in 4gl

Is there a way to group records by a field within a table within a 4gl query?

My code.

define variable v-invoice as inte no-undo.
define variable v-sell-price as decimal no-undo.
define variable v-cost-price as decimal no-undo.
define variable iinv as integer no-undo.

For each Order no-lock :

v-invoice = Order.tblinvoice.
v-sell-price = Order.sell-price.
v-cost-price = Order.cost-price.
iinv = iinv + Order.sell-price.

display Order.invoice Order.sell-price.
end.




Thank you

Continue reading...