作业帮 > 综合 > 作业

ABAP field-symbol的意义是什么,我觉得和work area没什么区别

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/22 01:20:23
ABAP field-symbol的意义是什么,我觉得和work area没什么区别
绝对有意义.
我目前知道有三种比较有用的用法:1. loop table时 assigning <fs>, 当你改某个field时, 直接给<fs>赋值就行了, 不用再modify内表
2. 建立动态内表, 这个我也没弄过, 我的同事弄过, 非常强大
3. 当我们写一些inbound interface程序时, 或都是写一些conversion程序时, 经常要测一些field是不是空的, 这时可以用一段代码来简化, 且看下面例子
soft table是一个自定义table, incld是我的程序名, parm1是我要check的field的顺序, parm2是我要check的field, parm3是check的内容,这里是check该field是不是空.其他看代码吧
  FIELD-SYMBOLS: <fs_tab> TYPE ty_tab,                 <fs_field> TYPE ANY.  SELECT *    FROM zzsoftcode    INTO TABLE lt_softcode    WHERE incld = sy-cprog    AND parm3 = 'BLANK'.  IF sy-subrc = 0.    CLEAR lv_rec.    DESCRIBE TABLE lt_softcode LINES lv_rec.    sort lt_softcode by parm1.    LOOP AT gt_tab ASSIGNING <fs_tab>.      DO lv_rec TIMES.        CLEAR lw_softcode.        READ TABLE lt_softcode INTO lw_softcode INDEX sy-index.        IF sy-subrc = 0.          ASSIGN COMPONENT lw_softcode-parm2 OF STRUCTURE <fs_tab> TO <fs_field>.          IF <fs_field> IS ASSIGNED.            IF <fs_field> IS INITIAL.              CONCATENATE lw_softcode-rslt ' is blank' INTO <fs_tab>-msg.              EXIT.            ENDIF.          ENDIF.        ENDIF.      ENDDO.    ENDLOOP.  ENDIF.