首页 文章 精选 留言 我的

精选列表

搜索[程序开发],共10000篇文章
优秀的个人博客,低调大师

添加程序的标题

![](https://developer.qcloudimg.com/http-save/audit-12667468/c7a9f066aaa13f200989b63b0622ad78.png) ```javascript *&---------------------------------------------------------------------* *& Report ZTEST_1 *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT ztest_1. TABLES:marc,sscrfields. SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE TEXT-002. PARAMETERS: rb_1 RADIOBUTTON GROUP g1 USER-COMMAND u1 DEFAULT 'X', rb_2 RADIOBUTTON GROUP g1. SELECTION-SCREEN END OF BLOCK b2. SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001. PARAMETERS: p_field TYPE rlgrap-filename MODIF ID a1. SELECT-OPTIONS:s_matnr FOR marc-matnr MODIF ID a2. SELECTION-SCREEN END OF BLOCK b1. SELECTION-SCREEN FUNCTION KEY 1. AT SELECTION-SCREEN OUTPUT. sscrfields-ucomm = 'FC01'. sscrfields-functxt_01 = icon_export && '模板下载'. DATA: lv_titlebar TYPE c LENGTH 30. IF rb_1 = 'X'. lv_titlebar = '批量导入111'. ELSEIF rb_2 = 'X'. lv_titlebar = '查询222'. ENDIF. SET TITLEBAR 'TITLE01' WITH lv_titlebar. LOOP AT SCREEN. IF rb_1 = 'X'. CHECK screen-group1 = 'A2'. ELSEIF rb_2 = 'X'. CHECK screen-group1 = 'A1'. ENDIF. screen-active = 0. MODIFY SCREEN. ENDLOOP. AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_field. PERFORM get_f4_p_field. AT SELECTION-SCREEN. IF sy-ucomm = 'FC01'. PERFORM excel_download. ENDIF. START-OF-SELECTION. IF rb_1 = 'X'. * PERFORM get_excel_data. ELSEIF rb_2 = 'X'. * PERFORM get_table_data. ENDIF. * PERFORM alv_display. END-OF-SELECTION. *&---------------------------------------------------------------------* *& Form get_f4_p_field *&---------------------------------------------------------------------* *& text *&---------------------------------------------------------------------* *& --> p1 text *& p1 text *& file_save_dialog EXPORTING window_title = lv_windows_title default_extension = 'xlsx' default_file_name = '批量导入模板' file_filter = 'Microsoft Excel文件(*.xlsx)' CHANGING filename = lv_filename path = lv_path fullpath = lv_fpath user_action = lv_action EXCEPTIONS cntl_error = 1 error_no_gui = 2 not_supported_by_gui = 3 invalid_default_file_name = 4 OTHERS = 5. IF sy-subrc <> 0. * Implement suitable error handling here ENDIF. IF lv_action = 0. lv_key-relid = 'MI'. lv_key-objid = 'ZPP_BAT_007'. lv_destination = lv_fpath. CALL FUNCTION 'DOWNLOAD_WEB_OBJECT' EXPORTING key = lv_key destination = lv_destination IMPORTING rc = lv_rc. IF lv_rc <> 0. MESSAGE '工艺路线PRT模板下载失败!' TYPE 'S' DISPLAY LIKE 'E'. ENDIF. ELSE. MESSAGE '取消下载' TYPE 'S' DISPLAY LIKE 'E'. ENDIF. ENDFORM. ```

资源下载

更多资源
Mario

Mario

马里奥是站在游戏界顶峰的超人气多面角色。马里奥靠吃蘑菇成长,特征是大鼻子、头戴帽子、身穿背带裤,还留着胡子。与他的双胞胎兄弟路易基一起,长年担任任天堂的招牌角色。

腾讯云软件源

腾讯云软件源

为解决软件依赖安装时官方源访问速度慢的问题,腾讯云为一些软件搭建了缓存服务。您可以通过使用腾讯云软件源站来提升依赖包的安装速度。为了方便用户自由搭建服务架构,目前腾讯云软件源站支持公网访问和内网访问。

Spring

Spring

Spring框架(Spring Framework)是由Rod Johnson于2002年提出的开源Java企业级应用框架,旨在通过使用JavaBean替代传统EJB实现方式降低企业级编程开发的复杂性。该框架基于简单性、可测试性和松耦合性设计理念,提供核心容器、应用上下文、数据访问集成等模块,支持整合Hibernate、Struts等第三方框架,其适用范围不仅限于服务器端开发,绝大多数Java应用均可从中受益。

Rocky Linux

Rocky Linux

Rocky Linux(中文名:洛基)是由Gregory Kurtzer于2020年12月发起的企业级Linux发行版,作为CentOS稳定版停止维护后与RHEL(Red Hat Enterprise Linux)完全兼容的开源替代方案,由社区拥有并管理,支持x86_64、aarch64等架构。其通过重新编译RHEL源代码提供长期稳定性,采用模块化包装和SELinux安全架构,默认包含GNOME桌面环境及XFS文件系统,支持十年生命周期更新。

用户登录
用户注册