其他分享
首页 > 其他分享> > hello abap

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.

 

标签:WRITE,TY,TYPE,LV,BU,abap,DATA,hello
来源: https://www.cnblogs.com/hua900822/p/16376212.html