學習筆記(十五)

TYPES: BEGIN OF struct,
  column1 TYPE i,
  column2 TYPE i,
END OF struct.

DATA: ref1 TYPE REF TO data,
      ref2 TYPE REF TO data.

FIELD-SYMBOLS: <fs1> TYPE struct,
               <fs2> TYPE i.

CREATE DATA ref1 TYPE struct.
ASSIGN ref1->* TO <fs1>.

<fs1>-column1 = 1.
<fs1>-column2 = 2.
ref2 = ref1.
ASSIGN ref2->* TO <fs2> CASTING.
WRITE / <fs2>.

GET REFERENCE OF <fs1>-column2 INTO ref2.
ASSIGN ref2->* TO <fs2>.
WRITE / <fs2>.
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章