Success is best when it's shared.
能一起分享成功的喜悦才是最美好的时刻。
1
程序效果
2
源码分享
*&\----------------------------------------------------------------------
*& 14\. SEGMENT 关键字 理解:字符分割
*&\----------------------------------------------------------------------
*& 语法:... segment( val = text index = idx [sep|space = delim] ) ...
*&\----------------------------------------------------------------------
DATA lv_str TYPE string VALUE '2023/12/27' .
DATA ( lv_year ) = segment ( val = lv_str index = 1 sep = '/').
WRITE : / lv_year .
TRY .
DATA ( lv_inva_index ) = segment ( val = lv_str index = 4 sep ='/' ).
CATCH cx_sy_strg_par_val INTO DATA ( exc ).WRITE : / exc -> get_text ( ).
ENDTRY .DO .
TRY .
DATA ( lv_value ) = segment ( val = lv_str index = sy \- indexsep = '/' ).
WRITE : / lv_value .
CATCH cx_sy_strg_par_val INTO exc .WRITE : / exc -> get_text ( ).
EXIT .
ENDTRY .
ENDDO .3
AI解释
仅供参考
这段ABAP代码主要介绍了ABAP中新引入的SEGMENT关键字的用法,SEGMENT 关键字用于在 ABAP
中对字符串进行分割操作。它可以根据指定的分隔符或空格将字符串拆分成多个部分,并通过索引访问这些部分。
** 关键点: **
• ` val ` :指定要分割的字符串。
• ` index ` :指定要获取的分割后的部分的索引。
• ` sep|space ` :可选项,指定分隔符,如果不提供,默认为单个空格。可以使用 ` sep ` 或 ` space ` 两者之一。
** 示例解释: **
• ` lv_str ` 是一个字符串,通过 ` segment ` 关键字按照 ` / ` 分割,取第一个部分(索引为 1),即年份。
• 使用 ` TRY ... CATCH ` 块处理异常情况,当指定的索引超过字符串的分段数量时,抛出 ` cx_sy_strg_par_val ` 异常。
• 使用 ` DO ... END DO ` 循环处理多个分段,通过 ` sy-index ` 访问每个部分,按照 ` / ` 分割字符串,逐个输出。如果索引超出实际分段数量,捕获异常并退出循环。
以上是今日分享,希望对你有所帮助~~~
欢迎点赞、留言、分享
往期推荐
[ ABAP 新语法-LET
](https://mp.weixin.qq.com/s?__biz=Mzg3OTE2Njg0OQ==&mid=2247495544&idx=1&sn=11a10fc7f45113282e9b0e600c49e9e8&chksm=cf0a3b96f87db280c12b7c18df0823a4207c9d52b56b9d773135e12d6173c9636ce091a79cf4&scene=21#wechat_redirect)
[ ABAP 新语法-REDUCE
](https://mp.weixin.qq.com/s?__biz=Mzg3OTE2Njg0OQ==&mid=2247495646&idx=1&sn=370e6863e1c40e7adfd42df62b799993&chksm=cf0a3b30f87db226babd5181e59cc61d9aebb6e759093c1c408fb22f24e5680fca2027db1b59&scene=21#wechat_redirect)
[ ABAP 新语法-FILTER
](https://mp.weixin.qq.com/s?__biz=Mzg3OTE2Njg0OQ==&mid=2247495693&idx=1&sn=505aee012a4e71e200af681d14994f44&chksm=cf0a24e3f87dadf5039dd84f5f62184326d7b59cb803140bf4ce4067bfbb0bc9dd6018d4efb2&scene=21#wechat_redirect)
[ ABAP 新语法-GROUP BY
](https://mp.weixin.qq.com/s?__biz=Mzg3OTE2Njg0OQ==&mid=2247495701&idx=1&sn=8b5959e457fdbd665598bf30b6e441a5&chksm=cf0a24fbf87daded579245ffa24099fcbe71400810fe25a02b632aca320bf095372eb2505d1e&scene=21#wechat_redirect)
点个 在看 你最好看