TR_REQUEST_CHOICE - Adding entries to task

[Former Member]

Hi Experts,

I tried to save custom table entries in to a task of a TR, using the below Function modules.

TR_REQUEST_CHOICE and TR_APPEND_TO_COMM_OBJS_KEYS. But i am not able to do so. Getting errors.

For the 1st function module i got an error - invalid_request

for the 2nd got KEY_CHECK_KEYSYNTAX_ERROR

I dont know what i am doing wrong while passing tables or entries to FM. Could anyone please help me.

wa_e071-pgmid = wa_e071k-pgmid = 'R3TR'.

wa_e071-object = wa_e071k-object = 'TABU'.

wa_e071-obj_name = wa_e071k-objname = lv_tabname.

wa_e071-objfunc = 'K' .

wa_e071k-mastertype = 'TABU' .

wa_e071k-mastername = lv_tabname.

MOVE ls_e071k-tabkey TO wa_e071k-tabkey.

APPEND wa_e071k TO i_e071k. APPEND wa_e071 TO i_e071.

Is there anything I missed out please help me.

[marcin_cholewczuk]

Hi,

You are passing request number (parmaeter IV_REQUEST), rigth?

BR

Marcin Cholewczuk

[Former Member]

Hi,

Yes I am passing.

CALL FUNCTION 'TR_REQUEST_CHOICE'

EXPORTING

IV_SUPPRESS_DIALOG = 'X'

IV_REQUEST_TYPES = TRFUNCTION

• IV_CLI_DEP = ' '

IV_REQUEST = TRKORR

IT_E071 = IV_E071

IT_E071K = IV_E071

• IV_LOCK_OBJECTS = ' '

• IV_TITLE =

• IV_START_COLUMN = 3

• IV_START_ROW = 7

• IV_WITH_ERROR_LOG = 'X'

IV_NO_OWNER_CHECK = 'X'

• IMPORTING

• ES_REQUEST =

EXCEPTIONS

INVALID_REQUEST = 1

INVALID_REQUEST_TYPE = 2

USER_NOT_OWNER = 3

NO_OBJECTS_APPENDED = 4

ENQUEUE_ERROR = 5

CANCELLED_BY_USER = 6

RECURSIVE_CALL = 7

OTHERS = 8

.

[JoffyJohn]

loop at it_jbdexprelpos into wa_jbdexprelpos.

wa_e071k-pgmid = 'R3TR'.

wa_e071k-object = 'TABU'.

wa_e071k-objname = 'JBDEXPRELPOS'.

wa_e071k-as4pos = sy-tabix.

wa_e071k-mastertype = 'TDAT'.

wa_e071k-mastername = 'JBD_CHGPTR'.

wa_e071k-tabkey = wa_jbdexprelpos.

append wa_e071k to it_e071k.

endloop.

call function 'TR_GET_REQUEST_TYPE'

exporting

iv_pgmid = 'R3TR'

iv_object = 'TABU'

iv_obj_name = 'JBDEXPRELPOS' "example for an object

importing

ev_request_type = lv_request_type

• ev_task_type =

ev_tarsystem = lv_tarsystem " target system of object

exceptions

no_request_needed = 1

invalid_object = 2

system_error = 3.

if sy-subrc <> 0.

message id sy-msgid type sy-msgty number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

else.

CALL FUNCTION 'TR_REQUEST_CHOICE'

EXPORTING

• IV_SUPPRESS_DIALOG = ' '

IV_REQUEST_TYPES = lv_request_type

• IV_CLI_DEP = ' '

• IV_REQUEST = ' '

• IT_E071 =

IT_E071K = it_e071k

• IV_LOCK_OBJECTS = ' '

• IV_TITLE =

• IV_START_COLUMN = 3

• IV_START_ROW = 7

• IV_WITH_ERROR_LOG = 'X'

IMPORTING

ES_REQUEST = l_request

EXCEPTIONS

INVALID_REQUEST = 1

INVALID_REQUEST_TYPE = 2

USER_NOT_OWNER = 3

NO_OBJECTS_APPENDED = 4

ENQUEUE_ERROR = 5

CANCELLED_BY_USER = 0

RECURSIVE_CALL = 7

OTHERS = 8.

[Former Member]

Hi John,

Thanks you so much for your reply. Your tips was so useful.