源代码:
*&---------------------------------------------------------------------*
*& Report ZYTEST
*&
*&---------------------------------------------------------------------*
*& ABAP九宫图
*&
*&---------------------------------------------------------------------*
REPORTZYTEST.
DATA(V_STR) ='九宫图'.
TYPES:
BEGIN OFTS_N,
L1TYPE I,
L2TYPE I,
L3TYPE I,
END OFTS_N.
TYPES:
TT_NTYPE STANDARD TABLE OFTS_NWITHEMPTYKEY.
DATA(T_TT_N)
=VALUETT_N( (L1=4L2=9L3=2)
(L1=3L2=5L3=7)
(L1=8L2=1L3=6)
).
* ALV Object Model
DATA:GR_TABLETYPE REF TOCL_SALV_TABLE.
CL_SALV_TABLE=>FACTORY(IMPORTINGR_SALV_TABLE=GR_TABLECHANGINGT_TABLE=T_TT_N).
SY-TITLE=V_STR.
GR_TABLE->DISPLAY( ).
执行结果:
领取专属 10元无门槛券
私享最新 技术干货