批量导入发票校验-优快云博客

本文链接：https://blog.youkuaiyun.com/saptopia/article/details/1929376

该程序用于批处理导入发票数据，通过读取Excel文件并进行转换，调用BAPI_INCOMINGINVOICE_CREATE进行发票创建。涉及字段包括公司代码、货币、总金额、记账日期等，对数据进行验证并显示导入结果。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

TYPE-POOLS truxs.
TABLES : t001,mkpf.
DATA: header TYPE bapi_incinv_create_header.
DATA: return TYPE bapiret2 OCCURS 0 WITH HEADER LINE.
DATA: gpp TYPE i,
      flag TYPE i.
DATA: xlstab TYPE truxs_t_text_data,
      f_size TYPE i .
DATA: BEGIN OF itab_gp OCCURS 0,
      id TYPE i,
      doc_date LIKE bapi_incinv_create_header-doc_date,
      pstng_date LIKE bapi_incinv_create_header-pstng_date,                          "记账日期
      bline_date LIKE bapi_incinv_create_header-bline_date,                         "基准日期
*      comp_code LIKE bapi_incinv_create_header-comp_code,                           "公司代码
      currency LIKE bapi_incinv_create_header-currency,                            "货币代码
      gross_amount LIKE bapi_incinv_create_header-gross_amount,                     "凭证货币的总发票金额
      pmnttrms LIKE bapi_incinv_create_header-pmnttrms,
      diff_inv LIKE bapi_incinv_create_header-diff_inv,                            "不同的开发票方
      del_costs_taxc LIKE bapi_incinv_create_header-del_costs_taxc,                  "交货成本税务代码
      calc_tax_ind LIKE bapi_incinv_create_header-calc_tax_ind,
      ref_doc_no LIKE bapi_incinv_create_header-ref_doc_no,                          "参考凭证编号
      header_txt LIKE bapi_incinv_create_header-header_txt,                          "抬头文本
*      invoice_doc_item LIKE bapi_incinv_create_gl_account-invoice_doc_item,          "税金
      gl_account LIKE bapi_incinv_create_gl_account-gl_account,
      item_amount1 LIKE bapi_incinv_create_gl_account-item_amount,
      db_cr_ind LIKE bapi_incinv_create_gl_account-db_cr_ind,
      item_text LIKE bapi_incinv_create_gl_account-item_text,
*      po_number LIKE bapi_incinv_create_item-po_number,

发票校验批导