START-OF-SELECTION.
PERFORM display_message USING 'こんにちは、世界!'.
FORM display_message USING text TYPE string.
WRITE: / text.
ENDFORM.
このプログラムでは、サブルーチンに文字列「こんにちは、世界!」を渡し、画面に出力します。
実行結果
CHANGINGパラメータの例
使用例
DATA: lv_number TYPE i VALUE 5.
START-OF-SELECTION.
PERFORM double_number CHANGING lv_number.
WRITE: / '結果:', lv_number.
FORM double_number CHANGING number TYPE i.
number = number * 2.
ENDFORM.
このプログラムでは、CHANGINGパラメータを使い、数値を2倍にして結果を返します。
実行結果
USINGとCHANGINGを組み合わせる
使用例
DATA: lv_base TYPE i VALUE 3,
lv_result TYPE i.
START-OF-SELECTION.
PERFORM calculate_power USING lv_base
CHANGING lv_result.
WRITE: / '3の3乗は:', lv_result.
FORM calculate_power USING base TYPE i
CHANGING result TYPE i.
result = base ** 3.
ENDFORM.
REPORT z_call_table_program.
DATA: lt_list TYPE TABLE OF abaplist, " スプールデータを格納
lt_output TYPE TABLE OF char10, " 実行結果を保持
lv_text TYPE char10.
START-OF-SELECTION.
" SUBMITでプログラムを呼び出し、スプールに出力
SUBMIT z_target_table_program EXPORTING LIST TO MEMORY AND RETURN.
" スプールリストを取得
CALL FUNCTION 'LIST_FROM_MEMORY'
TABLES
listobject = lt_list
EXCEPTIONS
others = 1.
" スプールリストをテキスト形式に変換
CALL FUNCTION 'LIST_TO_ASCI'
TABLES
listobject = lt_list
listasci = lt_output
EXCEPTIONS
others = 1.
" 結果を表示
LOOP AT lt_output INTO lv_text.
WRITE: / lv_text.
ENDLOOP.
●呼び出し先プログラム(Z_TARGET_TABLE_PROGRAM)
REPORT z_target_table_program.
DATA: lt_data TYPE TABLE OF char10.
START-OF-SELECTION.
" サンプルデータ作成
APPEND 'データ1' TO lt_data.
APPEND 'データ2' TO lt_data.
APPEND 'データ3' TO lt_data.
" データを出力
LOOP AT lt_data INTO DATA(lv_row).
WRITE: / lv_row.
ENDLOOP.
Warning: file_get_contents(https://sap-career.com/freelancebank/jobs/feed/): Failed to open stream: HTTP request failed! HTTP/1.1 429 Too Many Requests
in /home/saplab/sap-career.com/public_html/saplabo/wp-content/themes/swell_child/admin/article_list.php on line 70
Warning: Attempt to read property "channel" on bool in /home/saplab/sap-career.com/public_html/saplabo/wp-content/themes/swell_child/admin/article_list.php on line 72
新着のSAPフリーランス案件
Warning: Attempt to read property "item" on null in /home/saplab/sap-career.com/public_html/saplabo/wp-content/themes/swell_child/admin/article_list.php on line 82
Warning: foreach() argument must be of type array|object, null given in /home/saplab/sap-career.com/public_html/saplabo/wp-content/themes/swell_child/admin/article_list.php on line 82