【正文】 刪除 行之后，下 面行的索引 減1。.APPEND CODE.CODE = 39。 如果替換成 功，則將 SYSUBRC 設(shè)置為0。這樣 ，表格工作 區(qū)域就成了 目標(biāo)區(qū)域。 如果表格有 表頭，則可 以忽略 INTO 選項(xiàng)。如果找到有 匹配關(guān)鍵字 的條目，則 將系統(tǒng)字段 SYSUBRC 設(shè)置為0并 且 SYTABIX 包含該行的 索引。 k 不能包含內(nèi) 表或包含內(nèi) 表的結(jié)構(gòu)。這樣 ，表格工作 區(qū)域就成了 目標(biāo)區(qū)域。用 LOOP 語句逐行讀 取表格。在語句塊內(nèi) ，系統(tǒng)字段 SYTABIX 包含當(dāng)前行 的索引。DATA: ITAB TYPE I OCCURS 10, FTAB TYPE F OCCURS 10, FL TYPE F.DO 3 TIMES. APPEND SYINDEX TO ITAB.ENDDO.FTAB = ITAB.LOOP AT FTAB INTO FL. WRITE: / FL.ENDLOOP.其輸出為： +00 +00 +00其中，內(nèi)表 ITAB 具有基本行 類型 I，F(xiàn)TAB 具有基本行 類型 F。復(fù)制整個(gè) 表格內(nèi)容， 包括作為表 格組件的任 何其它內(nèi)表 的數(shù)據(jù)。下圖顯 示示例是如 何工作的：10附加內(nèi)表行要將部分或 全部內(nèi)表附 加到另一個(gè) 內(nèi)表中，請 使用 APPEND 語句，用法 如下：語法APPEND LINES OF itab1 [FROM n1] [TO n2] TO itab2.如果沒有 FROM 和 TO 選項(xiàng)，該語 句將整個(gè)表 格 ITAB1 附加到 ITAB2 中。 在第三個(gè) COLLECT 語句中，修 改了 ITAB 的第一行。如果僅使用 COLLECT 語句填充內(nèi) 表，則不會(huì) 出現(xiàn)重復(fù)條 目。. LINE2FIELD2 = TAB1.APPEND LINE2 TO TAB2.LOOP AT TAB2 INTO LINE2. WRITE: / LINE2FIELD1. LOOP AT LINE2FIELD2 INTO LINE1. WRITE: / LINE1COL1, LINE1COL2, LINE1COL3. ENDLOOP.ENDLOOP.其輸出為：Aabc 12 3def 34 5Bghi 56 7jkl 78 9本示例創(chuàng)建 兩個(gè)不帶表 格工作區(qū)域 的內(nèi)表（TAB1 和 TAB2） 。. LINE1COL3 = 3.APPEND LINE1 TO TAB1.LINE1COL1 = 39。關(guān)于如何使 用 SELECT 語句用數(shù)據(jù) 庫表格中的 數(shù)據(jù)填充內(nèi) 表的詳細(xì)信 息，參見 將數(shù)據(jù)讀入內(nèi)表。n 指定行的初 始號(hào)。如果添 加到內(nèi)表中 的行比 n 指定的要多 ，則自動(dòng)擴(kuò) 展保留的內(nèi) 存。將數(shù)據(jù) 對象 f 說明為結(jié)構(gòu) 相同的內(nèi)表 。要 指定行的數(shù) 據(jù)類型，可 以使用 TYPE 或 LIKE 參數(shù)（參見 DATA 語句的基本格式 (頁 3–14) ）。創(chuàng)建 與內(nèi)表兼容 的工作區(qū)域 的一種安全 步驟是在說 明內(nèi)表和工 作區(qū)域時(shí)使 用相同的數(shù) 據(jù)類型。2內(nèi)表關(guān)鍵字有兩種類型 的內(nèi)表關(guān)鍵 字。行的數(shù) 據(jù)類型可以 是基本的或 結(jié)構(gòu)化的。根據(jù)需求 ，系統(tǒng)可實(shí) 時(shí)增加內(nèi)表 的大小。213。例 如，如果想 將某個(gè)數(shù)據(jù) 庫表格讀入 內(nèi)表，不必 事先知道數(shù) 據(jù)庫表格的 大小。 該定義打開 了多種內(nèi)表 結(jié)構(gòu)，范圍 從包含一個(gè) 字段的行到 包含字段串 將內(nèi)表作為 組件的行。自定義關(guān)鍵 字使用 READ 語句從內(nèi)表 中讀取行時(shí) ，可以指定 自定義關(guān)鍵 字（參見 用自定義關(guān) 鍵字讀取單 行 (頁 8–１６) ）。在該環(huán)境中 ，可以區(qū)分 ABAP/4 中兩種類型 的內(nèi)表的差 別：_ 帶表頭行 的內(nèi)表_ 不帶表頭 行的內(nèi)表如果創(chuàng)建帶 表頭行的內(nèi) 表（參見 創(chuàng)建內(nèi)表 (頁 8–３) ），系統(tǒng)自 動(dòng)創(chuàng)建與內(nèi) 表行數(shù)據(jù)類 型相同的工 作區(qū)域。通過使用 LIKE 參數(shù)引用 ABAP/4 詞典中定義 的對象，可 以創(chuàng)建內(nèi)表 ，其行結(jié)構(gòu) 與存儲(chǔ)在詞 典中的對象 相同且反映 數(shù)據(jù)庫表格 的結(jié)構(gòu)。如果使用 WITH HEADER LINE 選項(xiàng)，則創(chuàng) 建的內(nèi)表帶 工作區(qū)域 f （參見 訪問內(nèi)表 (頁 8–２) ）。如果內(nèi) 存中沒有足 夠空間可用 于內(nèi)表，則 將其寫入緩 沖區(qū)或磁盤 （分頁區(qū)域 ）。將第 一行寫入用 類型 t 創(chuàng)建的內(nèi)表 數(shù)據(jù)對象之 后，就為指 定行保留內(nèi) 存。6附加行要將行附加 到內(nèi)表中， 請使用 APPEND 語句，用法 如下：語法APPEND [wa TO|INITIAL LINE TO] itab.該語句將新 行附加到內(nèi) 表 itab 中。def39。TAB2 有深層結(jié)構(gòu) ，因?yàn)?LINE2 的第二個(gè)組 件包含內(nèi)表 TAB1 的結(jié)構(gòu)。因此要 填充沒有重 復(fù)條目的內(nèi) 表，應(yīng)該使 用 COLLECT 而不是 APPEND 或 INSERT。 下面的數(shù)字 圖表顯示三 個(gè)步驟：9插入行要在內(nèi)表行 之前插入新 行，請使用 INSERT 語句，用法 如下：語法INSERT [wa INTO|INITIAL LINE INTO] itab [INDEX idx].該語句通過 使用 INTO 選項(xiàng)指定想 插入的源區(qū) 域 wa。如果使 用這些選項(xiàng) ，則可通過 索引 n1 或 n2 指定 ITAB1 中要附加的 第一或最后 一行。覆 蓋目標(biāo)表格 原來的內(nèi)容 。這些行 類型都是可 轉(zhuǎn)換的（關(guān) 于可轉(zhuǎn)換性 的詳細(xì)信息 ，參見 基本數(shù)據(jù)類型的可轉(zhuǎn)換性 (頁 6–37) ）并且可將 ITAB 復(fù)制到 FTAB 中。處 理完表格的 所有行之后 循環(huán)結(jié)束。將 要讀取的行 的索引限制 在10和25之 間，并將每 行第二個(gè)組 件的內(nèi)容限 制為大于400的 數(shù)字。系統(tǒng)讀取 itab 中匹配 key 中所定義的 關(guān)鍵字的第 一個(gè)條目。 與上面兩個(gè) 選項(xiàng)不同之 處在于用 k 的數(shù)據(jù)類型 進(jìn)行比較。否則 ，將 SYSUBRC 設(shè)置為4。這樣 ，表格工作 區(qū)域就成了 目標(biāo)區(qū)域。對于 fields， 可以用... F1 ...fn 指定一系列 組件。 如果內(nèi)表包 含的行少于 idx， 則不更改任 何行并且 SYSUBRC 包含4。This is the second line. It is ugly.39。如果操作成 功，則將 SYSUBRC 設(shè)置為0。23用索引刪除 行要使用索引 刪除行，請 使用有 INDEX 選項(xiàng)的 DELETE 語句，用法 如下：語法DELETE itab INDEX idx.如果使用 INDEX 選項(xiàng)，則從 ITAB 中刪除索引 為 idx 的行。This is the first line.39。如果使用 INDEX 選項(xiàng)，則新 行代替索引 為 idx 的現(xiàn)有行。 如果表格有 表頭行，可 以忽略 INTO 選項(xiàng)?？梢杂?INTO 選項(xiàng)指定目 標(biāo)區(qū)域 wa。 關(guān)于“二分法搜索”選項(xiàng)的詳細(xì) 信息，參見 二分法搜索 (頁 Error! Reference source not found.) 。將行首定義 為關(guān)鍵字要將內(nèi)表的 行首定義為 關(guān)鍵字，請 使用 WITH KEY 選項(xiàng)，用法 如下：語法....WITH KEY k ...系統(tǒng)將（左 對齊）的行 首與 k 進(jìn)行比較。如果表格 有表頭行， 則可以忽略 INTO 選項(xiàng)。 在 DO 循環(huán)中用1和 30之間的 數(shù)字以及這 些數(shù)字的平 方對表格進(jìn) 行填充?？梢杂?控制關(guān)鍵字 AT 在 LOOP ENDLOOP 塊內(nèi)控制語 句塊流（參 見 循環(huán)處理 (頁 Error! Reference source not found.) ）。 請注意方括 號(hào)([])的 用法。ABAP/4 從右到左進(jìn) 行處理：itab2 = itab1.itab3 = itab2.itab4 = itab3.這些語句執(zhí) 行完整操作 。在第一 個(gè) LOOP ENDLOOP 循環(huán)的每個(gè) 現(xiàn)有行之前 插入一個(gè)新 行。 前兩個(gè) COLLECT 語句和 APPEND 語句一樣。COLLECT 語句無法用 于帶深層結(jié) 構(gòu)的內(nèi)表， 例如，將內(nèi) 表作為組件 的行。B39。1239。_ 要將內(nèi)表 條目內(nèi)容復(fù) 制到另一個(gè) 內(nèi)表中，并 且覆蓋該目 標(biāo)表格，請 使用 MOVE 語句。因此， 其作用與先 創(chuàng)建字段串 f，然 后再創(chuàng)建與 該字段串行 結(jié)構(gòu)相同的 內(nèi)表 f 相同。將第 一行寫入用 類型 t 創(chuàng)建的內(nèi)表 數(shù)據(jù)對象之 后，就為指 定行保留內(nèi) 存。4通過引用另 一個(gè)表格來 創(chuàng)建內(nèi)表要通過引用 現(xiàn)有內(nèi)表數(shù) 據(jù)類型或數(shù) 據(jù)對象來創(chuàng) 建內(nèi)表數(shù)據(jù) 對象，可使 用 DATA 語句，用法 如下：語法DATA f type [WITH HEADER LINE].通過使用 TYPE 或 LIKE， 可以使用 type 選項(xiàng)來引用 表格數(shù)據(jù)類 型或表格數(shù) 據(jù)對象（關(guān) 鍵這些選項(xiàng) 的詳細(xì)信息 ，參見 DATA 語句的基本格式 (頁 3–14) ）。內(nèi) 表中行的數(shù) 據(jù)類型在 type 中指定。 為了避免不 一致，最好 是工作區(qū)域 與內(nèi)表行有 相同的數(shù)據(jù) 類型。處理完內(nèi)表 的特定行后 ，系統(tǒng)字段 SYTABIX 一般包含該 行的索引。內(nèi)表包 括任意數(shù)據(jù) 類型相同的 行。內(nèi)表中的行 數(shù)并不固定 。194。該特 征項(xiàng)使得內(nèi) 表使用起來 十分方便， 同時(shí)還支持 動(dòng)態(tài)編程?？梢杂脦?OCCURS 參數(shù)的 TYPES 語句將數(shù)據(jù) 類型定義為 內(nèi)表（參見 創(chuàng)建內(nèi)表數(shù) 據(jù)類型 (頁 8–３) ）。缺省關(guān)鍵字根據(jù)定義， 內(nèi)表的關(guān)鍵 字段是非數(shù) 字（類型 F、I 和 P）和非內(nèi) 表的字段。該 工作區(qū)域稱 為表頭行或 表格工作區(qū) 域，對內(nèi)表 的作用與由 TABLES 語句創(chuàng)建的 數(shù)據(jù)庫表格 工作區(qū)域相 同（參見 TABLES 語句 (頁 3–20) ）。這 在讀取和處 理數(shù)據(jù)庫表 格時(shí)非常重 要（參見 讀取并處理數(shù)據(jù)庫表）。如果想創(chuàng)建 帶表頭行的 內(nèi)表，行類 型不能直接 是內(nèi)表。上述特征項(xiàng) 與用 TYPES 語句創(chuàng)建內(nèi) 表數(shù)據(jù)類型 的特征項(xiàng)相 同（參見 創(chuàng)建內(nèi)表數(shù) 據(jù)類型 (頁 8–３) ）。如果添 加到內(nèi)表中 的行比 n 指定的要多 ，則自動(dòng)擴(kuò) 展保留的內(nèi) 存。通過使用 wa TO 選項(xiàng)，指定 要附加的源 區(qū)域 wa。. LINE1COL2 = 39。LINE1 被填充并附 加到 TAB1。DATA: BEGIN OF ITAB OCCURS 3, COLUMN1(3) TYPE C, COLUMN2(2) TYPE N, COLUMN3 TYPE I, END OF ITAB.ITABCOLUMN1 = 39。 如果表格有 表頭行，則 可以忽略 INTO 選項(xiàng)。用該方式將 表格行附加 到另一個(gè)表 格中的速度 比在循環(huán)中 逐行進(jìn)行附 加快3到4倍 。語法與復(fù)制 基本字段相 同（詳細(xì)信 息，參見 基本分配操作 (頁 6–2) ）。DATA: BEGIN OF ILINE, NUM TYPE I, END OF ILINE, BEGIN OF FLINE, NUM TYPE F, END OF FLINE, ITAB LIKE ILINE OCCURS 10, FTAB LIKE FLINE OCCURS 10.DO 3 TIMES. ILINENUM = SYINDEX. APPEND ILINENUM TO ITAB.ENDDO.FTAB = ITAB.LOOP AT FTAB INTO FLINE. WRITE: / FLINENUM.ENDLOOP.其輸出為：其中，內(nèi)表 ITAB 和 FTAB 的行類型都 是字段串， 每個(gè)都包含 類型 I 或 F 的組件。 在 ENDLOOP 語句之后， 如果至少讀 取了一行， 則將系統(tǒng)字 段 SYSUBRC 設(shè)置為0。15用索引讀取 單行要用索引從 內(nèi)表中讀取 單行，請使 用 READ 語句，用法 如下：語法READ TABLE itab [INTO wa] INDEX idx.用 INTO 選項(xiàng)指定目 標(biāo)區(qū)域 wa。 關(guān)于 二分法搜索 選項(xiàng)的詳細(xì) 信息，參見 二分法搜索 (頁 Error! Reference source not found.) 。DATA: BEGIN OF LINE, COL1 TYPE C, COL2 TYPE P DECIMALS 5, COL3 TYPE I, COL4 TYPE I, END OF LINE.DATA ITAB LIKE LINE OCCURS 10.DO 10 TIMES. LINECOL1 = SYINDEX. LINECOL2 = SQRT( SYINDEX ). LINECOL3 = SYINDEX ** 2. LINECOL4 = SYINDEX ** 3. APPEND LINE TO ITAB.ENDDO.READ TABLE ITAB INTO LINE WITH KEY COL3 = 9 COL4 = 36.WRITE: / SYSUBRC, SYTABIX.READ TABLE ITAB INTO LINE