REPORT z12_23.
DATA : l_1 TYPE p DECIMALS 3 VALUE '0.000'.
DATA : l_2 TYPE p DECIMALS 3 VALUE '-1.234'.
DATA : l_3 TYPE d VALUE '20151231'.
DATA : l_4 TYPE p VALUE '1000'. "CURR 15, DECIMAL 3
DATA : l_5 TYPE p DECIMALS 3 VALUE '1.234'.
DATA : l_6 TYPE p DECIMALS 3 VALUE '1.678'.
DATA : l_7 TYPE p DECIMALS 3 VALUE '1000'.
DATA : l_8 TYPE f VALUE '123456789E2'.
DATA : l_9 TYPE d VALUE '20151231'.
DATA : l_10 TYPE d VALUE '20151231'.
DATA : l_11(8) TYPE c VALUE 'YYYYMMDD'.
DATA : l_12(10) TYPE c VALUE 'align'.
WRITE: 'L_1', l_1, l_1 NO-ZERO.
WRITE: / 'L_2', l_2, l_2 NO-SIGN.
WRITE: / 'L_3', l_3, l_3 DD/MM/YY, l_3 DDMMYY.
WRITE : / 'L_4', l_4 CURRENCY 'USA', l_4 CURRENCY 'KRW'.
WRITE : / 'L_5', l_5, l_5 DECIMALS 2.
WRITE : / 'L_6', l_6, l_6 ROUND 2, l_6 ROUND -2.
WRITE : / 'L_7', l_7 UNIT 'STD', l_7 UNIT 'KM'.
WRITE : / 'L_8', l_8, l_8 EXPONENT 2.
WRITE : / 'L_9', l_9 USING EDIT MASK '__:__:__', l_9 USING NO EDIT MASK.
WRITE : /10 'L_10', 20'L_9'.
WRITE : / l_10 UNDER 'L_10', l_9 UNDER 'L_9'.
WRITE : / l_10 NO-GAP, l_11.
WRITE : / l_12 LEFT-JUSTIFIED,
/ l_12 CENTERED,
/ l_12 RIGHT-JUSTIFIED.
DATA : l_1 TYPE p DECIMALS 3 VALUE '0.000'.
DATA : l_2 TYPE p DECIMALS 3 VALUE '-1.234'.
DATA : l_3 TYPE d VALUE '20151231'.
DATA : l_4 TYPE p VALUE '1000'. "CURR 15, DECIMAL 3
DATA : l_5 TYPE p DECIMALS 3 VALUE '1.234'.
DATA : l_6 TYPE p DECIMALS 3 VALUE '1.678'.
DATA : l_7 TYPE p DECIMALS 3 VALUE '1000'.
DATA : l_8 TYPE f VALUE '123456789E2'.
DATA : l_9 TYPE d VALUE '20151231'.
DATA : l_10 TYPE d VALUE '20151231'.
DATA : l_11(8) TYPE c VALUE 'YYYYMMDD'.
DATA : l_12(10) TYPE c VALUE 'align'.
WRITE: 'L_1', l_1, l_1 NO-ZERO.
WRITE: / 'L_2', l_2, l_2 NO-SIGN.
WRITE: / 'L_3', l_3, l_3 DD/MM/YY, l_3 DDMMYY.
WRITE : / 'L_4', l_4 CURRENCY 'USA', l_4 CURRENCY 'KRW'.
WRITE : / 'L_5', l_5, l_5 DECIMALS 2.
WRITE : / 'L_6', l_6, l_6 ROUND 2, l_6 ROUND -2.
WRITE : / 'L_7', l_7 UNIT 'STD', l_7 UNIT 'KM'.
WRITE : / 'L_8', l_8, l_8 EXPONENT 2.
WRITE : / 'L_9', l_9 USING EDIT MASK '__:__:__', l_9 USING NO EDIT MASK.
WRITE : /10 'L_10', 20'L_9'.
WRITE : / l_10 UNDER 'L_10', l_9 UNDER 'L_9'.
WRITE : / l_10 NO-GAP, l_11.
WRITE : / l_12 LEFT-JUSTIFIED,
/ l_12 CENTERED,
/ l_12 RIGHT-JUSTIFIED.
댓글 0
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
|---|---|---|---|---|
| 571 | PROGRAM z13_05. | sapjoy | 2012.08.02 | 1222 |
| 570 | PROGRAM z13_04. | sapjoy | 2012.08.02 | 1082 |
| 569 | PROGRAM z13_03. | sapjoy | 2012.08.02 | 1233 |
| 568 | PROGRAM z13_02. | sapjoy | 2012.08.02 | 1247 |
| 567 | PROGRAM z13_01. | sapjoy | 2012.08.02 | 1489 |
| 566 | report Z12_33 | sapjoy | 2012.07.31 | 1249 |
| 565 | REPORT z12_32. | sapjoy | 2012.07.31 | 1051 |
| 564 | REPORT z12_31. | sapjoy | 2012.07.31 | 1352 |
| 563 | REPORT z12_30. | sapjoy | 2012.07.31 | 1198 |
| 562 | REPORT z12_29. | sapjoy | 2012.07.31 | 947 |
| 561 | REPORT z12_28. | sapjoy | 2012.07.31 | 1075 |
| 560 | REPORT z12_27. | sapjoy | 2012.07.31 | 1256 |
| 559 | REPORT Z12_26. | sapjoy | 2012.07.31 | 914 |
| 558 | REPORT z12_25. | sapjoy | 2012.07.31 | 1042 |
| 557 | REPORT z12_24. | sapjoy | 2012.07.31 | 1219 |
| » | REPORT z12_23. | sapjoy | 2012.07.31 | 1110 |
| 555 | REPORT Z12_22 | sapjoy | 2012.07.31 | 1279 |
| 554 | REPORT z12_21. | sapjoy | 2012.07.31 | 962 |
| 553 | REPORT Z12_20. | sapjoy | 2012.07.31 | 977 |
| 552 | REPORT Z12_19 | sapjoy | 2012.07.31 | 981 |
