[SAP]ABAP动态生成经典应用之Dynamic SQL Excute 程序

关注

VIP免费原创最新推荐文章于 2025-02-15 08:30:00 发布 8.5k 阅读 AI 写同款· GEO 优化 ›

ABAP动态生成经典应用之Dynamic SQL Excute 程序开发说明：在SAP的系统维护过程中，有时我们需要修改一些Table中的数据，可是很多Table又不能直接在Tcode：SE16中修改，使用的SAP ID又没有调试数据修改权限，这时我们应该怎么样修改数据呢？思路--> ABAP程序中的SQL 更新语句谁都有权限执行，只要我们能动态生成修改该Table字段的ABAP CODE动态执行即可！开发技术：1.SQL代码编写技术1.动态程序阅读详情

开发说明：在SAP的系统维护过程中，有时我们需要修改一些Table中的数据，可是很多Table又不能直接在Tcode：SE16中修改，使用的SAP ID又没有调试数据修改权限，这时我们应该怎么样修改数据呢？思路--> ABAP程序中的SQL 更新语句谁都有权限执行，只要我们能动态生成修改该Table字段的ABAP CODE动态执行即可！

开发技术：

1.SQL代码编写技术

1.动态程序代码生成技术

2.ABAP动态程序执行技术

注意事项：

SQL语法一定要准确，修改条件准确，修改数据后不违法数据唯一性原则

程序代码：如下

*******************************************************************
* (Copyright @2006 Mysingle Digital System Co.Ltd.
* All Rights Reserved|Confidential)
* System Module   : ABAP CBO
* Program Description : Dynamic SQL Excute
* Developer         : ZOU XIN
* Develop Date   : 2006.03.01
* Use Status   : Release 1.0
*******************************************************************
REPORT z_cbo_abap_02 MESSAGE-ID zp NO STANDARD PAGE HEADING.

DATA : fcode LIKE sy-ucomm,
       changed LIKE s38e-buf_varied,
       save_tabix LIKE sy-tabix,
       tabix_count TYPE i,
       select_key(10) TYPE c,
       etc(80) TYPE c,
       update_flag TYPE c,
       line_cnt     TYPE i,
       prog(8)      TYPE c,
       msg(120)     TYPE c,
       msg_text(72) TYPE c,
       confirm_flag TYPE c.

DATA: itab_sql LIKE abapsource OCCURS 0 WITH HEADER LINE,
itab_prog LIKE abapsource OCCURS 0 WITH HEADER LINE.

START-OF-SELECTION.

*程序执行直接进入ABAP代码编辑器
SET PF-STATUS 'PFSTA00'.
WRITE: /1 'Edit Your SQL ................' COLOR 2.

AT USER-COMMAND.

*动态生成程序修改确认
IF sy-ucomm = 'EDIT'.
PERFORM editor_sql.

*动态生成程序执行

ELSEIF sy-ucomm = 'EXEC' OR sy-ucomm = 'EDEX'.
REFRESH itab_prog.
CLEAR itab_prog.