ABAP 新语法 substring 截取字符串

ABAP 新语法 substring 截取字符串IFcb_01EQ’X’.LOOPATgt_outINTOgs_out.SELECTSINGLEbelnrFROMbkpfASt1WHEREsubstring(t1~awkey,1,10)=@gs_out-mblnrANDsubstring(t1~awkey,11,4)=@gs_out-mjahrINTO@gs_out-belnr.

大家好,又见面了,我是你们的朋友全栈君。

IF cb_01 EQ 'X' .
    LOOP AT gt_out INTO gs_out .
      SELECT SINGLE belnr
        FROM bkpf AS t1
        WHERE substring( t1~awkey , 1, 10 )  = @gs_out-mblnr
        AND   substring( t1~awkey , 11, 4 )  = @gs_out-mjahr
        INTO @gs_out-belnr .
        MODIFY gt_out from gs_out .
    ENDLOOP .
  ENDIF .
"(1,10)表示从第一位开始取,取到第十位。
 

"1.截取字符
select t1~matnr,
       werks,
       charg,
       cuobj
  from mchb as t1
  left outer join inob as t2
  on substring( t2~objek , 1, 18 )  = t1~matnr  "1-18位 是物料号
  and substring( t2~objek, 41,10 )  = t1~charg  "41~50位 是批次
  where t2~klart = '023'
  into corresponding fields of table @lt_mchb.   

注意: into corresponding fields of table @lt_mchb.   必须放在最后面

2 replace ,但是B不能为空白 语法和1一样

REPLACE( bseg~zuonr , 'A','B' )  替换成B  

3 去掉字符(其他语言是去空格,这个可以去掉去空格,去a都可以)

 where LTRIM( RTRIM( bseg~zuonr,' ' ),' ' )  = '暂存'    
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。

发布者:全栈程序员-用户IM,转载请注明出处:https://javaforall.cn/142600.html原文链接:https://javaforall.cn

【正版授权,激活自己账号】: Jetbrains全家桶Ide使用,1年售后保障,每天仅需1毛

【官方授权 正版激活】: 官方授权 正版激活 支持Jetbrains家族下所有IDE 使用个人JB账号...

(0)


相关推荐

发表回复

您的电子邮箱地址不会被公开。

关注全栈程序员社区公众号