"修改会计凭证抬头文本
DATA:lt_accchg TYPE TABLE OF accchg WITH HEADER LINE.
REFRESH lt_accchg.
CLEAR :lt_accchg.
lt_accchg-fdname = 'BKTXT'. "抬头文本-字段,也可以换其他字段
lt_accchg-newval = ls_t_text-text. "新的值
APPEND lt_accchg .
CALL FUNCTION 'FI_DOCUMENT_CHANGE'
EXPORTING
"i_awtyp = 'VBRK' "参考过程
"i_awref = "参考凭证号
"i_aworg = gt_data-aworg "参考组织
i_buzei = '001' "行项目
i_belnr = ls_bseg-belnr "会计凭证
i_bukrs = ls_bseg-bukrs "公司代码
i_gjahr = ls_bseg-gjahr "财年
TABLES
t_accchg = lt_accchg
EXCEPTIONS
no_reference = 1
no_document = 2
many_documents = 3
wrong_input