User Popup Message - CALL 'ThUsrInfo' ID 'OPCODE'

1586 Views

Hi experts,

I'm playing around with popup messages.

I know function TH_POPUP - everyting's working and fine.

Now I want to do this "part of coding" in my own program - then I can change the text of the popup a little bit.

What I am doing:

REPORT ztest_user_popup.

INCLUDE tskhincl.

DATA: client LIKE sy-mandt,

user LIKE sy-uname,

new_message(512),

message_len LIKE sy-index,

loc_cut_blanks TYPE x VALUE 0.

new_message = 'TEST'.

client = sy-mandt.

user = sy-uname

message_len = STRLEN( new_message ).

loc_cut_blanks = 0.

CALL 'ThUsrInfo' ID 'OPCODE' FIELD opcode_send_pop_up "#EC CI_CCALL

ID 'CLIENT' FIELD client

ID 'USR' FIELD user

ID 'MSG' FIELD new_message

ID 'MSG_LEN' FIELD message_len

ID 'CUT_BLANKS' FIELD loc_cut_blanks.

BREAK-POINT.

Problem is - nothing is happening! At the break-point at the end, sy-subrc = 1.

What am I doing wrong? Any ideas?

Thanks

Michael