ZF_GET_STUDENT{
FUNCTION ZF_GET_STUDENT.
*"----------------------------------------------------------------------
*"*"ローカルインタフェース:
*"  IMPORTING
*"     REFERENCE(P_ID) TYPE  ZEID DEFAULT 1
*"  EXPORTING
*"     REFERENCE(PE_NAME) TYPE  ZENAME
*"  EXCEPTIONS
*"      NO_EXIST
*"----------------------------------------------------------------------

  SELECT SINGLE  NAME
    INTO PE_NAME
    FROM ZTSTU
    WHERE  ID = P_ID.
  IF SY-SUBRC = 0.
    MESSAGE S000(00)  WITH '取得成功'.
  ELSE.
    MESSAGE E000(00)   WITH '存在しません'  RAISING NO_EXIST.
  ENDIF.

ENDFUNCTION.
}