Здравствуйте, уважаемые форумчане. Встала такая задача. Написал код с использованием HR_MAINTAIN_MASTERDATA.
Вот фрагмент:
lv_actio = 'INS'.
CLEAR proposed_values[].
set_field_value: '0294' 'P0294-NUMBR' data_tab-numbr.
set_field_value: '0294' 'P0294-PERNR' lv_pernr. " Таб.Номер
* WRITE data_tab-begda to tdate.
set_field_value: '0294' 'P0294-BEGDA' v_begda."data_tab-begda.
* WRITE data_tab-endda to tdate.
set_field_value: '0294' 'P0294-ENDDA' v_endda."data_tab-endda.
set_field_value: '0294' 'P0294-LAND1' data_tab-land1.
set_field_value: '0294' 'P0294-ORT01' data_tab-ort01.
set_field_value: '0294' 'P0294-ARBGB' data_tab-name1.
set_field_value: '0294' 'P0294-ACTCA' data_tab-actca.
set_field_value: '0294' 'P0294-DEPRT' data_tab-deprt.
set_field_value: '0294' 'P0294-POSIT' data_tab-posit.
set_field_value: '0294' 'P0294-BRANC' data_tab-branc.
set_field_value: '0294' 'P0294-ORDNU' data_tab-ordnu.
CONCATENATE data_tab-orddt+6(4) data_tab-orddt+3(2)
data_tab-orddt+0(2) INTO vdate.
set_field_value: '0294' 'P0294-ORDDT' vdate."data_tab-orddt.
set_field_value: '0294' 'P0294-ORDBA' data_tab-name2.
set_field_value: '0294' 'P0294-ORUNU' data_tab-orunu.
CONCATENATE data_tab-orudt+6(4) data_tab-orudt+3(2)
data_tab-orudt+0(2) INTO vdate.
set_field_value: '0294' 'P0294-ORUDT' vdate."data_tab-orddt.
set_field_value: '0294' 'P0294-ORUBA' data_tab-name3.
set_field_value: '0294' 'P0294-TLS01' data_tab-tls01.
set_field_value: '0294' 'P0294-TLS02' data_tab-tls02.
set_field_value: '0294' 'P0294-TLS03' data_tab-tls03.
set_field_value: '0294' 'P0294-TLS04' data_tab-tls04.
set_field_value: '0294' 'P0294-TLS05' data_tab-tls05.
set_field_value: '0294' 'P0294-TLS06' data_tab-tls06.
set_field_value: '0294' 'P0294-TLS07' data_tab-tls07.
* set_field_value: '0294' 'P0294-TLS08' data_tab-tls08.
CLEAR: t_return, hr_return.
CALL FUNCTION 'HR_PSBUFFER_INITIALIZE'.
CALL FUNCTION 'HR_MAINTAIN_MASTERDATA'
EXPORTING
pernr = lv_pernr
begda = v_begda " Дата мероприятия
endda = v_endda " Дата мероприятия
tclas = 'A'
actio = lv_actio
seqnr = '0'
subty = lv_subty
dialog_mode = '1'
IMPORTING
return = t_return
hr_return = hr_return
TABLES
proposed_values = proposed_values
modified_keys = mod_keys.
IF sy-subrc <> 0.
l_err_sav = 'X'.
WRITE: / data_tab-numbr, data_lin-pernr, data_lin-fio,
data_tab-begda, data_tab-endda, data_tab-name1.
ENDIF.
Данные вкладки "Трудовая книжка" легли отлично.
А голову сломал я с галочками вкладки "Учет стажа". Никаких ошибок в ходе выполнения система не показывает, но похоже игнорирует вх. данные для полей TLS*.
Никто не сталкивался? Или может хотя бы идеи какие посоветуете? У меня их было мало и они кончились
Заранее благодарен всем кто отзовется.