Коллеги, подскажите пожалуйста решение для проблемы - заполняю инфотип 0083 (P - структуру), передаю в функциональный модуль HR_INFOTYPE_OPERATION, генерится сообщение об ошибке - параметр 4 имеет недопустимое значение
Фрагмент программы:
DATA ls_data LIKE p0083 .
DATA ls_return LIKE bapireturn1 .
CALL FUNCTION 'ENQUEUE_EPPRELE'
EXPORTING
MODE_PREL = 'E'
MANDT = SY-MANDT
PERNR = PERNR
INFTY = '0083'
ENDDA = '99991231'
BEGDA = BEGDA
EXCEPTIONS
FOREIGN_LOCK = 1
SYSTEM_FAILURE = 2
OTHERS = 3
.
IF SY-SUBRC <> 0.
ENDIF.
* fill ls_data with necessary information
MOVE PERNR TO ls_data-PERNR.
MOVE BEGDA TO ls_data-BEGDA.
MOVE '99991231' TO ls_data-ENDDA.
MOVE 'UAH' TO ls_data-WAERS.
MOVE UAR1 TO ls_data-UAR01.
MOVE AAZ1 TO ls_data-AAZ01.
MOVE UAR2 TO ls_data-UAR02.
MOVE AAZ2 TO ls_data-AAZ02.
MOVE UAR3 TO ls_data-UAR03.
MOVE AAZ3 TO ls_data-AAZ03.
MOVE UAR4 TO ls_data-UAR04.
MOVE AAZ4 TO ls_data-AAZ04.
MOVE UAR5 TO ls_data-UAR05.
MOVE AAZ5 TO ls_data-AAZ05.
MOVE USJ TO ls_data-USJ01.
MOVE USJ TO ls_data-USJ02.
MOVE USJ TO ls_data-USJ03.
MOVE USJ TO ls_data-USJ04.
MOVE USJ TO ls_data-USJ05.
MOVE USO TO ls_data-USO01.
MOVE USO TO ls_data-USO02.
MOVE USO TO ls_data-USO03.
MOVE USO TO ls_data-USO04.
MOVE USO TO ls_data-USO05.
CALL FUNCTION 'HR_INFOTYPE_OPERATION'
EXPORTING
INFTY = '0083'
NUMBER = ls_data-PERNR
* SUBTYPE =
* OBJECTID =
* LOCKINDICATOR =
VALIDITYEND = '99991231'
VALIDITYBEGIN = BEGDA
* RECORDNUMBER =
RECORD = ls_data
OPERATION = 'INS'
TCLAS = 'A'
NOCOMMIT = space
IMPORTING
RETURN = ls_return
.
CALL FUNCTION 'DEQUEUE_EPPRELE'
EXPORTING
mode_prel = 'E'
mandt = sy-mandt
pernr = ls_data-pernr
infty = '0083'
endda = '99991231'
begda = ls_data-begda.