report zexit_help .
tables : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir.
tables : tstct.
data : jtab like tadir occurs 0 with header line.
data : field1(30).
data : v_devclass like tadir-devclass.
parameters : p_tcode like tstc-tcode obligatory.
select single * from tstc where tcode eq p_tcode.
if sy-subrc eq 0.
select single * from tadir where pgmid = 'R3TR'
and object = 'PROG'
and obj_name = tstc-pgmna.
move : tadir-devclass to v_devclass.
if sy-subrc ne 0.
select single * from trdir where name = tstc-pgmna.
if trdir-subc eq 'F'.
select single * from tfdir where pname = tstc-pgmna.
select single * from enlfdir where funcname =
tfdir-funcname.
select single * from tadir where pgmid = 'R3TR'
and object = 'FUGR'
and obj_name eq enlfdir-area.
move : tadir-devclass to v_devclass.
endif.
endif.
select * from tadir into table jtab
where pgmid = 'R3TR'
and object = 'SMOD'
and devclass = v_devclass.
select single * from tstct where sprsl eq sy-langu and
tcode eq p_tcode.
format color col_positive intensified off.
write:/(19) 'Transaction Code - ',
20(20) p_tcode,
45(50) tstct-ttext.
skip.
if not jtab[] is initial.
write:/(95) sy-uline.
format color col_heading intensified on.
write:/1 sy-vline,
2 'Exit Name',
21 sy-vline ,
22 'Description',
95 sy-vline.
write:/(95) sy-uline.
loop at jtab.
select single * from modsapt
where sprsl = sy-langu and
name = jtab-obj_name.
format color col_normal intensified off.
write:/1 sy-vline,
2 jtab-obj_name hotspot on,
21 sy-vline ,
22 modsapt-modtext,
95 sy-vline.
endloop.
write:/(95) sy-uline.
describe table jtab.
skip.
format color col_total intensified on.
write:/ 'No of Exits:' , sy-tfill.
else.
format color col_negative intensified on.
write:/(95) 'No User Exit exists'.
endif.
else.
format color col_negative intensified on.
write:/(95) 'Transaction Code Does Not Exist'.
endif.
at line-selection.
get cursor field field1.
check field1(4) eq 'JTAB'.
set parameter id 'MON' field sy-lisel+1(10).
call transaction 'SMOD' and skip first screen.
分享到:
相关推荐
e: 进入e盘 dir(directory):目录 查看当前文件夹下的所有目录 cd(change directory):进入到哪里去 cd..... 查找具体某个命令的用法:help 命令 例如:help cd 。。。。。。。。。。。。等
Amazon S3存储桶查找器和搜寻器。安装注意:s3recon需要python版本> = 3.6 $ pip install s3recon用法...filesoptional arguments: -h, --help show this help message and exit -o file, --output file write outp
[--scripts] [--images] [--headers] [--cookies COOKIES] [--flags FLAGS] [-f] urlpositional arguments: url URL of the target websiteoptional arguments: -h, --help show this help message and exit -...
d] [-v]Python memory analyzeroptional arguments: -h, --help show this help message and exit -p PID, --pid PID process ID (requires root privileges) -d, --debug run in debug mode -v, --version show ...
顺序表的类模板例程,1.插入 *"; cout* 2.按位查找 *"; cout* 3.按值查找 *"; cout* 4.删除 *"; cout* 5.输出顺序表 *"; cout* 6....cout* 7/help 输出此表 *";...cout* 8/exit.退出 *"; cout* 9.合并
usage: imgdup.py [-h] [-c CMP] [-s SENSITIVITY] [-i] [-d] [-u]Compare images base on perceptual similarity.optional arguments: -h, --help show this help message and exit -c CMP, --cm
文件清理器 查找未使用文件的脚本 usage: filecleaner.py [-h] [--root ROOT] [--... -h, --help show this help message and exit --root ROOT the root directory to scan --days N filter directories older than
JButton exit=new JButton(new ImageIcon("pic/exit.gif")); myfr(String sss){ /////构造函数开始 super(sss); JMenuBar mb=new JMenuBar(); fname=null; //初始文件名为空 findenter=new JButton(...
Public Declare Function htmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" (ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Long) As Long Public Const HH_DISPLAY_...
用于将漏洞检测为PHP源代码的... -h, --help show this help message and exit --dir DIR Directory to analyse --plain No color in output # Example ╭─ :ghost: swissky@crashlab: ~ /Github/PHP_Code_Stati
SQL>exit b、在sqlplus下得到帮助信息 列出全部SQL命令和SQL*Plus命令 SQL>help 列出某个特定的命令的信息 SQL>help 命令名 c、显示表结构命令DESCRIBE SQL>DESC 表名 d、SQL*Plus中的编辑命令 显示SQL缓冲区命令...
码头工人docker build -t reposcanner .docker run -it --rm reposcanner -hdocker run -it --rm reposcanner -r 用法./reposcanner -r 选项: optional arguments: -h, --help show this help message and exit -r ...
-h, --help show this help message and exit --path PATH Path to source code folder --config CONFIG Path to config file --output OUTPUT Save result to file --json JSON Save output as json file --...
基莫 kimo (土耳其语中的意思是谁)是一种用于查找MySQL查询的OS进程的工具。 安装 kimo仅适用于Python3。 pip3 install kimo 用法 kimo由两部分组成: kimo-...-h, --help show this help message and exit --loggin
帕雷德 PaReD是一个简单的Python脚本... -h, --help show this help message and exit -i IP, --ip IP single IP address -s SUBNET, --subnet SUBNET subnet in CIDR notation -f FILE, --file FILE file containi
电子邮件 在网站使用API,使用Python在所有已知域中使用Python查找电子邮件域(@ example.com)。 该脚本确实需要ViewDNS.... -h, --help show this help message and exit -a API, --api API REQUIRED API to Vi
git评论者 智能查找代码审阅者。 另请参见 。 安装 自制程序(MacOS首选) 如果您使用Homebrew,则可以通过安装git-reviewers: ... -h, --help show this help message and exit -v, --version
Gmail URL解码器 Gmail URL解码器是一种开放源代码Python工具,可用于处理纯文本或任意原始数据文件,以便从与... -h, --help show this help message and exit -t, --text set input as a plain text file with an UR
Yatiblog 的创建是为了支持并为项目创建文档。... yatiblog.conf 文本文件中的任何三重虚线 YAML 元数据标头。... -h, --help show this help message and exit -d DATA_FILE Set the path for a data file (default
Glosbe-dict-终端使用终端/命令行字典查找客户端用法 $ python ... in ISO_639 formatword Word to translateoptional arguments:-h, --help show this help message and exit-c, --colored Colorized output-e,