如何在ABAP项目中实现用户可选双语的文本显示功能？

1. 数据库层设计 #

• 在用户自定义表（比如ZUSER）中新增字段ZSPRAS，类型参考SY-LANGU（长度1），用于存储用户选择的语言码（如ZH=中文，EN=英文）。
• 创建多语言文本存储表ZTEXT，主键设为ZTEXTID（文本唯一标识，比如LOGIN_BTN对应登录按钮文本）+SPRAS（语言码），再添加ZTEXT字段存储具体文本内容。后续可通过SM30维护视图批量维护不同语言的文本条目。

2. 注册界面语言选择实现 #

在注册屏幕中添加下拉选择控件，绑定字段P_SPRAS：

• PBO事件填充选项：

DATA: lt_options TYPE STANDARD TABLE OF vrm_value,
      ls_option  TYPE vrm_value.

ls_option-key = 'ZH'.
ls_option-text = '中文'.
APPEND ls_option TO lt_options.

ls_option-key = 'EN'.
ls_option-text = 'English'.
APPEND ls_option TO lt_options.

CALL FUNCTION 'VRM_SET_VALUES'
  EXPORTING
    id     = 'P_SPRAS'
    values = lt_options.

• PAI事件保存选择：将P_SPRAS的值更新到用户表ZUSER的ZSPRAS字段中。

3. 登录时加载用户语言 #

用户登录验证通过后，从ZUSER表读取当前用户的ZSPRAS值，存入全局变量（如GV_SPRAS），后续所有界面文本的读取逻辑都基于该变量。

4. 界面文本动态渲染 #

在所有需要显示多语言文本的屏幕PBO事件中，根据GV_SPRAS从ZTEXT表读取对应文本：

DATA: lv_btn_text TYPE ztext-ztext.

SELECT SINGLE ztext INTO lv_btn_text
  FROM ztext
  WHERE ztextid = 'LOGIN_BTN'
    AND spras = gv_spras.

IF sy-subrc = 0.
  " 给屏幕按钮文本赋值
  screen-field = lv_btn_text.
  MODIFY SCREEN.
ENDIF.

若使用SAP标准文本对象（通过SE71/SE72创建），可调用READ_TEXT函数读取：

DATA: lt_lines TYPE STANDARD TABLE OF tline,
      lv_text  TYPE string.

CALL FUNCTION 'READ_TEXT'
  EXPORTING
    client   = sy-mandt
    id       = 'ZMYID'       " 自定义文本ID
    language = gv_spras
    name     = 'LOGIN_BTN'   " 文本名称
    object   = 'ZMYOBJ'      " 自定义文本对象
  IMPORTING
    lines    = lt_lines.

IF lt_lines IS NOT INITIAL.
  lv_text = lt_lines[ 1 ]-tdline.
ENDIF.

5. 其他场景适配 #

• 报表：在初始化阶段读取用户语言，替换报表中的静态文本内容。
• 消息提示：使用自定义消息类（SE91）维护多语言消息，调用MESSAGE时可指定语言参数，或直接基于全局语言变量自动匹配。

内容的提问来源于stack exchange，提问作者dave25