ABAPサンプル - 一括SELECT INTO TABLE

NASTデータ参照例

DATA: wa_nast LIKE nast. " structure
DATA: it_nast TYPE TABLE OF nast. " internal table

" nastからのデータ一覧を一括で内部テーブルへ格納する
SELECT * FROM nast INTO TABLE it_nast
WHERE kappl = 'V1' AND spras = 'EN' AND parnr = '0000001000'.

" 内部テーブルのエントリを表示する
LOOP AT it_nast INTO wa_nast.
WRITE: / wa_nast-objky, wa_nast-parnr, wa_nast-erdat.
ENDLOOP.

LFA1データ参照

DATA: wa_lfa1 LIKE lfa1. " 構造
DATA: it_lfa1 TYPE TABLE OF lfa1. " 内部テーブル

" LFA1（仕入先マスタ - 一般セクション）データ一覧を一括で内部テーブ
" ルへ格納する
SELECT * FROM lfa1 INTO TABLE it_lfa1
WHERE lifnr like 'T-K500A%'.

" 内部テーブルのエントリを表示する
" 仕入先コード、名称、市区町村
LOOP AT it_lfa1 INTO wa_lfa1.
WRITE: / wa_lfa1-lifnr, wa_lfa1-name1, wa_lfa1-ort01.
ENDLOOP.