SAP-SD-发票凭证数量为0更新

实现增强SDVFX008
FIELD-SYMBOLS:
               <FS_ACCIT> TYPE ACCIT.
*READ TABLE CVBRP[] INTO LS_VBRP INDEX 1 .
LOOP AT XACCIT ASSIGNING <FS_ACCIT>.
  READ TABLE CVBRP WITH KEY VBELN = <FS_ACCIT>-AWREF POSNR = <FS_ACCIT>-POSNR_SD.
  IF SY-SUBRC = 0.
    <FS_ACCIT>-ZUONR = LS_VBRP-AUBEL.
    IF <FS_ACCIT>-HKONT(6) = '006001' AND <FS_ACCIT>-MENGE = 0.
      <FS_ACCIT>-MENGE = 0 - CVBRP-FKIMG.
    ENDIF.
  ENDIF.
ENDLOOP.