APPEND 'FORM subr_name.' TO gt_code. APPEND 'WRITE / ''Dynamic Subroutine is called''.' TO gt_code. APPEND 'ENDFORM.' TO gt_code. GENERATE SUBROUTINE POOL gt_code NAME gv_prog. WRITE : / 'Subroutine Pool Name: ', gv_prog. PERFORM subr_name IN PROGRAM (gv_prog) IF FOUND. ...
perform (gv_subname) in program (gv_pname) if found using gv_first gv_second changing gv_result. 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 利用list调用子程序 PERFORM idx OF subr1 subr2 .. subrn 1. 根据顺序索引调用列出的子程序,只能调用内部子程序,且不能指定参数 do 2 times. perform...
gv_pname(20) type c value'Z_YZW_STRUC',"要用大写,不然系统识别不到gv_subname(20) type c value'CONCATE_STRING'."要用大写,不然系统识别不到perform (gv_subname) in program (gv_pname) if found using gv_first gv_second changing gv_result. 利用list调用子程序 PERFORMidxOFsubr1 subr2 .....
PERFORM (<fsubr>) [IN PROGRAM (<fprog>)] [<pass>] [IF FOUND]. 系统执行字段<fsubr>中存储的子程序。如果使用IN PROGRAM选项,系统在字段<fprog>中存储的程序内查找子程序(外部调用)。否则,系统在当前程序中查找子程序(内部调用)。 使用该语句还可在程序代码中指定子程序名和外部程序名。为此请忽略括...
PERFORM_PROGRAM_NAME_TOO_LONG CX_SY_PROGRAM_NOT_FOUND REPLACE_INFINITE_LOOP CX_SY_REPLACE_INFINITE_LOOP 6、类异常类树 CX_SY_ROOT | |--CX_STATIC_CHECK | |--CX_DYNAMIC_CHECK | | | |--CX_SY_ARITHMETIC_ERROR | | | | | |--CX_SY_ZERODIVIDE ...
PERFORM ('SHOW_TAB') IN PROGRAM (lv_prog) IF FOUND. ELSEIF sy-subrc = 4. MESSAGE lv_mess TYPE 'I'. ELSEIF sy-subrc = 8. MESSAGE lv_id TYPE 'I'. ENDIF. "创建类 DATA:lv_class TYPE string. DATA:lo_ref TYPE REF TO object. ...
*PERFORM subr_name IN PROGRAM (gv_prog) IF FOUND. *DATA: * gs_scarr TYPE scarr, * gv_flag TYPE c. *SELECT SINGLE * FROM scarr INTO gs_scarr WHERE carrid = 'AA'. *PERFORM delete_proc USING gs_scarr. *PERFORM insert_proc ON COMMIT. ...
PERFORM (<fsubr>) [IN PROGRAM (<fprog>)] [<pass>] [IF FOUND]. 系统执行字段<fsubr>中存储的子程序。如果使用IN PROGRAM选项,系统在字段<fprog>中存储的程序内查找子程序(外部调用)。否则,系统在当前程序中查找子程序(内部调用)。 使用该语句还可在程序代码中指定子程序名和外部程序名。为此请忽略括...
PERFORM (fsubr)[IN PROGRAM (fprog)][USING p1 p2...] [CHANGING p1 p2...] [IF FOUND].サブルーチン名および外部プログラム名は、それぞれ項目 fsubr および fprog の内容です。fsubr という名称のサブルーチンがない場合は、IF FOUND オプションを使用して、実行時エラーの発生...
43、DEXPORT_BUFFER_NO_MEMORY CX_SY_EXPORT_BUFFER_NO_MEMORYGENERATE_SUBPOOL_DIR_FULL CX_SY_GENERATE_SUBPOOL_FULLMOVE_CAST_ERROR CX_SY_MOVE_CAST_ERRORPERFORM_PROGRAM_NAME_TOO_LONG CX_SY_PROGRAM_NOT_FOUNDREPLACE_INFINITE_LOOP CX_SY_REPLACE_INFINITE_LOOP6、类异常类树CX_SY_ROOT|-CX_STATIC_CHEC...