zoukankan      html  css  js  c++  java
  • ABAP 调用程序时获取的数量,金额和日期字段会出现 逗号,-,负号等非法字段,所需要进行转化

    金额和数量转换,有些为负的需要先把负号去掉。

     DATA  l_dcpfm LIKE usr01-dcpfm.  

    SELECT SINGLE dcpfm INTO l_dcpfm
      FROM usr01
      WHERE bname = sy-uname.

      IF lv_string CS '-'.
                      SPLIT  lv_string AT '-' INTO gs_out-erfmg_c lv_string2.
                    ELSE.
                      gs_out-erfmg_c = lv_string.
                    ENDIF.
                    CALL FUNCTION 'UNITS_STRING_CONVERT'
                      EXPORTING
                        units_string = gs_out-erfmg_c
                        dcpfm        = l_dcpfm    "此时为X
    *                   MLLN         = 'M'
    *                   TSND         = 'T'
                      IMPORTING
                        units        = gs_out-erfmg
                      EXCEPTIONS
                        invalid_type = 1
                        OTHERS       = 2.
                    IF lv_string CS '-'.
                      gs_out-erfmg = 0 - gs_out-erfmg.
                    ENDIF.

    日期转换
                    CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'
                      EXPORTING
                        date_external            = gs_out-budat_c
    *                   ACCEPT_INITIAL_DATE      =
                      IMPORTING
                        date_internal            = gs_out-budat
                      EXCEPTIONS
                        date_external_is_invalid = 1
                        OTHERS                   = 2.
                    IF sy-subrc = 0.

                    ENDIF.

    闫默涵
  • 相关阅读:
    SQL SERVER数据库大型应用解决方案总结
    SQL Server 2005利用分区实现海量数据处理实例
    php验证码类
    软件开发项目进度控制浅谈
    栈和队列
    .Net多线程总结
    Silverlight 3 UI类结构
    C#全角半角转换函数
    转Silverlight Navigation(多页面切换、传值)
    Silverlight 学习笔记——应用程序模型
  • 原文地址:https://www.cnblogs.com/yanmohan/p/14293137.html
Copyright © 2011-2022 走看看