REPORT Z03_002 .
DATA: COUNTER TYPE I.
COMPUTE COUNTER = COUNTER + 1.
COUNTER = COUNTER + 1.
ADD 1 TO COUNTER.
write counter.
DATA: PACK TYPE P DECIMALS 4,
N TYPE F VALUE '+5.2',
M TYPE F VALUE '+1.1'.
PACK = N / M.
WRITE / PACK.
PACK = N DIV M.
WRITE / PACK.
PACK = N MOD M.
WRITE / PACK.
DATA: BEGIN OF RATE,
USA TYPE F VALUE '0.6667',
FRG TYPE F VALUE '1.0',
AUT TYPE F VALUE '7.0',
END OF RATE.
DATA: BEGIN OF MONEY,
USA TYPE I VALUE 100,
FRG TYPE I VALUE 200,
AUT TYPE I VALUE 300,
END OF MONEY.
MULTIPLY-CORRESPONDING MONEY BY RATE.
WRITE / MONEY-USA.
WRITE / MONEY-FRG.
WRITE / MONEY-AUT.
DATA: BEGIN OF SERIES,
N1 TYPE I VALUE 10,
N2 TYPE I VALUE 20,
N3 TYPE I VALUE 30,
N4 TYPE I VALUE 40,
N5 TYPE I VALUE 50,
N6 TYPE I VALUE 60,
END OF SERIES.
DATA SUM TYPE I.
ADD SERIES-N1 THEN SERIES-N2 UNTIL SERIES-N5 GIVING SUM.
WRITE SUM.
ADD SERIES-N2 THEN SERIES-N3 UNTIL SERIES-N6 TO SUM.
댓글 4
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
150 | REPORT Z07_013 | sapjoy | 2006.12.08 | 2544 |
149 | REPORT zbadi_002. | sapjoy | 2009.01.09 | 2545 |
148 | Z16_005TOP | sapjoy | 2009.09.21 | 2549 |
147 | REPORT z19_001 | sapjoy | 2007.03.22 | 2551 |
146 | REPORT z16_003 [1] | sapjoy | 2008.08.07 | 2551 |
145 | REPORT Z04_003 [9] | sapjoy | 2007.05.16 | 2561 |
144 | report zunicode_002 | sapjoy | 2008.11.21 | 2562 |
143 | REPORT Z05_025 | sapjoy | 2007.05.28 | 2564 |
142 | report zsapdoi_003. | sapjoy | 2008.12.26 | 2570 |
141 | Z16_005 | sapjoy | 2009.09.21 | 2577 |
140 | REPORT z15_032 | sapjoy | 2007.02.05 | 2578 |
139 | REPORT Z14_011 | sapjoy | 2007.01.22 | 2580 |
» | REPORT Z03_002 [4] | sapjoy | 2007.05.11 | 2581 |
137 | REPORT Z_15_012 | sapjoy | 2008.04.15 | 2581 |
136 | REPORT ZSMARTFORMS_01. | sapjoy | 2008.11.26 | 2582 |
135 | REPORT ZDYNAMIC_ITAB_07. | sapjoy | 2009.02.16 | 2582 |
134 | REPORT zmacro_01. | sapjoy | 2010.10.09 | 2582 |
133 | Z18_001_PBO | sapjoy | 2007.03.02 | 2585 |
132 | REPORT z18_013 [1] | sapjoy | 2007.03.09 | 2585 |
131 | REPORT ZRTTS_02 | sapjoy | 2009.12.24 | 2586 |