Chinaunix首页 | 论坛 | 博客
  • 博客访问: 256471
  • 博文数量: 123
  • 博客积分: 2315
  • 博客等级: 大尉
  • 技术积分: 1827
  • 用 户 组: 普通用户
  • 注册时间: 2007-05-03 14:25
文章分类

全部博文(123)

文章存档

2012年(11)

2011年(3)

2010年(3)

2009年(18)

2008年(88)

我的朋友

分类:

2008-05-22 11:19:47

PERFORM change_qty USING l_srqty
CHANGING it_inv-srqty.

FORM change_qty USING p_qty
CHANGING p_qty1.
p_qty1 = p_qty.
SHIFT p_qty1 LEFT DELETING LEADING ' '.
SHIFT p_qty1 UP TO '-' LEFT CIRCULAR.
CONDENSE p_qty1 NO-GAPS.
ENDFORM. " change_qty

目的:将字符串尾的负号放在字符串首
CALL FUNCTION 'CLOI_PUT_SIGN_IN_FRONT'
CHANGING
value = itab-amunt.

阅读(1014) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~