hello abap

*&---------------------------------------------------------------------*
*& Report  ZHELLO
*&
*&---------------------------------------------------------------------*
*&
*&我的第一个 Abap程序
*&---------------------------------------------------------------------*

REPORT ZHELLO.


DATA  LV_C(10) TYPE C VALUE '123456789123456' .
DATA  LV_D TYPE D.
DATA  LV_F TYPE F VALUE '3.14' .
DATA  LV_I TYPE I VALUE 1100000.
DATA  LV_N(9) TYPE N VALUE 771541213.
DATA  LV_P TYPE P VALUE '12.8456789123' DECIMALS 2.
DATA  LV_T TYPE T.


LV_D = SY-DATUM + 1.


LV_T =  SY-UZEIT.


WRITE:/ , 'LV_C：',  LV_C.
WRITE:/ , 'LV_D：',  LV_D.
WRITE:/ , 'LV_F：',  LV_F.
WRITE:/ , 'LV_I：',  LV_I.
WRITE:/ , 'LV_N：',  LV_N.
WRITE:/ , 'LV_P：',  LV_P.
WRITE:/ , 'LV_T：',  LV_T.


WRITE: /,'=============================================='.


TYPES:TY_BU_PARENT(100) TYPE C,
      TY_BU_PARENT1 TYPE BU_PARTNER,
      TY_BU_PARENT2 TYPE TY_BU_PARENT.

TYPES:BEGIN OF TY_PARTNERIF,

      NAME(10) TYPE C,
      AGE(2) TYPE I,
      TEL(11) TYPE N,

      END OF TY_PARTNERIF.


DATA A TYPE TY_BU_PARENT.
DATA B TYPE TY_BU_PARENT1.
DATA C TYPE TY_BU_PARENT2.
DATA D TYPE TY_PARTNERIF.

A = 'SELECT * FROM NEWS'.
B = 'SELECT * FROM USER'.
C = A.



WRITE / A.
WRITE / B.
WRITE / C.