*&---------------------------------------------------------------------*
*& Include ZXCSAU04
*&---------------------------------------------------------------------*
SELECT SINGLE KUNNR INTO L_KUNNR FROM KNMT WHERE MATNR = MAT_TO_BOM-MATNR.
SELECT SINGLE NAME1 NAME2 INTO (L_NAME1, L_NAME2) FROM KNA1 WHERE KUNNR = L_KUNNR.
CONCATENATE L_NAME1 L_NAME2 INTO L_CTMNAME.