SAP Note 18014 - Mail during GR for 12-character user name

Symptom:

Key word: Output determination
Mails are not sent during the goods receipt for purchase order (output type MLGR or MLMD), if the buyer has a 12-character user name.

Cause and prerequisites

Program error.

Solution
The error is corrected in Release 2.1J or 3.0.
As an advance correction, change program LVCOMU03 as follows:

FUNCTION KOMPBME_FILL.
*"----------------------------------------------------------------------
*"Globale Schnittstelle:
*" IMPORTING
*" COM_MKPF LIKE MKPF STRUCTURE MKPF
*" COM_MSEG LIKE MSEG STRUCTURE MSEG
*" COM_T156 LIKE T156 STRUCTURE T156
*" COM_VM07M LIKE VM07M STRUCTURE VM07M
*" EXPORTING
*" COM_PBME LIKE KOMPBME STRUCTURE KOMPBME
*" TABLES
*" COM_PART STRUCTURE MSGPA
*"----------------------------------------------------------------------
DATA: BEGIN OF SO_NAME_IN. "new -> insert
INCLUDE STRUCTURE SOUD3. "new -> insert
DATA: END OF SO_NAME_IN. "new -> insert
DATA: BEGIN OF SO_NAME_OUT. "new -> insert
INCLUDE STRUCTURE SOUD3. "new -> insert
DATA: END OF SO_NAME_OUT. "new -> insert

REFRESH COM_PART.
MOVE-CORRESPONDING COM_T156 TO COM_PBME.
MOVE-CORRESPONDING COM_MSEG TO COM_PBME.
MOVE-CORRESPONDING COM_VM07M TO COM_PBME.
COM_PART-PARVW = 'MP'.
* MOVE COM_VM07M-ERNAM TO COM_PART-PARNO. "old -> delete
CLEAR SO_NAME_IN. "new -> insert
CLEAR SO_NAME_OUT. "new -> insert
MOVE COM_VM07M-ERNAM TO SO_NAME_IN-USRNAM. "new -> insert
CALL FUNCTION 'SO_NAME_CONVERT' "new -> insert
EXPORTING "new -> insert
DELETED_INCLUDED = ' ' "new -> insert
NAME_IN = SO_NAME_IN "new -> insert
IMPORTING "new -> insert
NAME_OUT = SO_NAME_OUT "new -> insert
EXCEPTIONS "new -> insert
OFFICE_NAME_NOT_EXIST = 01 "new -> insert
PARAMETER_ERROR = 02 "new -> insert
SAP_NAME_NOT_EXIST = 03 "new -> insert
USER_NOT_EXIST = 04. "new -> insert
IF SY-SUBRC EQ 0. "new -> insert
COM_PART-PARNO = SO_NAME_OUT-OCSNAM. "new -> insert
IF COM_PART-PARNO NE SPACE. "new -> insert
APPEND COM_PART. "new -> insert
ENDIF. "new -> insert
ENDIF. "new -> insert
* APPEND COM_PART. "old -> delete
PERFORM USEREXIT_KOMPBME_FILL.
PERFORM USEREXIT_KOMPBME_PARTNER.

ENDFUNCTION.