设为首页 收藏本站
查看: 1076|回复: 0

[经验分享] SAP 中负号前移的问题

[复制链接]

尚未签到

发表于 2015-9-18 07:40:01 | 显示全部楼层 |阅读模式
  SAP负号的显示都是在数字的后面如23-这样来表示负数,和我们的习惯都不一样。如何让负数显示的时候负号在最前了?个人想到了一个简单的方法,不知道有没有更简单的。就是用字符显示数据,然后循环右移负号将其靠前显示。但是注意如果是p类型的赋值给c类型,后面会有'.000'。c类型还会有空格存在,所以要注意清楚空格和后缀0.示例代码如下:
  *数量
l_amount = wa-erfmg.
  *负号左移消除0
SHIFT l_amount up to '-' left  CIRCULAR .
SHIFT l_amount RIGHT DELETING TRAILING '.0'.
condense l_amount.
  首先要让负号显示在最前,这里用的是左移直到出现负号,如果没有负号的话是不会移动的。去除掉末尾的0让其整数显示,然后在去除空格,这样就可以实现负号前移了。
  系统也有标准函数来完成这个功能,CLOI_PUT_SIGN_IN_FRONT。
  FUNCTION CLOI_PUT_SIGN_IN_FRONT.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"  CHANGING
*"     VALUE(VALUE) TYPE  CLIKE
*"----------------------------------------------------------------------
  DATA: TEXT1(1) TYPE C.
  SEARCH VALUE FOR '-'.
  IF SY-SUBRC = 0 AND SY-FDPOS <> 0.
    SPLIT VALUE AT '-' INTO VALUE TEXT1.
    CONDENSE VALUE.
    CONCATENATE '-' VALUE INTO VALUE.
  ELSE.
    CONDENSE VALUE.
  ENDIF.
  ENDFUNCTION.
  这个函数也非常好懂,就是查找负号,找到后换个顺序就可以了。
  参考:http://blog.iyunv.com/donkey2004112103/archive/2009/05/23/4210686.aspx
  我经过测试,得到一种比较简单也比较实用的方法。将负号前移之后将金额字段加上千分位符。
  先在内表中定义一个字符型字段dmbtrc length 16,再定义一个中间金额变量,为了不改变原内表中的值。.
  在内表的LOOP中执行以下操作。
  mid_dmbtr = wa-dmbtr.
  IF mid_dmbtr < 0 .
    mid_dmbtr = - mid_dmbtr.
    WRITE mid_dmbtr TO wa_hkont-dmbtrc.
    CONDENSE wa_hkont-dmbtrc.
    CONCATENATE '-' wa_hkont-dmbtrc INTO wa_hkont-dmbtrc.
    mid_dmbtr  = - mid_dmbtr.
  ELSE.
    WRITE mid_dmbtr TO wa_hkont-dmbtrc.
  ENDIF.
  modify itab from wa index sy-tabix.
  实现的方法比较多,根据个人爱好选择就可以了。

运维网声明 1、欢迎大家加入本站运维交流群:群②:261659950 群⑤:202807635 群⑦870801961 群⑧679858003
2、本站所有主题由该帖子作者发表,该帖子作者与运维网享有帖子相关版权
3、所有作品的著作权均归原作者享有,请您和我们一样尊重他人的著作权等合法权益。如果您对作品感到满意,请购买正版
4、禁止制作、复制、发布和传播具有反动、淫秽、色情、暴力、凶杀等内容的信息,一经发现立即删除。若您因此触犯法律,一切后果自负,我们对此不承担任何责任
5、所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其内容的准确性、可靠性、正当性、安全性、合法性等负责,亦不承担任何法律责任
6、所有作品仅供您个人学习、研究或欣赏,不得用于商业或者其他用途,否则,一切后果均由您自己承担,我们对此不承担任何法律责任
7、如涉及侵犯版权等问题,请您及时通知我们,我们将立即采取措施予以解决
8、联系人Email:admin@iyunv.com 网址:www.yunweiku.com

所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其承担任何法律责任,如涉及侵犯版权等问题,请您及时通知我们,我们将立即处理,联系人Email:kefu@iyunv.com,QQ:1061981298 本贴地址:https://www.yunweiku.com/thread-115118-1-1.html 上篇帖子: SAP新建开发类 下篇帖子: 有效地查找SAP增强点
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

扫码加入运维网微信交流群X

扫码加入运维网微信交流群

扫描二维码加入运维网微信交流群,最新一手资源尽在官方微信交流群!快快加入我们吧...

扫描微信二维码查看详情

客服E-mail:kefu@iyunv.com 客服QQ:1061981298


QQ群⑦:运维网交流群⑦ QQ群⑧:运维网交流群⑧ k8s群:运维网kubernetes交流群


提醒:禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.


本站大部分资源是网友从网上搜集分享而来,其版权均归原作者及其网站所有,我们尊重他人的合法权益,如有内容侵犯您的合法权益,请及时与我们联系进行核实删除!



合作伙伴: 青云cloud

快速回复 返回顶部 返回列表