PERFORM用法总结:
Syntax
PERFORM { { { subr
| {subr|(sname) IN PROGRAM [prog|(pname)] [IF FOUND]}
| {n OF subr1 subr2 ...}
| {subr(prog) [IF FOUND]} }
[TABLES itab1 itab2 ...]
[USING a1 a2 ...]
[CHANGING a1 a2 ...] }
| { ON { {COMMIT [LEVEL idx]}
| ROLLBACK } } }.
Effect
Calls a subroutine. 调用子程序
Additions
Specification of the subroutine:
subr - Subroutine subr from the same program.
subr|(sname) IN PROGRAM [prog|(pname)] - Static or dynamic specification of a subroutine in another or the current program.
n OF subr1 subr2 ... - Subroutine n from a list of subroutines.
subr(prog) - Obsolete: Static specification of a subroutine in another program prog.
IF FOUND
Suppresses an exception if the subroutine is not found. .
Specification of the parameter:
TABLES itab1 itab2 ...
Assigns internal tables itab1, itab2, ...to the table parameters of the same position.
USING a1 a2 ...
Assigns current parameters a1, a2, ...to the formal parameters of the same position.
CHANGING a1 a2 ...
Assigns current parameters a1, a2, ... to the formal parameters of the same position.
Specification of Execution:
ON COMMIT [LEVEL idx]
Registers the subroutine for execution with COMMIT WORK, where the execution sequence time can be controlled with LEVEL.
ON ROLLBACK
Registers the subroutine for execution with ROLLBACK WORK.
阅读(9786) | 评论(0) | 转发(0) |
