Skip to Content
0
Jan 03, 2008 at 08:58 AM

Replace an adress mail by a variable

59 Views

Hi everybody,

Can someone tel me a module function who can help me to find an address mail from user-name. because i want to pass them to the parameters ORIGINATOR.

this is the MF who i'm using it.

P.S : I want to replace 'Prenom.Nom@Entreprise.Com' with a variable who contient the adress mail of the user.

CALL FUNCTION 'SO_OBJECT_SEND'

EXPORTING

OBJECT_HD_CHANGE = object_hd_change

OBJECT_TYPE = 'RAW'

OUTBOX_FLAG = 'X'

OWNER = w_exped

ORIGINATOR = 'Prenom.Nom@Entreprise.Com'

ORIGINATOR_TYPE = 'U'

TABLES

objcont = objcont

objhead = objhead

receivers = receivers

EXCEPTIONS

ACTIVE_USER_NOT_EXIST = 1

COMMUNICATION_FAILURE = 2

COMPONENT_NOT_AVAILABLE = 3

FOLDER_NOT_EXIST = 4

FOLDER_NO_AUTHORIZATION = 5

FORWARDER_NOT_EXIST = 6

NOTE_NOT_EXIST = 7

OBJECT_NOT_EXIST = 8

OBJECT_NOT_SENT = 9

OBJECT_NO_AUTHORIZATION = 10

OBJECT_TYPE_NOT_EXIST = 11

OPERATION_NO_AUTHORIZATION = 12

OWNER_NOT_EXIST = 13

PARAMETER_ERROR = 14

SUBSTITUTE_NOT_ACTIVE = 15

SUBSTITUTE_NOT_DEFINED = 16

SYSTEM_FAILURE = 17

TOO_MUCH_RECEIVERS = 18

USER_NOT_EXIST = 19

ORIGINATOR_NOT_EXIST = 20

X_ERROR = 21

OTHERS = 22

.

IF SY-SUBRC <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

thanks a lot

Best regards