zl程序教程

您现在的位置是:首页 >  后端

当前栏目

ABAP 事务码 ST22的增强 - 自动在ST22视图显示的源代码里绘制一个佛祖图形

事务自动 一个 显示 视图 绘制 源代码 ABAP
2023-09-14 09:02:49 时间
ENHANCEMENT 1  ZST22_ENHANCEMENT.    "active version
data: lt_god like text_out[] with header line.

  define add_line.
    append &1 to lt_god.
  end-of-definition.

  add_line:

 '                             _ooOoo_',
 '                            o8888888o',
 '                            88" . "88',
 '                            (| -_- |)',
 '                            O\  =  /O',
 '                         ____/`---`\____',
 '                       .`  \\|     |//  `',
 '                      /  \\|||  :  |||//  \',
 '                     /  _||||| -:- |||||-  \',
 '                     |   | \\\  -  /// |   |',
 '                     | \_|  ''\---/''  |   |',
 '                     \  .-\__  `-`  ___/-. /',
 '                   ___`. .`  /--.--\  `. . __',
 '                ."" `<  `.___\_<|>_/___.`  >`""',
 '               | | :  `- \`.;`\ _ /`;.`/ - ` : | |',
 '               \  \ `-.   \_ __\ /__ _/   .-` /  /',
 '          ======`-.____`-.___\_____/___.-`____.-`======',
 '                             `=---=',
 '          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^',
 '                     ·ð×æ±£ÓÓ        ÓÀÎÞBUG',
 '                     Õâ¶Î´úÂë·ð×æÒѾ­×ö¹ý¿ª¹â´¦Àí£¬¾øÎÞ¿ÉÄÜÔÙ²úÉúbug'.

  if ttype = 'W'. "// What happened?
    insert lines of lt_god into text_out index 1.
  endif.
ENDENHANCEMENT.

要获取更多Jerry的原创文章,请关注公众号"汪子熙":