【正文】 OCCURS 5.DATA STRING TYPE MYSTRING.DATA ITAB TYPE MYTAB.STRINGNUMBER = 1. STRINGNAME = 39。John39。. APPEND STRING TO ITAB.STRINGNUMBER = 2. STRINGNAME = 39。Paul39。. APPEND STRING TO ITAB.STRINGNUMBER = 3. STRINGNAME = 39。Ringo39。. APPEND STRING TO ITAB.STRINGNUMBER = 4. STRINGNAME = 39。George39。. APPEND STRING TO ITAB.LOOP AT ITAB INTO STRING. WRITE: / STRINGNUMBER,STRINGNAME.ENDLOOP.該程序在屏 幕上產(chǎn)生下 列輸出： 1 John 2 Paul 3 Ringo 4 George示例中，首 先將數(shù)據(jù)類 型 MYSTRING 定義為字段 串。然后， 根據(jù)字段串 MYSTRING， 利用 TYPES 語句的 OCCURS 參數(shù)將數(shù)據(jù) 類型 MYTAB 定義為內(nèi)表 。利用數(shù)據(jù) 類型 MYSTRING 和 MYTAB 聲明數(shù)據(jù)對 象 STRING 和 ITAB。 然后逐行填 充內(nèi)表 ITAB 的字段。通 過使用字段 串 STRING， 在屏幕上顯 示 ITAB 的內(nèi)容。關(guān) 于內(nèi)表的詳 細信息，參 見 創(chuàng)建并處理內(nèi)表 (頁 Error! Not a valid link.) 。23使用類型組可以使用類 型組將用戶 定義的數(shù)據(jù) 類型或常量 存儲在 ABAP/4 詞典中，以 便在程序之 間使用。在 ABAP/4 程序中，可 以利用 TYPEPOOLS 語句聲明類 型組，如下 所示：語法TYPEPOOLS name.該語句允許 您使用程序 中的類型組 name 中定義的全 部數(shù)據(jù)類型 和常量。在 同一個程序 中可以使用 多個類型組 ?？梢酝ㄟ^選 擇“工具 ABAP/4 工作臺 開發(fā) ABAP/4 詞典”，或 直接從 ABAP/4 程序維護類 型組。在第一種情 況下，在“ ABAP/4 詞典：初始 屏幕”上的 “對象名” 字段中，為 類型組指定 一個 1 到 5 個字符的名 稱，然后選 擇“類型組 ”，接著選 擇“顯示” 、“更改” 或“創(chuàng)建” ：在第二種情 況下，可以 雙擊 ABAP/4 程序中 TYPEPOOLS 語句后的類 型組的名稱 name。 如果不存在 該名稱的類 型組，可以 創(chuàng)建它。否 則，系統(tǒng)顯 示現(xiàn)有類型 組的定義， 然后可以對 它進行更改 。類型組的定 義是在 ABAP/4 編輯器中輸 入的 ABAP/4 代碼的一部 分。用于類 型組 name 的第一條語 句始終為：語法TYPEPOOL name.緊接其后的 是利用語句 TYPES 和 常量 的數(shù)據(jù)類型 和/或常量 的定義（如 同 TYPES 語句 (頁 １８) 和 CONSTANTS 語句 (頁 １６) 所述）。這 些數(shù)據(jù)類型 和常量的所 有名稱必須 以類型組的 名稱和下劃 線開始：name_。在 ABAP/4 詞典中創(chuàng)建 類型組 HKTST， 如下所示：TYPEPOOL HKTST.TYPES: BEGIN OF HKTST_TYP1, COL1(10), COL2 TYPE I, END OF HKTST_TYP1.TYPES HKTST_TYP2 TYPE P DECIMALS 2.CONSTANTS HKTST_ELEVEN TYPE I VALUE 11.該類型組不 但定義兩個 數(shù)據(jù)類型 HKTST_TYP1 和 HKTST_TYP2， 而且定義了 一個值為 11 的常量。任何 ABAP/4 程序都可以 如同下列程 序那樣，利 用 TYPEPOOLS 語句使用該 定義：PROGRAM SAPMZTST.TYPEPOOLS HKTST.DATA: DAT1 TYPE HKTST_TYP1, DAT2 TYPE HKTST_TYP2 VALUE 39。39。.WRITE: DAT2, / HKTST_ELEVEN.輸出為： 11類型組中定 義的數(shù)據(jù)類 型，用于利 用 DATA 語句聲明數(shù) 據(jù)對象，而 且正如輸出 所顯示的那 樣，在程序 中常量的值 是已知的。24確定數(shù)據(jù)對 象的屬性如果要查明 數(shù)據(jù)對象的 數(shù)據(jù)類型， 或者要在程 序的運行期 間使用其屬 性，請使用 DESCRIBE 語句。語法 如下：語法DESCRIBE FIELD f [LENGTH l] [TYPE t [COMPONENTS n]] [OUTPUTLENGTH o] [DECIMALS d] [EDIT MASK m].將由語句的 參數(shù)指定的 數(shù)據(jù)對象 f 的屬性寫入 參數(shù)后的變 量。DESCRIBE FIELDS 語句具有下 列參數(shù)：參數(shù)用途確定字段長 度 (頁 ２５) LENGTH 確定數(shù)據(jù)類 型 (頁 ２５) TYPE確定輸出長 度 (頁 ２６) OUTPUTLENGTH確定小數(shù)位 (頁 ２７) DECIMALS確定轉(zhuǎn)換例 程 (頁 ２７) EDIT MASK25確定字段長 度要確定數(shù)據(jù) 對象的長度 ，請利用 DESCRIBE FIELD 語句使用 LENGTH 參數(shù)，如下 所示：語法DESCRIBE FIELD f LENGTH l.系統(tǒng)讀取字 段 f 的長度，并 將值寫入字 段 l。DATA: TEXT(8), LEN TYPE I.DESCRIBE FIELD TEXT LENGTH LEN.該示例中， 字段 LEN 包含的值為 8。25確定數(shù)據(jù)類 型要確定字段 的數(shù)據(jù)類型 ，請利用 DESCRIBE FIELD 語句使用 TYPE 參數(shù)，如下 所示：語法DESCRIBE FIELD f TYPE t [COMPONENTS n].系統(tǒng)讀取字 段 f 的數(shù)據(jù)類型 ，然后將值 寫入字段 t。除返回預(yù)定 義數(shù)據(jù)類型 C、D、F、 I、N、P、 T 和 X 外（參見 基本數(shù)據(jù)類 型 預(yù)定義的 (頁 ３) 中的表）， 該語句還返 回