z/OS中REXX调用USS
Ricky
posted @ 2013年9月11日 16:12
in Other
, 1428 阅读
配合syscalls,可以很灵活的调用USS(Unix System Services)命令:
比如打开一个文件并获取文件描述符,写入关闭文件:
tabval="/path/to/file"
/*open tabval file*/
call syscalls 'ON'
address syscall
'open' tabval,
O_rdwr+O_creat+O_trunc,
660
if retval=-1 then
do
say 'E03: Validation file not opened, err code ' errno errnojr
return
end
/*get fd*/
fd=retval
rec="Hello World!"
'write' fd 'rec' length(rec)
'close' fd
call syscalls "OFF"
调用Unix命令:
cmd = "ls -l"
call bpxwunix cmd,,,cperr.
say cperr.1
bpxwunix有四个参数,分别是执行的命令,标准输入 ,标准输出,标准出错
2024年2月21日 21:08
Very likely I’m going to bookmark your blog . You absolutely have wonderful stories. Cheers for sharing with us your blo