abap 工时查找

在afru-ism01,afru-ism02,afru-ism03，......ism06中对应co14中的报工工时信息。

分别对应到CO14屏幕的第一个字段、第二个字段、第三个字段、......第六个字段。

配置可在cr03查看。

根据'标准值码'在tc21找到对应字段的参数ID，再根据参数ID在表TC20T找到描述，区分屏幕字段。

例如：

 

 

 

       SELECT objty objid arbpl vgwts
        INTO TABLE gt_crhd
        FROM crhd
        FOR ALL ENTRIES IN gt_plpo
       WHERE objty EQ 'A'
         AND objid = gt_plpo-arbid.
      "  根据标准值码(crhd-vgwts)区分屏幕字段
      IF gt_crhd[] IS NOT INITIAL.
        SELECT tc21~vgwts,
               tc21~par01,
               tc21~par02,
               tc21~par03,
               tc21~par04
          INTO TABLE @DATA(lt_tc21)
          FROM tc21
           FOR ALL ENTRIES IN @gt_crhd
         WHERE vgwts EQ @gt_crhd-vgwts.
        SORT lt_tc21[] BY vgwts.

        SELECT parid,
               txt
          INTO TABLE @DATA(lt_tc20t)
          FROM tc20t
         WHERE spras EQ @sy-langu.
        SORT lt_tc20t[] BY parid.

      ENDIF.

IF ls_tc20t1-txt = '机器' AND ls_tc20t2-txt eq '工时' AND ls_tc20t3-txt eq '其他制费'.

赋值代码......

endif.