Пока что нашел такое решение:
Code:
data i1000 TYPE TABLE OF p1000 WITH HEADER LINE.
i1000-PLVAR = '01'.
i1000-otype = '80'.
i1000-INFTY = '1000'.
i1000-ISTAT = '1'.
i1000-begda = '20170101'.
i1000-ENDDA = '99991231'.
i1000-short = 'Короткий текст'.
i1000-STEXT = 'Тест'.
CALL FUNCTION 'RH_GET_NEXT_NUMBER'
EXPORTING
action = 'GIVE'
ext_number = i1000-objid
otype = i1000-otype
plvar = i1000-plvar
IMPORTING
number = i1000-objid.
append i1000.
.
CALL FUNCTION 'RH_INSERT_INFTY'
EXPORTING
* FCODE = 'INSE'
vtask = 'D'
* ORDER_FLG = 'X'
* COMMIT_FLG = 'X'
* AUTHY = 'X'
* PPPAR_IMP =
* OLD_TABNR = ' '
* REPID = ' '
* FORM = ' '
* KEEP_LUPD =
* WORKF_ACTV = 'X'
tables
innnn = i1000
* ILFCODE =
EXCEPTIONS
NO_AUTHORIZATION = 1
ERROR_DURING_INSERT = 2
REPID_FORM_INITIAL = 3
CORR_EXIT = 4
BEGDA_GREATER_ENDDA = 5
OTHERS = 6
.
так же через этот ФМ создам остальные подтипы.
Есть ли какие-либо подводные камни у такого пути?