Consultor Eletrônico



Kbase P27209: How to suppress the default TOTAL label when DISPLAYing fiel
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   19/06/2003
Status: Unverified

GOAL:

How to suppress the default TOTAL label when DISPLAYing field totals?

FACT(s) (Environment):

HP-UX

FACT(s) (Environment):

Progress 9.1C

SYMPTOM(s):


Running code similar to the following outputs the word 'TOTAL' at the far left of
the last displayed line.

for each OrderLine:
display
Itemnum
Price (total)
Qty
Discount
ExtendedPrice (total)
with frame lines no-labels no-box down.
end.


CAUSE:

The default displayed "TOTAL" label can not be suppressed when used as above.

FIX:


Restructuring the code as follows gets the desired result of suppressing the
TOTAL label of the price and ExtendedPrice columns:

DO WITH DOWN FRAME lines:
for each OrderLine WHERE ordernum <5 WITH FRAME lines:
ACCUMULATE Price (TOTAL).
ACCUMULATE ExtendedPrice (TOTAL).
DISPLAY
ItemNum
Price
Qty
Discount
ExtendedPrice.
DOWN with frame lines no-labels no-box DOWN WIDTH 80.
end.
DISPLAY
ACCUM TOTAL OrderLine.Price @ OrderLine.Price
ACCUM TOTAL OrderLine.ExtendedPrice @ OrderLine.ExtendedPrice.
END.