弹窗提示

DATA: BEGIN OF et_dynpro OCCURS 10 ,  "每个字段必须为字符型
        zsjdh     LIKE ztsjdi-zsjdh ,
        ebeln     LIKE ztsjdi-ebeln,
        ebelp     LIKE ztsjdi-ebelp,
        matnr(5),
        sjmng(15) ,
        senge(15) ,
        message   TYPE bapi_msg,
END OF et_dynpro .

l_msg = '过账失败日志'.
et_dynpro-zsjdh = '送检单号' .
et_dynpro-ebeln = '采购订单号'.
et_dynpro-ebelp = '采购订单项目'.
et_dynpro-matnr = '物料编码'.
et_dynpro-sjmng = '送检数量'.
et_dynpro-senge = '收货数量'.
et_dynpro-message = '消息'.
COLLECT et_dynpro .      

CALL FUNCTION 'G_DISPLAY_SELECTION_DYNPRO'
      EXPORTING
        dynp_title     = l_msg
        show_also_1    = 'X'
        sel_title1     = et_dynpro
        start_column   = 25
        start_row      = 5
        number_of_rows = 15
      TABLES
        sel_table      = lt_error  "要展示的内表
      EXCEPTIONS
        no_lines       = 1
        no_line_picked = 2
        OTHERS         = 3.

你可能感兴趣的:(弹窗提示)