首页 > 代码库 > 子程序调用
子程序调用
假定程序包 含子程序：
PROGRAM FORMPOOL.
FORM SUB1.
WRITE: / ‘Subroutine 1‘.
ENDFORM.
FORM SUB2.
WRITE: / ‘Subroutine 2‘.
ENDFORM.
可在运行时 指定子程序 名，如下所 示：
PROGRAM SAPMZTST.
DATA: PROGNAME(8) VALUE ‘FORMPOOL‘,
SUBRNAME(8).
SUBRNAME = ‘SUB1‘.
PERFORM (SUBRNAME) IN PROGRAM (PROGNAME) IF FOUND.
SUBRNAME = ‘SUB2‘.
PERFORM (SUBRNAME) IN PROGRAM (PROGNAME) IF FOUND.
子程序调用
声明：以上内容来自用户投稿及互联网公开渠道收集整理发布，本网站不拥有所有权，未作人工编辑处理，也不承担相关法律责任，若内容有误或涉及侵权可进行投诉： 投诉/举报 工作人员会在5个工作日内联系你，一经查实，本站将立刻删除涉嫌侵权内容。