源代码:
*&---------------------------------------------------------------------*
*& Report YMYYT9012
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ymyyt9012.
TABLES:ymyyt9012.
DATA:gt_ymyyt9012 TYPE TABLE OF ymyyt9012,
gt_fieldcat TYPE slis_t_fieldcat_alv,
gs_layout TYPE slis_layout_alv,
g_title TYPE lvc_title,
l_num TYPE i.
FIELD-SYMBOLS:<fs_fieldcat> TYPE slis_fieldcat_alv.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 1(18) text-c01 FOR FIELD s_kstar .
SELECT-OPTIONS: s_kstar FOR ymyyt9012-kstar.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 1(18) text-c02 FOR FIELD s_bkbs .
SELECT-OPTIONS: s_bkbs FOR ymyyt9012-bkbs.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
S