ABAP里不用赋值操作,只用位操作实现两个整数值的交换

DATA: lv1 TYPE int4 value 30,
      lv2 TYPE int4 value 21.

FIELD-SYMBOLS: <lv1> TYPE x.
FIELD-SYMBOLS: <lv2> TYPE x.

ASSIGN lv1 TO <lv1> CASTING.
ASSIGN lv2 TO <lv2> CASTING.

<lv1> = <lv1> BIT-XOR <lv2>.

<lv2> = <lv1> BIT-XOR <lv2>.

<lv1> = <lv1> BIT-XOR <lv2>.

WRITE: / lv1, lv2.

要获取更多Jerry的原创文章,请关注公众号"汪子熙":

发布了6350 篇原创文章 · 获赞 621 · 访问量 100万+

猜你喜欢

转载自blog.csdn.net/i042416/article/details/103998725