ABAP中的系統變數SY-INDEX與SY-TABIX

來源:互聯網
上載者:User

系統變數SY-INDEX與SY-TABIX是用來記錄迴圈的次數或者索引的,不同的是SY-INDEX在DO....ENDDO中是有效,而SY-TABIX在LOOP....ENDLOOP中及READ內表時擷取相應的索引。

  DATA:BEGIN OF STUDENT OCCURS 0,

         NAME(10) TYPE C,

         AGE TYPE I,

       END OF STUDENT.

     

  DATA DENT LIKE LINE OF STUDENT.

     

  STUDENT-NAME = 'JACK'.

  STUDENT-AGE = 20.

  APPEND STUDENT.


  STUDENT-NAME = 'JIM'.

  STUDENT-AGE = 25.

  APPEND STUDENT.


  STUDENT-NAME = 'TOMMY'.

  STUDENT-AGE = 28.

  APPEND STUDENT.


  STUDENT-NAME = 'BUSHI'.

  STUDENT-AGE = 20.

  APPEND STUDENT.


  STUDENT-NAME = 'LILY'.

  STUDENT-AGE = 26.

  APPEND STUDENT.


  STUDENT-NAME = 'ALEX'.

  STUDENT-AGE = 28.

  APPEND STUDENT.


  WRITE: '1.LOOP迴圈'.

  WRITE: / '-----------------------------------------------'.

  LOOP AT STUDENT.

  

    WRITE: / 'SY-INDEX=',SY-INDEX LEFT-JUSTIFIED, "LEFT-JUSTIFIED  輸出向靠左對齊

             'SY-TABIX=',SY-TABIX LEFT-JUSTIFIED,

             'NAME=',STUDENT-NAME LEFT-JUSTIFIED,

             'AGE=',STUDENT-AGE LEFT-JUSTIFIED.

  ENDLOOP.


  WRITE: / '-----------------------------------------------'.

  WRITE: / '2.READ INTERNAL TABLE'.

  WRITE: / '-----------------------------------------------'.

  READ TABLE STUDENT INTO DENT WITH KEY NAME = 'ALEX'. "按具體欄位值讀取內表

  WRITE: / 'SY-INDEX=',SY-INDEX LEFT-JUSTIFIED,

           'SY-TABIX=',SY-TABIX LEFT-JUSTIFIED, "讀取內表時,返回相應資料在內表中的索引

           'NAME=',DENT-NAME LEFT-JUSTIFIED,

           'AGE=',DENT-AGE LEFT-JUSTIFIED.



  READ TABLE STUDENT INTO DENT WITH KEY NAME = 'BUSHI'. "按具體欄位值讀取內表

  WRITE: / 'SY-INDEX=',SY-INDEX LEFT-JUSTIFIED,

           'SY-TABIX=',SY-TABIX LEFT-JUSTIFIED,

           'NAME=',DENT-NAME LEFT-JUSTIFIED,

           'AGE=',DENT-AGE LEFT-JUSTIFIED.

  CLEAR SY-TABIX.


  WRITE: / '-----------------------------------------------'.

  WRITE: / '3.DO...ENDDO'.

  WRITE: / '-----------------------------------------------'.


  DO 5 TIMES.

    WRITE:/ 'SY-INDEX=',SY-INDEX LEFT-JUSTIFIED,

            'SY-TABIX=',SY-TABIX LEFT-JUSTIFIED.

  ENDDO.


  WRITE: / '-----------------------------------------------'.

  

  從上面的測試例子中,我們不難看出結果。嘎嘎。。

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.