代码实例 DATA lv_char TYPE c LENGTH 24.
DATA lt_prps TYPE STANDARD TABLE OF prps.
TYPES:BEGIN OF typ_prps,
pspnr TYPE prps-pspnr,
posid TYPE prps-posid_edit,
END OF typ_prps.
DATA: lt_tmp TYPE STANDARD TABLE OF typ_prps,
ls_tmp TYPE typ_prps.
SELECT *
INTO TABLE @lt_prps
FROM prps
UP TO 10 ROWS.
WRITE:/ '内码转外码------>'.
LOOP AT lt_prps ASSIGNING FIELD-SYMBOL(<fs_prps>).
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
EXPORTING
input = <fs_prps>-pspnr
IMPORTING
output = lv_char.
WRITE:/ |内码:{ <fs_prps>-pspnr } 外码:{ lv_char } |.
* ls_tmp-pspnr = <fs_prps>-pspnr.
* ls_tmp-posid = lv_char.
* APPEND ls_tmp TO lt_tmp.
lt_tmp = VALUE #( BASE lt_tmp
( pspnr = <fs_prps>-pspnr
posid = lv_char )
).
CLEAR lv_char.
ENDLOOP.
WRITE:/ '外码转内码------>'.
LOOP AT lt_tmp ASSIGNING FIELD-SYMBOL(<fs_tmp>).
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_INPUT'
EXPORTING
input = <fs_tmp>-posid
IMPORTING
output = lv_char.
WRITE:/ |外码:{ <fs_tmp>-posid } 内码:{ lv_char } |.
CLEAR lv_char.
ENDLOOP.
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· TypeScript + Deepseek 打造卜卦网站:技术与玄学的结合
· 阿里巴巴 QwQ-32B真的超越了 DeepSeek R-1吗?
· 【译】Visual Studio 中新的强大生产力特性
· 【设计模式】告别冗长if-else语句:使用策略模式优化代码结构
· AI与.NET技术实操系列(六):基于图像分类模型对图像进行分类