Abap/4操作屏幕（4）

*&---------------------------------------------------------------------**& Report  Z_CPT7_7                                                    **&                                                                     **&---------------------------------------------------------------------**&    下拉列表框                  **&                                                                     **&---------------------------------------------------------------------*REPORT  Z_CPT7_7                                                    .DATA:OK_CODE TYPE SY-UCOMM,     SAVE_OK TYPE SY-UCOMM.*VRM类型定义接口    这是什么东西啊TYPE-POOLS VRM.DATA: FLD1(20) TYPE C.DATA:FNAME TYPE VRM_ID,     VVA TYPE VRM_VALUES,     LVVA LIKE LINE OF VVA.CALL SCREEN 100.*&---------------------------------------------------------------------**&      Module  STATUS_0100  OUTPUT*&---------------------------------------------------------------------**       text*----------------------------------------------------------------------*MODULE STATUS_0100 OUTPUT.*  SET PF-STATUS 'xxxxxxxx'.*  SET TITLEBAR 'xxx'.*加测试记录FNAME = 'FLD1'.LVVA-KEY = '1'.LVVA-KEY = '广州'.APPEND LVVA TO VVA.CLEAR LVVA.FNAME = 'FLD1'.LVVA-KEY = '上海'.APPEND LVVA TO VVA.*这个函数是干啥的呢？CALL FUNCTION 'VRM_SET_VALUES'  EXPORTING    ID = FNAME    VALUES = VVA.ENDMODULE.                 " STATUS_0100  OUTPUT*&---------------------------------------------------------------------**&      Module  USER_COMMAND_0100  INPUT*&---------------------------------------------------------------------**       text*----------------------------------------------------------------------*MODULE USER_COMMAND_0100 INPUT.ENDMODULE.                 " USER_COMMAND_0100  INPUT*&---------------------------------------------------------------------**&      Module  CANCEL  INPUT*&---------------------------------------------------------------------**       text*----------------------------------------------------------------------*MODULE CANCEL INPUT.    LEAVE PROGRAM.ENDMODULE.                 " CANCEL  INPUT*子屏幕100的逻辑流代码PROCESS BEFORE OUTPUT. MODULE STATUS_0100.*PROCESS AFTER INPUT. MODULE USER_COMMAND_0100. MODULE CANCEL AT EXIT-COMMAND.