ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 字符串

字符串

原创 Linux操作系统 作者:TerryWangYR 时间:2008-05-18 16:24:57 0 删除 编辑
 

1.  字符串前補0   

  CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

         EXPORTING

              input  = itbak-matnr   字符串

         IMPORTING

              output = tmp_matnr.  新字符串,補0位數与新字符串定義位數相關

 

 

2.  返回字符串類型

        CALL FUNCTION 'NUMERIC_CHECK'

             EXPORTING

                  STRING_IN  = FIELDS-VALUE   字符串

             IMPORTING

                  STRING_OUT = NUMC_VALUE

                  HTYPE      = HTYPE.   類型

 

3.  去掉字符串前面0.

CONVERSION_EXIT_ALPHA_OUTPUT

 

4.            STRING_SPLIT_AT_POSITION:字符串分拆(漢字)

 

5. 將字串尾的負號放在字串首

CALL FUNCTION 'CLOI_PUT_SIGN_IN_FRONT'

     CHANGING

          value   =

     exceptions

          OTHERS  = 1.

6.將數字轉成文字

CALL FUNCTION 'SPELL_AMOUNT'          

          EXPORTING                             

              AMOUNT    = REGUD-WEFIW(2)        

              CURRENCY  = ' '                   

              FILLER    = ' '                       

              LANGUAGE  = SY-LANGU                  

          IMPORTING                                 

              IN_WORDS  = D_DIA_LETRAS              

          EXCEPTIONS                                

              NOT_FOUND = 1                         

              TOO_LARGE = 2                         

              OTHERS    = 3.

7.將單位換算

DATA: value_in TYPE i VALUE 1,

     value_out TYPE i .

 

CALL FUNCTION 'UNIT_CONVERSION_SIMPLE'

    EXPORTING

         input                = value_in

         round_sign           = 'X'

         unit_in              = 'H' 

         unit_out             = 'MIN'

    IMPORTING

         Output               = value_out

    EXCEPTIONS

         Conversion_not_found = 01

         Division_by_zero     = 02

         input_invalid        = 03.

WRITE : value_out.

 

VALUE_out-à60                    

8.大小写转换

CALL FUNCTION 'STRING_UPPER_LOWER_CASE'

<!--kadov_tag{{     <!--kadov_tag{{EXPORTING

<!--kadov_tag{{          <!--kadov_tag{{DELIMITER = P_DEM

<!--kadov_tag{{          <!--kadov_tag{{STRING1 <!--kadov_tag{{  <!--kadov_tag{{= P_STR

<!--kadov_tag{{     <!--kadov_tag{{IMPORTING

<!--kadov_tag{{          <!--kadov_tag{{STRING <!--kadov_tag{{   <!--kadov_tag{{= P_STR

<!--kadov_tag{{     <!--kadov_tag{{EXCEPTIONS

<!--kadov_tag{{          <!--kadov_tag{{NOT_VALID = 1

<!--kadov_tag{{          <!--kadov_tag{{TOO_LONG <!--kadov_tag{{ <!--kadov_tag{{= 2

<!--kadov_tag{{          <!--kadov_tag{{TOO_SMALL = 3

<!--kadov_tag{{          <!--kadov_tag{{OTHERS <!--kadov_tag{{   <!--kadov_tag{{= 4.

来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/9333231/viewspace-277699/ ,如需转载,请注明出处,否则将追究法律责任。

上一篇: 日期时间
下一篇: 货币处理
请登录后发表评论 登录
全部评论

注册时间:2008-05-17

  • 博文量
    41
  • 访问量
    41223