clear HEADERDATA.
    HEADERDATA-BLINE_DATE   = _t_n-BLINE_DATE.  "дата оплаты
    HEADERDATA-INVOICE_IND  = 'X'.
    HEADERDATA-ZZFICTR      = _t_n-fistl.
    HEADERDATA-DOC_TYPE     = 'RE'.
    HEADERDATA-DOC_DATE     = _t_n-FKDAT_h.
    HEADERDATA-PSTNG_DATE   = _t_n-FKDAT_h.
    HEADERDATA-COMP_CODE    = _t_n-BUKRS.
    HEADERDATA-CURRENCY     = _t_n-WAERS1.
    HEADERDATA-ALLOC_NMBR   = _t_n-VERKF.
    HEADERDATA-HEADER_TXT   = _t_n-bktxt.
    HEADERDATA-ITEM_TEXT    = _t_n-bktxt.
    HEADERDATA-REF_DOC_NO   = t_h-belnr_proc.

    clear TAX.
    TAX-mblnr = HEADERDATA-mblnr.
    TAX-mjahr = HEADERDATA-mjahr.
    TAX-xblnr = HEADERDATA-xblnr.
    TAX-vbeln_vf = HEADERDATA-vbeln_vf.
    TAX-vbeln_av = HEADERDATA-vbeln_av.
    TAX-avizo = HEADERDATA-avizo.
    TAX-TAX_CODE = _t_n-MWSKZ.
    TAX-TAX_AMOUNT = t_n-kzwi5.
    append TAX.

    loop at _vi.
      TLINES = TLINES + 1.
      Clear items.
      items-INVOICE_DOC_ITEM = TLINES.
      items-PO_NUMBER        = _vi-EBELN.
      items-PO_ITEM          = _vi-EBELP.
      items-PO_UNIT          = t_n-MEINS1.
      items-ITEM_AMOUNT      = _vi-kzwi3.
      items-QUANTITY         = _vi-zkolf_npo.
      items-TAX_CODE         = t_n-MWSKZ.

      items-REF_DOC       = _vi-mblnr.
      items-REF_DOC_YEAR  = _vi-mjahr.
      items-REF_DOC_IT    = _vi-zeile.
      Append items.
   endloop.