zoukankan      html  css  js  c++  java
  • SAP选择屏幕开发(二)(转)

    原文链接:https://blog.csdn.net/wtxhai/article/details/90698683

    1.2、SAP屏幕框架的创建
            SAP页面设计中的框架不但可以保证SAP程序外观设计的美观大方,并可以提供诸如按钮,页签等功能组件。
    1.2.1、创建包含文本的基本框架
            基本框架的创建语法如下:
            SELECTION-SCREEN BEGIN OF BLOCK block [ WITH FRAME [ TITLE title ] ] [ NO INTERVALS ]. “限制所创建的框架只有一个输入项”
            SELEDTION-SCREEN END OF BLOCK block.

     

         1.2.2、实现屏幕元素质检的换行
        通过在框架结构中嵌入代码:SELECTION-SCREEN SKIP [ n ],能实现屏幕元素间的换行,n表示换行数目。

     

         1.2.3、在屏幕上输出直线
             通过语句SELECTION-SCREEN ULINE 1(79) [ / ][ pos ] ( len )可以实现在屏幕上画出一条直长度直线,其中[ / ]表示换行,[ pos ]表示直线起始的位置,( len )表示长度。

     

        1.2.4、在屏幕上输出自定义文本及图表
        SELECTION-SCREEN BEGION OF LINE.
        SELECTION-SCREEN COMMENT [ / ] [ pos ] ( len ) text. "len限制输入文本的长度
        SELECTION-SCREEN END OF LINE.

     

         1.2.5、在屏幕中实现按钮效果
         很多桌面程序的设计习惯通过按钮来实现与用户动作的交互。在SAP选择开发中也可以实现按钮功能。
         SELECTION-SCREEN PUSHBUTTON [ ] [ pos ] ( len ) button_text  "按钮的位置
                                                                                    USER-COMMAND fcode      "为按钮分配事件功能代码
                                                                                    [ VISIBLE LENGTH vlen ]      "输出长度
                                                                                    [ MODIFY ID modid ]               "编辑组ID号码
        1.2.9、在屏幕上创建页签
          SAP允许直接通过ABAP代码在屏幕上创建一个页签。
          语法:SELECTION-SCREEN BEGIN OF TABBED BLOCK <block> FOR n LINES
          每个页签都是由一个单独的子屏幕控制,n代表分页控件的高度,屏幕载入时必须先通过INITIALIZATION事件对其初始化。

    *&---------------------------------------------------------------------*
    *& Report ZTEST_SELECTION_SCREEN
    *&---------------------------------------------------------------------*
    *&
    *&---------------------------------------------------------------------*
    REPORT ztest_selection_screen.
     
    TABLES : mara.
     
    SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN.  "定义子屏幕100
    SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE TEXT-001.
    SELECT-OPTIONS : mat1 FOR mara-matnr NO INTERVALS.
    SELECTION-SCREEN SKIP 1.
    PARAMETERS chk1 AS CHECKBOX DEFAULT 'X'.
    SELECTION-SCREEN END OF BLOCK a1.
    SELECTION-SCREEN END OF SCREEN 100.
    *定义子屏幕200
    SELECTION-SCREEN BEGIN OF SCREEN 200 AS SUBSCREEN.
    PARAMETERS : mat2 LIKE mara-matnr.
    SELECTION-SCREEN END OF SCREEN 200.
    *定义一个TAB空间,取名为MYTAB,空间高度为5,共分为两个页签,BUTTON1,BUTTON2.
    *两个也签的功能代码分别为PUSH1,PUSH2
    SELECTION-SCREEN : BEGIN OF TABBED BLOCK mytab FOR 5 LINES,
        TAB (20) button1 USER-COMMAND push1,
        TAB (20) button2 USER-COMMAND push2,
                       END OF BLOCK mytab.
    *为TAB控件分配初始化值,引用TEXT element定义为本
    INITIALIZATION.
      button1 = TEXT-010.
      button2 = TEXT-020.
      mytab-prog = sy-repid.
      mytab-dynnr = 100.
    *为TAB控件页签单击事件,选择不同的页签显示不同的子屏幕
    AT SELECTION-SCREEN.
      CASE sy-ucomm.
        WHEN 'PUSH1'.
          mytab-dynnr = 100.
          mytab-activetab = 'BUTTON1'.
        WHEN 'PUSH2'.
          mytab-dynnr = 200.
          mytab-activetab = 'BUTTON2'.
      ENDCASE.

     

    版权声明:本文为CSDN博主「wtxhai」的原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接及本声明。
    原文链接:https://blog.csdn.net/wtxhai/article/details/90698683

    每天学习一个知识点,累积就是财富。
  • 相关阅读:
    三大主流负载均衡软件对比(LVS+Nginx+HAproxy)
    nginx 提示the "ssl" directive is deprecated, use the "listen ... ssl" directive instead
    centos安装nginx并配置SSL证书
    hadoop创建目录文件失败
    The server time zone value 'EDT' is unrecognized or represents more than one time zone.
    脚本启动SpringBoot(jar)
    centos做免密登录
    数据库远程连接配置
    Bash 快捷键
    TCP三次握手四次断开
  • 原文地址:https://www.cnblogs.com/buduzhiren/p/11608312.html
Copyright © 2011-2022 走看看