*&---------------------------------------------------------------------*
*& Report YTEST01
*&
*&---------------------------------------------------------------------*
*& 목적: (1) 동적으로 구조체를 받고,
*& (2) 해당 구조체의 필드값을 동적으로 받는 프로그램
*&---------------------------------------------------------------------*
report ytest01.
tables: scarr. " Airline
*&---- Data 선언부 -------------
data: wa_scarr type scarr.
field-symbols:
* type은 가능한 Char등으로 지칭해 주는 것이 좋으나, 불특정인 경우 Any 사용.
* Any 사용시 Performance 는 좋지 않음....
<fs_table> type any,
<fv_fd> type any.
*&------start-of-selection-----------
start-of-selection.
*&------(1) 필드심볼 Assign
assign wa_scarr to <fs_table>.
* Case1> <fs_table>이라는 구조체에 존재하는 필드명 CARRID
* Assign component 'CARRID' of structure <fs_table> to <fv_fd>.
* Case2> <fs_table>이라는 구조체에 존재하는 필드명 CARRID의 위치 ...-> 두번째
assign component 2 of structure <fs_table> to <fv_fd>.
*&------(2) 필드 심볼에 값 넣기.
select single carrid into <fv_fd>
from scarr
where carrid like 'A%'.
*&------(3) 필드 심볼값 출력
write:/ <fv_fd>.