關健字是語句的第一個詞,它決定整個語句的意義,有四種不同型別的關健字 . 

1.說明性關健字 

    TYPES,DATA,TABLES,這些關健字說明定義資料型別或者說明程式可以訪問的資料物件 

    TYPES:    用來定義資料結構型別 。 

    DATA:        用來定義資料結構物件 。 

    TABLES: 用來宣告Table Work Area 的資料  。 

    -- TYPES與DATA的區別是，TYPES是用來自定義某種型別的，需要DATA語句例項化後才可以使用 

    -- DATA是用來宣告基本資料型別物件(實體變數)，對於用DATA直接定義的結構體物件(不參照其它結構型別),其同時也是一個結構型別 。 

    TYPE：  用來指定資料型態或宣告自定資料型態 。 

    LIKE：    LIKE 用在已有值的資料項 。 

    -- TYPE後面跟隨的只能是某種類(型),而LIKE後面可以跟例項物件 ； 

    -- 參照結構體物件生成內表時只能用LIKE,不能用TYPE,因為結構體物件不是型別,只是一種例項物件 ； 

    -- 參照結構型別生成內表時可以用LIKE也可以用TYPE.其中通過LIKE定義的內表直接擁有參照結構型別的元素結構； 

    -- 定義的內表只能間接擁有被參照結構型別的元素結構,結構型別不能作為內表的工作區,只有結構體物件才可以； 

    CONSTANTS ：用來宣告常數 

    STATICS   ：用來在當前程式中宣告靜態變數 ，程式結束後自動釋放記憶體 ； 

    TYPES: begin of name_type , 

                 name(20) type  c , 

                 sex(2)        type  c , 

                 age            type     i , 

                 end of name_type . 

    -- 定義了個name_type 結構體型別 。                 

    DATA: name type name_type . 

    -- 定義了個name物件，其型別為name_type . 

    data: begin of name_type , 

                name(20)    type c , 

                sex(2)        type c , 

                age                type i , 

                end fo name_type . 

    -- 定義了個name_type結構體物件。       

2.事件關健字 

    這些關健字在ABAP中定義處理塊,處理塊是當特定事件發生時進行處理的語句組 

    -- 多用於report 

    INITIALIZATION : 在選擇螢幕顯示前，對變數進行初始化賦值 

    AT SELECTION-SCREEN : 對選擇螢幕的資料輸入進行檢查 

    START-OF-SELECTION  : 選擇螢幕處理完後，資料的處理 

    TOP-OF-PAGE                    : 列表顯示啟動新頁，頁頭的輸出 

    END-OF-PAGE                    : 一頁結束時，頁尾的處理 

    AT LINE-SELECTION      : 使用者雙擊選中某行觸發該事件 

    AT PF                             : 設定自定義的選單 

    AT USER-COMMAND            : 當用戶功能健時，觸發該事件

3.控制關健字 

    條件分支 

    data flag type c value 'a' . 

    if flag = 'a' . 

        write:/'A'. 

    elseif flag = 'b'. 

      write: / 'B' . 

    else . 

      write: /'error' . 

    endif . 

    -- 每個判斷語句之後都要加句號(.) 。 

    CASE 條件分支 

    DATA:     

        TEXT1   VALUE 'X', 

        TEXT2   VALUE 'Y', 

        TEXT3   VALUE 'Z', 

        STRING  VALUE 'A'. 

    CASE STRING. 

       WHEN TEXT1. 

            WRITE: / 'String is', TEXT1. 

        WHEN TEXT2. 

            WRITE: / 'String is', TEXT2. 

        WHEN TEXT3. 

            WRITE: / 'String is', TEXT3. 

        WHEN OTHERS. 

            WRITE: / 'String is not', TEXT1, TEXT2, TEXT3. 

    ENDCASE.    

    --計次迴圈 

    DO 2 TIMES . 

        WRITE: / 'X' . 

    ENDDO . 

    DO VARYING I FROM 1 TO 10 

        S = S + I . 

    ENDDO . 

    -- 無窮迴圈 

    DO . 

        XXXX 

    ENDDO . 

    -- 條件迴圈 

    WHILE I<= 10 . 

        S = S + I . 

        I = I + 1. 

    ENDWHILE . 

    -- 使用迴圈要避免死迴圈    。        

    -- 在語句塊中至少應包含一個 EXIT、 STOP 或 REJECT 語句，以便系統能夠退出迴圈。 

    迴圈控制 

    1) CONTINUE : 跳至迴圈的下一次 。(無條件終止一次迴圈) 

             DO   3  TIMES. 

              IF  SY-INDEX = 2. 

                 CONTINUE. 

              WRITE / SY-INDEX. 

          ENDDO. 

          執行結果:  

                       1 

                       3  

   2) CHECK : 滿足check條件之後才繼續往下執行迴圈(有條件終止迴圈) 

   DO  5  TIMES. 

                  CHECK  SY-INDEX  BETWEEN  2  AND  4. 

                  WRITE  /  SY-INDEX. 

              ENDDO. 

          執行結果： 

                      2 

                      3 

                      4 

   3) EXIT :  跳離迴圈 (完全終止迴圈) 

                    DO  10  TIMES. 

                IF  SY-INDEX = 4. 

                  EXIT. 

                ENDIF 

               WRITE / SY-INDEX. 

           ENDDO. 

           執行結果: 

                        1 

                        2 

                        3                                                 

4.操作關健字

    WRITE

write 用來在螢幕上列印輸出資料。

write : ‘ 輸出內容 '’ .

write at [/] [<pos>] [<len>]

/ : 換行，下一列

pos：螢幕X座標

len: 顯示長度

write: 資料項 顯示引數

   LEFT-JUSTIFIED              資料靠左顯示 

   CENTERED                     資料靠中間顯示 

   RIGHT-JUSTIFIED            資料靠右顯示  

   UNDER <g>                    在資料項<g>的 X軸開始座標顯示 

   NO-GAP                          緊接著顯示, 不留空格 

   USING EDIT MASK <m>   使用內嵌字元顯示, 如 11:20:30 

   USING NO EDIT MASK      不使用內嵌字元 

   NO-ZERO                        數字前面 0 的部分不顯示 

   NO-SIGN                         不顯示正負號 

   DECIMALS <d>                顯示 d 位小數字數 

   EXPONENT <e>                F(浮點數) exponent 的值 

   ROUND <r>                     四捨五入至小數位數下 r 位 

   CURRENCY <c>                幣別顯示 

   DD/MM/YY                      日期顯示格式 

   MM/DD/YY 

   DD/MM/YYYY 

   MM/DD/YYYY 

   DDMMYY 

   MMDDYY 

   YYMMDD

sikp [n] : 空N行 

WRITE  <icon-name>  AS  ICON  ：顯示系統圖標 

WRITE  <symbol-name>  AS  SYMBOL  ：顯示系統符號 

-- 選擇 “Edit” 下的 “Insert Statement”, 選 “WRITE”   接下來選擇要查的群組, 如 SYMBOL 或 ICON,  按下 “Display” 即可檢視所有系統圖示或符號 。 

WRITE  <資料項>  AS   CHECKBOX.  作為checkbox顯示 

-- 以字串資料內容的第一個字元為 CHECK BOX 的輸出, 如果是空白, CHECK BOX 顯示為空白,  相反則顯示 X , 

MOVE

MOVE  <F1>  TO  <F2> ：將F1的值儲存到F2中，等同於F2 = F1 , 內表同樣適用。 

MOVE  <F1>[+<O1>]  TO   <F2>[+<O2>]  ：將字串中指定字元儲存到指定字串中 。 

data: f1(10) type c value ‘ABCDEFGHIJ’ , 

        f2(10) type c value ‘ZZZZZZZZZ’ . 

MOVE F1+3(5) TO F2+3(5) . 

f2為：ZZZDEFGHZZ . 

MOVE –CORRESPONDING   <Strings1>  TO  <String2>.將 Strings1中的 field元件的資料複製至String2 中, 僅複製相同名稱的元件 

DATA: BEGIN  OF  ADDRESS, 

相關推薦