ABAP-Field Symbol用法介绍

最新推荐文章于 2025-02-11 10:41:58 发布

Nathan_Sun

最新推荐文章于 2025-02-11 10:41:58 发布

阅读量929

点赞数

分类专栏：技术总结 ABAP基础

本文链接：https://blog.youkuaiyun.com/Sundam/article/details/88391308

版权

技术总结同时被 2 个专栏收录

80 篇文章

订阅专栏

ABAP基础

51 篇文章

订阅专栏

ABAP-Field Symbol用法介绍

*&---------------------------------------------------------------------*
*& Report YN_FS01
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT YN_FS01.
DATA LV_FNAME TYPE CHAR30 .
DATA GT_VBAK TYPE TABLE OF VBAK WITH HEADER LINE .
SELECT * INTO CORRESPONDING FIELDS OF TABLE GT_VBAK FROM VBAK UP TO 10 ROWS .
READ TABLE GT_VBAK INDEX 1 .

*声明：
*Generic Type
FIELD-SYMBOLS <FS_S01> TYPE ANY .
FIELD-SYMBOLS <FS_S03> TYPE ANY .
FIELD-SYMBOLS <FS_S05> TYPE ANY .
FIELD-SYMBOLS <FS_T01> TYPE ANY TABLE .
*Full Type
FIELD-SYMBOLS <FS_S02> LIKE LINE OF GT_VBAK[] .
FIELD-SYMBOLS <FS_S04> LIKE LINE OF GT_VBAK[] .
FIELD-SYMBOLS <FS_T02> LIKE GT_VBAK[] .

*普通分配
ASSIGN GT_VBAK TO <FS_S01> CASTING TYPE VBAK."强制类型转换
ASSIGN GT_VBAK[] TO <FS_T02> .

LOOP AT <FS_T02> ASSIGNING <FS_S02>.
<FS_S02>-ERNAM = 'Nathan'.
ENDLOOP.
READ TABLE <FS_T02> ASSIGNING <FS_S04> INDEX 1 .

*结构分配
ASSIGN COMPONENT 'ERNAM' OF STRUCTURE <FS_S04> TO <FS_S03> .

*动态结构分配
LV_FNAME = 'ERNAM'.
ASSIGN COMPONENT LV_FNAME OF STRUCTURE <FS_S04> TO <FS_S05> .

WRITE:/ '<FS_S03>:' && <FS_S03> ,/ '<FS_S05>:' && <FS_S05> .