帮我用abap写一个冒泡排序

下面是一个简单的ABAP程序，用于实现冒泡排序算法：

REPORT ZBUBBLE_SORT.

DATA: tab TYPE TABLE OF i,
      n TYPE i,
      temp TYPE i,
      i TYPE i,
      j TYPE i.

* 初始化数据
n = 10.
DO n TIMES.
  APPEND sy-index TO tab.
ENDDO.

* 冒泡排序
DO n - 1 TIMES.
  DO n - i - 1 TIMES.
    IF tab[ j ] > tab[ j + 1 ].
      temp = tab[ j ].
      tab[ j ] = tab[ j + 1 ].
      tab[ j + 1 ] = temp.
    ENDIF.
  ENDDO.
ENDDO.

* 输出结果
LOOP AT tab INTO i.
  WRITE: / i.
ENDLOOP.

该程序首先创建一个包含10个整数的表，然后使用冒泡排序算法对表进行排序。最后，程序输出排序后的结果。