zoukankan      html  css  js  c++  java
  • ABAP分享一 弹出框函数的简单示例

    在开发中经常会使用到弹出框这个功能,在SAP中有很多函数可以实现类似的功能,这里介绍一个比较简单常用的函数  POPUP_TO_CONFIRM  

    下面是一个实现的简单示例:

    TABLES sscrfields.

    DATA: qus TYPE string,    
          ans TYPE c.    " 根据用户的操作会有三个值   1   是   ,  2   否  ,  A   取消 

    SELECTION-SCREEN:BEGIN OF BLOCK abs WITH FRAME TITLE TEXT-001,   

        PUSHBUTTON 2(20)  but1 USER-COMMAND cli1,   "定义一个按钮当点击按钮时会弹出弹出框

    END OF BLOCK abs.

    INITIALIZATION.

      but1 '点击后会有弹出框'.

    AT SELECTION-SCREEN.

      CASE sscrfields-ucomm.   "当用户点击按钮后会触发AT SELECTION-SCREEN事件,并且function code fcode会存储到sscrfields-ucomm字段中。
        WHEN 'CLI1'.
          qus '确定吗'.
          CALL FUNCTION 'POPUP_TO_CONFIRM'   "弹出框函数  POPUP_TO_CONFIRM 
            EXPORTING
              text_question = qus
            IMPORTING
              answer        = ans.
          IF sy-subrc <> 0.
            MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                    WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
          ENDIF.
          CASE ans.
            WHEN '1'.
              MESSAGE '您点击的是确定按钮' TYPE 'S'.
            WHEN '2'.
               MESSAGE '您点击的是否按钮' TYPE 'S'.
            WHEN OTHERS.
              MESSAGE '您点击的是取消按钮' TYPE 'S'.
          ENDCASE.
      ENDCASE.

  • 相关阅读:
    eclipse常用的快捷键
    如何保留小数点后N位?
    EditText设置/隐藏光标位置、选中文本和获取/清除焦点(转)
    java.lang.RuntimeException: Unable to instantiate activity ComponentInfo异常(转)
    STL优先队列 hdu1896
    工作排序问题 poj2376
    STL存储邻接表
    二叉树的遍历
    快速排序
    并查集 并查集来判断是否存在环路
  • 原文地址:https://www.cnblogs.com/abapweb/p/11599509.html
Copyright © 2011-2022 走看看