ABAP 去除补全前导零 两种方式

复制代码
*定义ZC变量 长度为4 类型NUMC
DATA : ZC TYPE ZAH_VIEW-CONNID. 
ZC = 17.                                                "因为4位,则输出0017 自动补齐前导零

*通过关键字去除/补全前导零
SHIFT ZC LEFT DELETING LEADING '0'.                     "SHIFT去除前导零

ZC = |{ ZC ALPHA = IN }|.                               "|{ XX ALPHA = IN }| 补齐前导零

*通过函数去除/补全前导零
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'            "通过函数CONVERSION_EXIT_ALPHA_OUTPUT去除前导零
  EXPORTING
    input  = ZC
  IMPORTING
    output = ZC.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'             "通过函数CONVERSION_EXIT_ALPHA_OUTPUT补全前导零
  EXPORTING
    input  = ZC
  IMPORTING
    output = ZC.
复制代码

 

 

posted @   狂奔的蜗牛君丶  阅读(3068)  评论(0编辑  收藏  举报
相关博文:
阅读排行:
· Manus重磅发布:全球首款通用AI代理技术深度解析与实战指南
· 被坑几百块钱后,我竟然真的恢复了删除的微信聊天记录!
· 没有Manus邀请码?试试免邀请码的MGX或者开源的OpenManus吧
· 园子的第一款AI主题卫衣上架——"HELLO! HOW CAN I ASSIST YOU TODAY
· 【自荐】一款简洁、开源的在线白板工具 Drawnix
点击右上角即可分享
微信分享提示