ABAP中的校验

1.校验一定在精准

我当时就只是写了wa_item-esostu = '3’来校验，这不是对于某一行做校验，是对整个表来做了校验。
对某一行做校验，比如这一行有4列，则应全写出来. 测试有时候可以一个一个做.

          IF wa_item-esostu = '3' AND wa_item-ppapstu IS NOT INITIAL AND wa_item-ppapno IS NOT INITIAL AND wa_item-ppapdate IS NOT INITIAL .

            MESSAGE s001(00) WITH 'ESO状态为拒绝' DISPLAY LIKE 'E'.
            zbz = 'X'.
            EXIT.

          ENDIF.

2. 关于时间的校验

   IF ( wa_item-esodate EQ '' OR WA_item-esodate EQ '00000000' ) OR ( wa_item-esono EQ '' ) OR ( wa_item-esostu EQ '' ) .
            MESSAGE s001(00) WITH 'ESO数据需要填写完整' DISPLAY LIKE 'E' .
            zbz = 'X'.
            EXIT.

          ENDIF.

or

          DATA(date) = CONV d( wa_item-esodate ).
          IF    date = 0 .
            MESSAGE s001(00) WITH 'ESO数据需要填写完整' DISPLAY LIKE 'E' .
            zbz = 'X'.
            EXIT.

          ENDIF.

3.总结

1. 尽量不要用 IS INITIAL 这种语句,用EQ;
2. 要么把日期强制转换成字符;

4.参考

资料