0

HRIQ_UPDATE_INFTY は sy-subrc=0 を返します。しかし、実際には何も変更しません。一部のソース コード:

DATA:
lt_single_1001   TYPE STANDARD TABLE OF p1001 WITH HEADER LINE, 
lt_1001          TYPE STANDARD TABLE OF hrp1001 WITH HEADER LINE.

SELECT * FROM hrp1001 INTO TABLE lt_1001 WHERE
       objid = <studies>-cs_objid AND sobid = lv_major_id.

move-corresponding lt_1001 to lt_single_1001.

CALL FUNCTION 'HRIQ_UPDATE_INFTY'
  EXPORTING
      vtask                   = 'D'
  TABLES
      innnn                   = lt_single_1001
  EXCEPTIONS
      error_during_update     = 1
      no_authorization        = 2
      relation_not_reversible = 3
      corr_exit               = 4
      OTHERS                  = 5.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno.
ELSE.
  NEW-LINE NO-SCROLLING.
  WRITE: 'Update: '.
  WRITE: lt_1001-objid. "TODO: write proper information
  write: lt_single_1001-begda.
  write: lv_begda.
  write: lt_single_1001-endda.
  write: lv_endda.
ENDIF.
4

2 に答える 2

0

私が間違っていなければ、テーブル lt_1001 のヘッダーの値をテーブル lt_single_1001 のヘッダーに移動しています。少なくとも追加する必要があります。そうしないと、テーブルは空になります。また、P1001 は HRP1001 と同じではありません: 記入する必要がある INFTY メンバーがあります:
次の行の場合: 

   move-corresponding It_1001 to It_single_1001.

私は次のようなことをします 

   loop at It_1001.
      " move header of It_1001 to header of It_single_1001
      move-corresponding It_1001 to It_single_1001.
      " append the infotype information
      It_single_1001-infty = '1001'.
      " append the header to the table
      append lt_single_1001.
   endloop.
   " call to the function...

表示についても同じです。It_1001 のヘッダーを使用しています。it_single_1001 でループして、初期関数に送信したばかりのデータを表示する必要もあります。

よろしく
ギヨーム

于 2010-08-04T17:12:06.953 に答える
0

よくわかりませんが、エクスポート パラメータ commit_flg = 'X' を指定してみてください。

于 2010-07-06T20:35:31.243 に答える