DATA: gs_carrier TYPE bc400_s_carrier, gs_flight TYPE bc400_s_flight.
使用本地类型定义
1 2 3 4 5 6 7 8
TYPES: BEGIN OF gty_s_carrierflight, carrid TYPE bc400_s_flight-carrid, connid TYPE bc400_s_flight-connid, carrname TYPE bc400_s_carrier-carrname, url TYPE bc400_s_carrier-url, END OF gty_s_carrierflight.
DATA gs_combined TYPE gty_s_carrierflight.
结构体操作
1 2 3 4 5 6 7 8 9 10 11 12 13
" 访问组件 WRITE: gs_flight-carrid, gs_flight-connid.
" 复制同名字段 MOVE-CORRESPONDING gs_carrier TO gs_combined.
" 清除所有字段 CLEAR gs_flight.
" 检查是否为初始值 IF gs_flight IS NOT INITIAL. " 结构体中有数据 ENDIF.