BW 转换字符空格问题

早上忙了我一早上，以前写的一个季度判断的问题，

首先是调试，不断的调试DTP。让我头晕眼花。

首先关于空格问题，我自我批评，愚蠢的定义成STRING 类型，然后相互加减出现问题。应该定义成内部的日期格式，或者数字类型。

其次找到了很多ABAP日期函数，所以一并贴出来。下面就不改了。当个教训。

http://www.sapjx.com/abap-datetime-function.html#FIMA_DATE_CREATE

loop at RESULT_PACKAGE ASSIGNING <RESULT_FIELDS>  .

    CLEAR <RESULT_FIELDS>-PSTNG_DATE.

    <RESULT_FIELDS>-PSTNG_DATE = ''.

    l_date = <RESULT_FIELDS>-PSTNG_DATE+().

    l_date1 = <RESULT_FIELDS>-PSTNG_DATE+().

    year = <RESULT_FIELDS>-PSTNG_DATE+().

    if l_date = .   --错误一

      l_year = year + .   -- 错误二

    endif.

    IF '' <= l_date AND l_date <= ''.

    CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER.

      ELSEIF '' <= l_date AND l_date <= ''.

    CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER..

      ELSEIF '' <= l_date AND l_date <= ''.

    CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER..

    ELSEIF  l_date <= ''.

       CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER..

      ELSE.

       CONCATENATE l_year  '' INTO <RESULT_FIELDS>-CALQUARTER..

    ENDIF.

问题：

　　错误一

　　本来应该是 20171 ，第一季度。居然明奇妙出现了 1 这个季度。

　　　回过头来看转换里的ABAP 。

　　　发现是判断的问题，

　　 if l_date = 12.  -- 问题就在这里
　　
　　　　l_year = year + 1.

　　endif.
　　

　　 调试发现应该是用L_DATE1 ,月份，而不是月日。这是个简单问题。一下发现了。改正过来。 错误一好改

　　错误二，就比较匪夷所思了。
　　发现了 ，这一句根本没有生效

CONCATENATE l_year  '' INTO <RESULT_FIELDS>-CALQUARTER..

结果还是 2018

后来发现是

l_year = year + 1.    l_year 有空格 2018  只是看不出来 
字段 <RESULT_FIELDS>-CALQUARTER  只有五位，所以造成了这个问题。 要是改成六位 就会变成 2018 1

可以在调试里更改 成 2018 ，下面的数字就会发生变化。不一样。

更正后的代码：

loop at RESULT_PACKAGE ASSIGNING <RESULT_FIELDS>  .

    CLEAR <RESULT_FIELDS>-PSTNG_DATE.

    <RESULT_FIELDS>-PSTNG_DATE = ''.

    l_date = <RESULT_FIELDS>-PSTNG_DATE+().

    l_date1 = <RESULT_FIELDS>-PSTNG_DATE+().

    year = <RESULT_FIELDS>-PSTNG_DATE+().

    if l_date1 = .

      l_year = year + .   -- 问题就在这里
　　　   CONDENSE l_year NO-GAPS.　 --去除空格

    endif.

    IF '' <= l_date AND l_date <= ''.

    CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER.

      ELSEIF '' <= l_date AND l_date <= ''.

    CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER..

      ELSEIF '' <= l_date AND l_date <= ''.

    CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER..

    ELSEIF  l_date <= ''.

       CONCATENATE year '' INTO <RESULT_FIELDS>-CALQUARTER..

      ELSE.

       CONCATENATE l_year  '' INTO <RESULT_FIELDS>-CALQUARTER..

    ENDIF.

多去换个维度思考问题。不要过于死板。总是能解决的。

巴特西

BW 转换字符空格问题

最新文章

热门文章