SELECT

"入力された会社コード、会計年度の会計伝票番号を取得してみる

"データオブジェクトやテーブルなどの宣言
TYPES:
  BEGIN OF zty_test_select,
    bukrs type bkpf-bukrs,
    belnr type bkpf-belnr,
    gjahr type gjahr,
  END OF zty_test_select.

DATA: zd_test_Select type zty_test_select,
      zt_test_select type standard table of zty_test_select.

"画面入力項目(PARAMETERS)宣言
PARAMETERS: p_bukrs type bukrs,
            p_gjahr type gjahr.

"初期化
CLEAR: zd_test_select,
       zt_test_select.

"DBテーブルからデータ取得
SELECT bukrs
       belnr
       gjahr
  FROM bkpf
  INTO TABLE zt_test_select
  WHERE bukrs = p_bukrs
    AND gjahr = p_gjahr.




"上記で取得した伝票番号を使って明細を取得してみる(For All Entries)


"データオブジェクトやテーブルなど追加で宣言
TYPES:
  BEGIN OF zty_test_select_fae,
    bukrs type bkpf-bukrs,
    belnr type bkpf-belnr,
    gjahr type gjahr,
    dmbtr type dmbtr,
  END OF zty_test_select_fae.

DATA: zd_test_Select_fae type zty_test_select_fae,
      zt_test_select_fae type standard table of zty_test_select_fae.

"初期化
CLEAR: zd_test_select_fae,
       zt_test_select_fae.

"For All Entriesするテーブルのデータ存在チェック
IF zt_test_select is not initial.

"DBテーブルからデータ取得
SELECT bukrs
       belnr
       gjahr
       dmbtr
  FROM bseg
  INTO TABLE zt_test_select_fae
  FOR ALL ENTRIES IN zt_test_select
  WHERE belnr = zt_test_select-belnr.

ENDIF.