注册 登录  
 加关注
查看详情
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

原来为了你

我的人生就是要一次次的超越

 
 
 

日志

 
 
 
 

创建可折叠屏幕  

2011-09-29 16:42:17|  分类: ABAP屏幕操作 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

创建屏幕100,作为主屏幕.100上创建子屏幕区域控件:sc_0100_01
逻辑流:
process before 
output.
  
call subscreensc_0100_01 including sy-repid sub_screen.
  
module status_0100.

process after 
input.
  
call subscreensc_0100_01.
  
module user_command_0100.


创建屏幕200(子屏幕),作为展开屏幕,在上面放一个子屏幕区域控件:sc_0200_01和一个按钮pb_0200_01(折叠按钮ICON_DATA_AREA_COLLAPSE)
逻辑流:
process before 
output.
  
call subscreensc_0200_01 including sy-repid '0400'."带数据的屏幕

process after 
input.
  
call subscreensc_0200_01.

创建屏幕300(子屏幕),作为收起屏幕,在上面放一个子屏幕区域控件:sc_0300_01(由于是在收起屏幕下,这个可以不要)和一个按钮pb_0300_01(展开按钮ICON_DATA_AREA_EXPAND).
逻辑流:
process before 
output.
process after 
input.

创建用于显示数据的屏幕400(子屏幕),上面随意放一些东西。

程序如下:

*screen 200."展开时的子屏幕,此逻辑流中调用了400
*screen 300."折叠时的子屏幕
*
*screen 400."带数据的子屏幕

datasub_screen like sy-dynnr.
dataok_code type sy-ucomm."仅在主屏幕100中有定义

sub_screen 
200."初始化为展开的子屏幕
call screen 100."主屏幕,逻辑流中调用了子屏幕

*----------------------------------------------------------------------*
*  MODULE user_command_0100 INPUT
*----------------------------------------------------------------------*
module user_command_0100 input.
  
case ok_code.
    
when 'PB_0200_01'.
      sub_screen 
300.
    
when 'PB_0300_01'.
      sub_screen 
200.
  
endcase.
endmodule.                    "user_command_0100 INPUT

效果如下图所示。

展开:

创建可折叠屏幕 - 2006057145 - 原来为了你
折叠:
创建可折叠屏幕 - 2006057145 - 原来为了你
 

 

  评论这张
 
阅读(237)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018