본문 바로가기

ABAP 물타기/Report

음수 부호 앞으로 이동(move minus mark)

음수 부호를 앞으로 이동 시켜 출력하는 방법,


1. 첫번째 방법
DATA: BEGIN OF WA_FLD,
SIGN(1) VALUE '-',
VALUE(18),
END OF WA_FLD.


IF ITAB-ZCRUPR < 0.
WRITE ITAB-ZCRUPR TO WA_FLD-VALUE NO-SIGN NO-ZERO.
CONDENSE WA_FLD NO-GAPS.
WRITE WA_FLD TO CW.
ELSE.
WRITE ITAB-ZCRUPR TO CW NO-ZERO.
ENDIF.

2. 두번째 방법
report ztest001.

data: a(10) type p value '-12345.67' decimals 2,
b(10).

start-of-selection.
*/-sam file을 만들때...
write a to b using edit mask 'V_,___.__'.
*/-화면으로 출력할 때...
write / b right-justified.
write / a using edit mask 'V_,___.__' right-justified