BAPI_PR_CHANGE 修改项目长文本

网友： 城市火柴

时间：2009-07-24 09:41:32

lt_pritemtext-preq_no   = t_head-banfn.   ”单号     lt_pritemtext-preq_item = t_body-bnfpo.  ”行号     lt_pritemtext-text_id   = 'B01'.     lt_pritemtext-text_form = '*'.     lt_pritemtext-text_line = t_body-potxt.     APPEND lt_pritemtext.     CALL FUNCTION 'BAPI_PR_CHANGE'       EXPORTING         number     = t_head-banfn       TABLES         pritem     = lt_pritem         pritemx    = lt_pritemx         pritemtext = lt_pritemtext         return     = it_return. 我在通过这个bapi修改项目文本的时候，行号我都赋值了，可是修改完毕后发现行号和文本不一一对应，多行的文本被合并到一行，这个是什么原因呢？text_form的原因？

 

我做了一个测试，这样写似乎并无不妥：

REPORT  z_barry_bapi_pr_change.

DATA: itemtext TYPE bapimereqitemtext OCCURS 0 WITH HEADER LINE,
      i_return TYPE bapiret2 OCCURS 0 WITH HEADER LINE .

PARAMETERS p_banfn LIKE eban-banfn .

START-OF-SELECTION.

  itemtext-preq_no = p_banfn.
  itemtext-preq_item = '00010'.
  itemtext-text_id  = 'B01'.
  itemtext-text_form = '*'.
  itemtext-text_line = 'aaaa'.
  APPEND itemtext.
  itemtext-text_form = '/'.
  itemtext-text_line = 'bbbb'.
  APPEND itemtext.

  itemtext-preq_item = '00020'.
  itemtext-text_form = '*'.
  itemtext-text_line = 'cccc'.
  APPEND itemtext.
  itemtext-text_form = '*'.
  itemtext-text_line = 'dddd'.
  APPEND itemtext.

  CALL FUNCTION 'BAPI_PR_CHANGE'
    EXPORTING
      number     = p_banfn
    TABLES
      return     = i_return[]
      pritemtext = itemtext[].

  COMMIT WORK AND WAIT .

  LOOP AT i_return.
    WRITE / i_return-message .
  ENDLOOP.