TYPE-POOLS:VRM.
DATA: NAME TYPE VRM_ID.
DATA:NUM TYPE I. "根据PRODH字段长度判断 某行属于哪一级
DATA:LOADED TYPE C LENGTH 1."控制不重复查询数据库和不反复append数据 to WA1[]TYPES: BEGIN OF WA,KEY(40),TEXT(80) TYPE C,END OF WA.
DATA:GT LIKE T179T OCCURS 0 WITH HEADER LINE.
DATA:WA1 TYPE TABLE OF WA WITH HEADER LINE."111
DATA:WA2 TYPE TABLE OF WA WITH HEADER LINE.                 "111222
DATA:WA3 TYPE TABLE OF WA WITH HEADER LINE.                 "111222333DATA:ITAB LIKE T179T OCCURS 0 WITH HEADER LINE.
DATA: PS_T(15) TYPE C.
SELECTION-SCREEN BEGIN OF BLOCK T1 WITH FRAME TITLE TEXT-001.SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(31) TEXT-003.
PARAMETERS: PL1 LIKE PS_T AS LISTBOX VISIBLE LENGTH 15 USER-COMMAND P1.
"一级类
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 1.SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(31) TEXT-004.
PARAMETERS: PL2 LIKE PS_T AS LISTBOX VISIBLE LENGTH 15 USER-COMMAND P2.
"二级类
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 1.SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(31) TEXT-005.
PARAMETERS: PL3 LIKE PS_T AS LISTBOX VISIBLE LENGTH 15.
"三级类
SELECTION-SCREEN END OF LINE.SELECTION-SCREEN END OF BLOCK T1.INITIALIZATION.AT SELECTION-SCREEN OUTPUT.NAME = 'PL1'.IF LOADED  IS INITIAL.SELECT *  FROM T179T INTO TABLE GT  WHERE SPRAS = 1.LOADED = 'X'.LOOP AT GT.NUM = STRLEN( GT-PRODH ).IF NUM = 5.WA1-TEXT  = GT-VTEXT."DescriptionWA1-KEY   = GT-PRODH."Product hierarchy   key fieldAPPEND: WA1.ENDIF.CLEAR: GT,NUM,WA1."CLEAR 清空WA1工作区,不清空WA1[]内表ENDLOOP.ENDIF.CALL FUNCTION 'VRM_SET_VALUES'EXPORTINGID     = NAMEVALUES = WA1[].AT SELECTION-SCREEN.CASE SY-UCOMM.WHEN 'P1'.CLEAR: PL2,PL3."清空2、3级下拉空默认值,当用户在选择屏幕上重新选择时需要清除CLEAR:WA2,WA2[]."清空2级下拉内表对应的值,当用户在选择屏幕上重新选择时需要清除CLEAR NUM.LOOP AT GT .NUM = STRLEN( GT-PRODH ).IF NUM = 10 AND GT-PRODH+0(5) = PL1.WA2-TEXT  = GT-VTEXT.WA2-KEY   = GT-PRODH.APPEND: WA2.ENDIF.CLEAR:GT,NUM,WA2.ENDLOOP.CALL FUNCTION 'VRM_SET_VALUES'EXPORTINGID     = 'PL2'VALUES = WA2[].CLEAR PL2.WHEN 'P2'.CLEAR PL3."清空3级下拉空默认值,当用户在选择屏幕上重新选择时需要清除CLEAR:WA3,WA3[]."清空3级下拉内表对应的值,当用户在选择屏幕上重新选择时需要清除CLEAR NUM.LOOP AT GT .NUM = STRLEN( GT-PRODH ).IF NUM = 18 AND GT-PRODH+0(10) = PL2.WA3-TEXT  = GT-VTEXT.WA3-KEY   = GT-PRODH.APPEND: WA3.ENDIF.CLEAR:GT,NUM,WA3.ENDLOOP.CALL FUNCTION 'VRM_SET_VALUES'EXPORTINGID     = 'PL3'VALUES = WA3[].CLEAR PL3.ENDCASE.

SAP选择屏幕中实现三级联动下拉框效果相关推荐

  1. java省市县联动 下拉框选择_原生JavaScript实现动态省市县三级联动下拉框菜单实例代码...

    像平时购物选择地址时一样,通过选择的省动态加载城市列表,通过选择的城市动态加载县区列表,从而可以实现省市县的三级联动,下面使用原生的JavaScript来实现这个功能: 先给大家展示下测试结果: 未做 ...

  2. 2018最新版省市区三级联动下拉框+所有源代码以及数据库

    2018年国家统计局最新数据,JSP+Servlet+Dao实现省市区三级联动下拉框的效果 DropdownDAO.java -–Dao层 package com;import java.sql.Co ...

  3. EasyUI三级联动下拉框

    HTML部分: <span>一级标签:</span> <input class="easyui-combobox" style="width ...

  4. SharePoint:扩展DVWP - 第21部分:实现可维护的三级联动下拉框

    上一次,我们通过几个简单的步骤实现了级联下拉框--一个下拉框可以过滤另一个的可选项. 但是,如果我们有三个下拉框需要做级联该怎么做呢?比如,国家-省-市.或者工作地点-组-职位. 接下来的步骤相对于前 ...

  5. extjs 点击下拉框三角形触发事件_省市县三级联动下拉框的具体实现

    功能需求: ①页面中有三个下拉框选项,分别为省下拉框,市下拉框,区/县下拉框 ②选择省,则市下拉框中出现对应的该省下的市信息,选择市则区/县下拉框中出 现对应的该市下面的区/县信息. 需求分析(思路) ...

  6. android 下拉菜单触发_Android实现三级联动下拉框 城市选择器(简单)

    主要实现办法:动态加载各级下拉值的适配器 在监听本级下拉框,当本级下拉框的选中值改变时,随之修改下级的适配器的绑定值 先贴出效果图: 主布局代码: xmlns:tools="http://s ...

  7. 微信小程序下拉框插件_微信小程序三级联动下拉框插件

    //点击事件,点击弹出选择页 areaTap: function () { this.setData({ addressMenuIsShow:true }) }, cityCancel: functi ...

  8. dropdownlist三级联动怎么实现_Excel下拉菜单不会做?15秒教会你制作一二三级联动下拉菜单,从此做表不求人!...

    Hi,各位叨友们好呀!我是叨叨君~ 我们都知道,在使用Excel表格统计数据的时候,为了方便录入,通常会在Excel中设置下拉菜单,以便我们输入相同的内容. 那么,Excel中一级.二级.三级联动下拉 ...

  9. layui多级联动下拉框的实现_简单三级联动的实现

    当我们做一些例如注册页面的时候,可能会遇到要选择地址的操作,这时会出现三个选择框,当你选择省级单位的时候会自动在选择筐中,弹出她所属的市级单位的列表,当选择市级单位时又会弹出县级单位,我们要实现的就是 ...

最新文章

  1. Strutsw2与Spring整合流程-简述
  2. 结构体struct 联合体 union
  3. (转)C#操作XML的完整例子——XmlDocument篇
  4. MATLAB 牛顿迭代算法
  5. CodeForces730E Award Ceremony(拓扑排序+结论)
  6. arm linux 开机电路_【技术角度看问题之一】ARM到底是个啥?
  7. Java-Exception异常
  8. MPEG-7实例入门
  9. [论文笔记]Poly-encoders: architectures and pre-training strategies for fast and accurate multi-sentence
  10. SAS安装后处理错误的解决方法
  11. m1 mac屏幕保护程序取消不了怎么办
  12. 简洁404页面源码 | 自适应404页面HTML源代码下载
  13. 【gp数据库】你可能不知道却超级实用的函数
  14. 使用Coverity进行代码检测,构建C#报错,The Web-app security checkers are fully suppored only on Windwds.
  15. 学会了C语言/C++能做什么?我们一起来看看吧!
  16. 干货 实例 | 数字化时代的传统行业转型升级
  17. Java 切换win10壁纸
  18. [198].打家劫舍
  19. sql 语句in 使用占位符
  20. error LNK1123: 转换到 COFF 期间失败: 文件无效或损坏

热门文章

  1. Repeater利用PagedDataSource进行分页
  2. React Native StyleSheet 样式属性
  3. 开源社区ITGeek介绍
  4. Hyper-V Server虚拟机快照(检查点)
  5. Js中的数据属性和访问器属性
  6. 治标更治本,如何从根源防护DDoS***
  7. linux命令在线查
  8. 去中心化交易所前路明朗,基于EOS的去中心化交易所力拔头筹
  9. 从身份管理系统思考企业CMDB的建设
  10. Nacos 发布 v0.8.0 Pre-GA版本,安全稳定上生产