*&---------------------------------------------------------------------*
*& 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
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
669 | Z01_012 [9] | sapjoy | 2006.12.02 | 4543 |
668 | REPORT Z03_005 [1] | sapjoy | 2006.12.02 | 2735 |
667 | REPORT Z03_006 [5] | sapjoy | 2006.12.02 | 2812 |
» | Z01_018 [2] | sapjoy | 2006.12.02 | 3042 |
665 | Z01_019 [2] | sapjoy | 2006.12.02 | 2688 |
664 | Z01_020 [2] | sapjoy | 2006.12.02 | 3008 |
663 | Z01_021 [1] | sapjoy | 2006.12.02 | 2771 |
662 | REPORT Z03_018 [3] | sapjoy | 2006.12.02 | 2605 |
661 | Z02_003 [2] | sapjoy | 2006.12.02 | 3042 |
660 | REPORT Z02_005 . | sapjoy | 2006.12.02 | 2375 |
659 | REPORT Z04_005 . | sapjoy | 2006.12.02 | 2595 |
658 | <b>ABAP SOURCE는 교재에 사용된 소스들입니다.</b> [1] | sapjoy | 2006.12.02 | 3618 |
657 | Dynamic Table Maintenance [1] | sapjoy | 2006.12.04 | 4093 |
656 | REPORT Z06_001 MESSAGE-ID ZTEST . [1] | sapjoy | 2006.12.05 | 3205 |
655 | REPORT Z07_002 . | sapjoy | 2006.12.06 | 2755 |
654 | Z07_001 | sapjoy | 2006.12.06 | 2395 |
653 | Z07_005 | sapjoy | 2006.12.06 | 2353 |
652 | REPORT Z07_007 | sapjoy | 2006.12.07 | 2698 |
651 | REPORT Z07_008 | sapjoy | 2006.12.07 | 2462 |
650 | REPORT Z07_009 | sapjoy | 2006.12.07 | 2258 |