*&---------------------------------------------------------------------*
*& Report Z01_018 *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*
REPORT z01_018 .
*TYPES: BEGIN OF struct,
* n1 TYPE i,
* n2 TYPE p DECIMALS 2,
* END OF struct.
*
*DATA: wa_struct TYPE struct,
* obj_struct LIKE wa_struct.
*
*wa_struct-n1 = 1.
*wa_struct-n2 = '0.1'.
*
*WRITE : wa_struct-n1, wa_struct-n2.
*
*obj_struct-n1 = 2.
*obj_struct-n2 = '0.2'.
*WRITE : / obj_struct-n1, obj_struct-n2.
TYPES char50(50) type c.
TYPES VAL1 TYPE char50.
DATA VAL2 TYPE VAL1.
DATA VAL3 LIKE VAL2.
DATA VAL4 LIKE VAL3.
DATA VAL5 TYPE REF TO DATA.
*DATA VAL6 TYPE VAL1.
CREATE DATA VAL5 TYPE VAL1.
ASSIG.
WRITE VAL5.
*& Report Z01_018 *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*
REPORT z01_018 .
*TYPES: BEGIN OF struct,
* n1 TYPE i,
* n2 TYPE p DECIMALS 2,
* END OF struct.
*
*DATA: wa_struct TYPE struct,
* obj_struct LIKE wa_struct.
*
*wa_struct-n1 = 1.
*wa_struct-n2 = '0.1'.
*
*WRITE : wa_struct-n1, wa_struct-n2.
*
*obj_struct-n1 = 2.
*obj_struct-n2 = '0.2'.
*WRITE : / obj_struct-n1, obj_struct-n2.
TYPES char50(50) type c.
TYPES VAL1 TYPE char50.
DATA VAL2 TYPE VAL1.
DATA VAL3 LIKE VAL2.
DATA VAL4 LIKE VAL3.
DATA VAL5 TYPE REF TO DATA.
*DATA VAL6 TYPE VAL1.
CREATE DATA VAL5 TYPE VAL1.
ASSIG.
WRITE VAL5.
댓글 2
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
10 | REPORT zsmw0010 | sapjoy | 2010.10.11 | 4313 |
9 | report zsapdoi_002. | sapjoy | 2008.12.26 | 4405 |
8 | Z_EXPORT_GRAPHIC_FROM_SE78 [1] | sapjoy | 2011.03.28 | 4443 |
7 | Z01_012 [9] | sapjoy | 2006.12.02 | 4546 |
6 | REPORT z18_03. | sapjoy | 2012.08.01 | 4557 |
5 | REPORT Z20_01. | sapjoy | 2012.08.01 | 5062 |
4 | report zunicode_027. [4] | sapjoy | 2008.11.21 | 6262 |
3 | REPORT Z15_003 [49] | sapjoy | 2008.04.15 | 7498 |
2 | REPORT z18_033 [47] | sapjoy | 2008.10.13 | 9031 |
1 | <b>easy abap 소스 전체 파일 입니다. [188] | sapjoy | 2008.05.01 | 10124 |