Code: Alles auswählen.
* Deklaration nur Auszugweise!
...itab_oevsfcst TYPE P DECIMALS 2.
if itab_oevsfcst-fcstp1 = 5.
itab_oevsfcst-%p1 = '-'.
else.
itab_oevsfcst-%p1 = ( itab_oevsfcst-oe /
itab_oevsfcst-fcstp1 ) * 100.
endif.
write:/ itab_oevsfcst-%p1.
Code: Alles auswählen.
* Deklaration nur Auszugweise!
...itab_oevsfcst TYPE P DECIMALS 2.
if itab_oevsfcst-fcstp1 = 5.
itab_oevsfcst-%p1 = 0.
else.
itab_oevsfcst-%p1 = ( itab_oevsfcst-oe /
itab_oevsfcst-fcstp1 ) * 100.
endif.
if itab_oevsfcst-%p1 = '0'.
write: / '-'.
else.
write:/ itab_oevsfcst-%p1.
endif.