Доброго дня всем!

Необходимо в программе осуществить присвоение компоентов операциям техкарты. Использую стандартный ФМник CP_BD_DIRECT_INPUT_PLMZ, но присвоение компонентов не происходит, не могу понять почему.
Вот пример кода:
DATA:
ls_plmz TYPE PLMZ_DI,
lt_plmz TYPE TABLE OF PLMZ_DI,
lt_MFIELDRES TYPE TABLE OF MFIELDRES,
lt_ERROR_DI TYPE TABLE OF ERROR_DI,
lt_CMFMSG TYPE TABLE OF CMFMSG,
ls_ERROR_DI TYPE ERROR_DI.



ls_plmz-MANDT = '300'.
ls_plmz-PLNTY = 'N'.
ls_plmz-PLNNR = '50000063'.
ls_plmz-ZUONR = '1'.
ls_plmz-ZAEHL = '1'.
ls_plmz-PLNAL = '02'.
ls_plmz-PLNFL = '000000'.
ls_plmz-PLNKN = '00000001'.
ls_plmz-STLTY = 'M'.
ls_plmz-STLNR = '00000198'.
ls_plmz-STLAL = '01'.
ls_plmz-STLKN = '00000001'.
ls_plmz-STLTY_W = 'M'.
ls_plmz-STLNR_W = '00000198'.
ls_plmz-STLAL_W = '01'.
ls_plmz-MENGE = '1.000'.
append ls_plmz to lt_plmz.

CALL FUNCTION 'CP_BD_DIRECT_INPUT_PLMZ' "
IMPORTING
error_di_exp = ls_ERROR_DI
TABLES
plmz_di_tab = lt_plmz
null_field_tab = lt_MFIELDRES
error_di_tab = lt_ERROR_DI
error_tab = lt_CMFMSG
EXCEPTIONS
NO_INZ = 1.
COMMIT WORK AND WAIT.

P.S. Может я не все поля заполняю или нужно использовать другой ФМник?

Нашел решение. Компоненты можно присвоить с помощью ФМника CP_BD_DIRECT_INPUT_PLAN.
Выкладываю рабочий пример кода:
DATA:
ls_PLMZ_DI TYPE PLMZ_DI,

lt_PLKO_DI TYPE TABLE OF PLKO_DI,
lt_MAPL_DI TYPE TABLE OF MAPL_DI,
lt_PLPO_DI TYPE TABLE OF PLPO_DI,
lt_PLFL_DI TYPE TABLE OF PLFL_DI,
lt_PLMZ_DI TYPE TABLE OF PLMZ_DI,
lt_PLFH_DI TYPE TABLE OF PLFH_DI,
lt_TXT_OBJ_DI TYPE TABLE OF TXT_OBJ_DI,
lt_TLINE TYPE TABLE OF TLINE,
lt_RCUOB1_DI TYPE TABLE OF RCUOB1_DI,
lt_RCUOB1 TYPE TABLE OF RCUOB1,
lt_OBJ_NFIELD TYPE TABLE OF OBJ_NFIELD,
lt_ERROR_DI TYPE TABLE OF ERROR_DI,
lt_CMFMSG TYPE TABLE OF CMFMSG,

ls_ERROR_DI TYPE ERROR_DI,
ls_PLNNR TYPE PLNNR,

ls_RC271_DI TYPE RC271_DI,
ls_RC27M_DI TYPE RC27M_DI,
ls_SAVE_DI TYPE SAVE_DI.

ls_RC271_DI-TCODE = 'CA02'.
ls_RC271_DI-STTAG = '20111017'.
ls_RC271_DI-PLNNR = '50000063'.
ls_RC271_DI-PLNAL = '01'.

ls_PLMZ_DI-ACTTYP = 'H'.
ls_PLMZ_DI-VORNR = '0510'.
ls_PLMZ_DI-STLAN = '01'.
ls_PLMZ_DI-PLNTY = 'N'.
ls_PLMZ_DI-PLNNR = '50000063'.
"ls_PLMZ_DI-ZUONR = '00000001'.
"ls_PLMZ_DI-ZAEHL = '00000001'.
ls_PLMZ_DI-DATUV = '20111017'.
ls_PLMZ_DI-PLNAL = '02'.
ls_PLMZ_DI-PLNFL = '000000'.
ls_PLMZ_DI-PLNKN = '00000003'.
ls_PLMZ_DI-STLTY = 'M'.
ls_PLMZ_DI-STLNR = '00000198'.
ls_PLMZ_DI-STLAL = '01'.
ls_PLMZ_DI-STLKN = '00000002'.
ls_PLMZ_DI-WERK_STL = '5800'.
ls_PLMZ_DI-STLTY_W = 'M'.
ls_PLMZ_DI-STLNR_W = '00000198'.
ls_PLMZ_DI-STLAL_W = '01'.
ls_PLMZ_DI-MATNR = '100000000000000000'.
ls_PLMZ_DI-WERKS = '5800'.
ls_PLMZ_DI-BOMAT = '100100100100100100'.

append ls_PLMZ_DI to lt_PLMZ_DI.

CALL FUNCTION 'CP_BD_DIRECT_INPUT_PLAN'
EXPORTING
rc271_di_imp = ls_RC271_DI " rc271_di Group to be processed
save_di_imp = ls_SAVE_DI " save_di Flags
IMPORTING
error_di_exp = ls_ERROR_DI " error_di Error status record
plnnr_exp = ls_PLNNR " plnnr Group
TABLES
plko_di_tab = lt_PLKO_DI " plko_di Table of headers to be copied
mapl_di_tab = lt_MAPL_DI " mapl_di Table of material allocations to task list to be copied
plpo_di_tab = lt_PLPO_DI " plpo_di Table of operations to be copied
plfl_di_tab = lt_PLFL_DI " plfl_di Table of sequences to be copied
plmz_di_tab = lt_PLMZ_DI " plmz_di Table of component allocations to be copied
plfh_di_tab = lt_PLFH_DI " plfh_di Table of production resources/tools to be copied
text_obj_di_tab = lt_TXT_OBJ_DI " txt_obj_di Table of text objects to be copied
text_di_tab = lt_TLINE " tline Table of text lines to be copied
KNOWL_ALLOC_OBJ_DI_TAB = lt_RCUOB1_DI
KNOWL_ALLOC_DI_TAB = lt_RCUOB1
obj_null_field_tab = lt_OBJ_NFIELD " obj_nfield Table of fields not to be copied
error_plan_di_tab = lt_ERROR_DI " error_di Table of error status records
error_plan_tab = lt_CMFMSG

EXCEPTIONS
NO_INZ = 1 " " cmfmsg Table of error messages
.
COMMIT WORK AND WAIT.