批量备SAP中CBO ABAP 程序代码为TXT文件备份
很想把生產機上所有后續開發的CBO程序都備份下來。
以備急用!
用過2種方法:
1.寫BDC程序,模擬 TCODE:SE38 -->Program --> Utilities(M)-->More Utilities-->Upload/Download-->Download-->*.txt保存。
2.ABAP提供了讀取的代碼:read report it_table-obj_name into rep_table.直接通過程序名讀取出程序代碼,再保存為*.txt文件保存,這種專業,首選!
下面代碼請參考!
?
REPORT?z_cbo_abap_backup.
TABLES?tadir.
DATA:?BEGIN?OF?it_table?OCCURS?0,
???????obj_name?LIKE?tadir-obj_name,
?????END?OF?it_table.
DATA?rep_table?TYPE?STANDARD?TABLE?OF?t_type?WITH?NON-UNIQUE?DEFAULT?KEY?INITIAL?SIZE?500.
DATA:?file?TYPE?string,
??????path?TYPE?string.
PARAMETER:?obj_name?LIKE?tadir-obj_name?DEFAULT?'Z*'.
SELECT-OPTIONS:?object?FOR?tadir-object?DEFAULT?'PROG',
????????????????author?FOR?tadir-author,
????????????????devclass?FOR?tadir-devclass.
START-OF-SELECTION.
??SELECT?obj_name?INTO?TABLE?it_table?FROM?tadir
????????????????WHERE?obj_name?LIKE?obj_name
????????????????AND?object?IN?object
????????????????AND?author?IN?author
????????????????AND?devclass?IN?devclass.
??path?=?'D:\ABAP\'.
??CONDENSE?path?NO-GAPS.
??LOOP?AT?it_table.
???READ?REPORT?it_table-obj_name?INTO?rep_table.
????CLEAR?file.
????CONCATENATE?path?it_table-obj_name?'.TXT'?INTO?file.
????CALL?FUNCTION?'GUI_DOWNLOAD'
??????EXPORTING
????????filename?=?file
????????filetype?=?'ASC'
??????TABLES
????????data_tab?=?rep_table.
??ENDLOOP.
總結
以上是生活随笔為你收集整理的批量备SAP中CBO ABAP 程序代码为TXT文件备份的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: ABAP动态生成经典应用之Dynamic
- 下一篇: 你知道Material Type(ROH