：User Exit實(shí)現(xiàn)與性能優(yōu)化)
1. 項(xiàng)目概述為什么我們需要自定義總賬報表字段在SAP的日常運(yùn)維和財務(wù)分析中FBL3N總賬科目行項(xiàng)目和FAGLL03總賬科目余額是兩個最常用、最核心的總賬報表事物碼。幾乎每個財務(wù)顧問和關(guān)鍵用戶都離不開它們。但用久了大家都會遇到一個共同的痛點(diǎn)標(biāo)準(zhǔn)報表提供的字段總是不夠用。比如標(biāo)準(zhǔn)FBL3N里你想看每一筆憑證行項(xiàng)目對應(yīng)的利潤中心、成本中心、訂單號這些基礎(chǔ)字段是有的。但如果公司啟用了復(fù)雜的段Segment或功能范圍Functional Area或者你想把供應(yīng)商主數(shù)據(jù)里的某個自定義字段比如“供應(yīng)商風(fēng)險等級”直接拉到行項(xiàng)目清單里標(biāo)準(zhǔn)報表就無能為力了。你只能先導(dǎo)出數(shù)據(jù)再用Excel做VLOOKUP費(fèi)時費(fèi)力還容易出錯。FAGLL03余額顯示也一樣標(biāo)準(zhǔn)視圖可能只顯示科目、期間、本位幣余額但業(yè)務(wù)部門常常需要按成本中心、利潤中心甚至自定義的“業(yè)務(wù)板塊”維度來查看余額。這就是“FBL3N/FAGLL03自定義字段顯示”這個項(xiàng)目的核心價值所在。它不是一個開發(fā)新功能而是對現(xiàn)有核心工具的深度定制和增強(qiáng)讓標(biāo)準(zhǔn)報表能“看見”并展示那些對業(yè)務(wù)至關(guān)重要的、但隱藏在后臺的字段信息。這直接關(guān)系到財務(wù)數(shù)據(jù)的透明度、分析效率和決策支持能力。我經(jīng)歷過太多業(yè)務(wù)用戶抱怨報表不好用最后發(fā)現(xiàn)根源就是缺了幾個關(guān)鍵字段。通過這個自定義項(xiàng)目我們可以把數(shù)據(jù)獲取的主動權(quán)交還給用戶減少IT部門的重復(fù)取數(shù)需求實(shí)現(xiàn)真正的自助式財務(wù)分析。2. 核心思路與方案選型從用戶需求到技術(shù)實(shí)現(xiàn)當(dāng)接到“為FBL3N/FAGLL03增加自定義字段”的需求時一個有經(jīng)驗(yàn)的SAP顧問腦子里會立刻浮現(xiàn)出幾條技術(shù)路徑。我們需要根據(jù)字段的來源、復(fù)雜度和性能要求選擇最合適的那一條。2.1 需求分析與字段溯源首先必須明確要添加的字段是什么、從哪里來。這決定了后續(xù)的技術(shù)方案。通常自定義字段的來源可以分為以下幾類標(biāo)準(zhǔn)表字段字段本身就存在于SAP標(biāo)準(zhǔn)表中只是標(biāo)準(zhǔn)報表的字段選擇Field Selection里沒有包含它。例如憑證行項(xiàng)目表BSEG里的字段ZTERM付款條款、ZLSCH付款方式或者總賬科目主數(shù)據(jù)表SKB1里的某個描述字段。自定義表字段Append Structure業(yè)務(wù)在標(biāo)準(zhǔn)表如BSEG、BKPF上通過附加結(jié)構(gòu)Append Structure添加的Z字段。這是國內(nèi)項(xiàng)目實(shí)施中最常見的情況比如在BSEG上附加一個Z_PROJ_PHASE項(xiàng)目階段字段。關(guān)聯(lián)表字段字段不在主業(yè)務(wù)表里但可以通過某個關(guān)鍵字段關(guān)聯(lián)獲取。例如想顯示供應(yīng)商的國家這個信息在供應(yīng)商主數(shù)據(jù)表LFA1的LAND1字段需要通過BSEG中的LIFNR供應(yīng)商編號去關(guān)聯(lián)。計算字段或邏輯字段字段并非直接存儲在數(shù)據(jù)庫中而是需要通過一些邏輯判斷或簡單計算得出。例如根據(jù)憑證類型BLART和金額判斷業(yè)務(wù)類型或者計算一個行項(xiàng)目距今天的天數(shù)。2.2 主流技術(shù)方案對比針對以上不同來源的字段SAP提供了幾種主流的增強(qiáng)方案各有優(yōu)劣。方案一使用標(biāo)準(zhǔn)增強(qiáng)點(diǎn)User Exit這是最傳統(tǒng)、也是最靈活的方法。SAP在FBL3N和FAGLL03的程序中預(yù)留了用戶出口如EXIT_SAPF086_001。我們可以通過SE38創(chuàng)建包含該出口的增強(qiáng)程序在其中編寫ABAP代碼將自定義字段的數(shù)據(jù)填充到系統(tǒng)預(yù)留的內(nèi)部表中。優(yōu)點(diǎn)功能強(qiáng)大幾乎可以實(shí)現(xiàn)任何邏輯包括復(fù)雜的表關(guān)聯(lián)和計算。缺點(diǎn)需要ABAP開發(fā)能力對顧問技術(shù)要求高代碼維護(hù)在客戶命名空間升級時需要檢查兼容性。適用場景字段來源復(fù)雜如多表關(guān)聯(lián)、復(fù)雜計算或需要高度定制化邏輯時。方案二利用隱式增強(qiáng)Implicit Enhancement在較新版本的SAP基于NetWeaver 7.0以上中可以在報表程序的關(guān)鍵子例程如LIST_FILL中直接插入隱式增強(qiáng)點(diǎn)寫代碼。其原理和User Exit類似但位置更靈活。優(yōu)點(diǎn)無需事先聲明出口直接在標(biāo)準(zhǔn)代碼中插入有時更直接。缺點(diǎn)同樣需要ABAP開發(fā)且如果標(biāo)準(zhǔn)程序升級改動較大增強(qiáng)點(diǎn)可能失效或需要調(diào)整。適用場景作為User Exit的替代方案當(dāng)標(biāo)準(zhǔn)出口不滿足位置要求時使用。方案三通過配置字段組Field Group和會計憑證增強(qiáng)ACDOCA對于新總賬New GL環(huán)境特別是當(dāng)數(shù)據(jù)主要來源于ACDOCAUniversal Journal表時SAP提供了更配置化的增強(qiáng)方式?？梢酝ㄟ^SPRO路徑財務(wù)會計-財務(wù)會計全局設(shè)置-工具-總賬科目的業(yè)務(wù)交易-字段-向總賬科目業(yè)務(wù)交易添加字段來定義字段并將其分配給字段組最終在Fiori或某些新報表中顯示。優(yōu)點(diǎn)標(biāo)準(zhǔn)化、配置化與New GL架構(gòu)集成好升級影響小。缺點(diǎn)主要適用于基于ACDOCA的字段和場景對傳統(tǒng)的BSEG表支持有限配置相對復(fù)雜。適用場景公司已全面啟用新總賬且自定義字段需要在新總賬憑證中更新和報告。方案四使用報表繪制器Report Painter或報表編寫器Report Writer這是一個完全不同的思路不修改FBL3N/FAGLL03而是用SAP自帶的報表工具Report Painter/Writer基于相同的底層表如BSEG、FAGLFLEXT重新制作一個報表在制作過程中可以自由選擇任何字段。優(yōu)點(diǎn)無需ABAP開發(fā)純配置功能強(qiáng)大可以制作出格式更復(fù)雜的報表。缺點(diǎn)學(xué)習(xí)成本高維護(hù)的是另一個獨(dú)立的報表對象用戶需要學(xué)習(xí)使用新事物碼。適用場景需求不僅僅是加字段而是涉及復(fù)雜的報表布局、格式計算時或者作為長期方案替代頻繁增強(qiáng)標(biāo)準(zhǔn)事務(wù)碼。實(shí)操心得在大多數(shù)傳統(tǒng)ECC或S/4 HANA的經(jīng)典場景下對于在FBL3N/FAGLL03中快速添加幾個自定義字段的需求方案一User Exit仍然是平衡效率、靈活性和穩(wěn)定性的首選。它直接作用于用戶最熟悉的事物碼改動直觀。本篇文章后續(xù)的詳細(xì)實(shí)操也將圍繞此方案展開。3. 核心細(xì)節(jié)解析解剖FBL3N的User Exit我們以最常用的FBL3N為例深入看一下如何使用User ExitEXIT_SAPF086_001來實(shí)現(xiàn)自定義字段的顯示。理解這個出口的運(yùn)作機(jī)制是成功的關(guān)鍵。3.1 出口結(jié)構(gòu)與數(shù)據(jù)流當(dāng)你執(zhí)行FBL3N時系統(tǒng)大致遵循以下流程根據(jù)用戶輸入的篩選條件公司代碼、會計期間、科目等從數(shù)據(jù)庫表主要是BSEG關(guān)聯(lián)BKPF等中讀取數(shù)據(jù)。將讀取到的數(shù)據(jù)填充到一個系統(tǒng)定義好的內(nèi)部表ITAB中這個表是FBL3N顯示列表的數(shù)據(jù)源。在將ITAB輸出到屏幕列表之前系統(tǒng)會調(diào)用出口EXIT_SAPF086_001。在這個出口里我們可以編寫代碼為ITAB的每一行數(shù)據(jù)補(bǔ)充我們想要的自定義字段的值。系統(tǒng)繼續(xù)執(zhí)行將增強(qiáng)后的ITAB顯示出來。出口EXIT_SAPF086_001的接口參數(shù)是固定的主要包含兩個重要的內(nèi)表C_TAB這是一個字段目錄Field Catalog定義了ALV列表將要顯示的所有字段。我們需要在這里添加自定義字段的定義。C_ITAB這就是上面提到的數(shù)據(jù)內(nèi)表ITAB。我們需要在這里添加自定義字段對應(yīng)的數(shù)據(jù)列并為每一行填充數(shù)據(jù)。所以增強(qiáng)的核心工作就兩步在C_TAB中注冊新字段在C_ITAB中填充新字段的數(shù)據(jù)。3.2 字段定義的關(guān)鍵參數(shù)在C_TAB中添加字段時有幾個參數(shù)必須正確設(shè)置否則字段可能無法顯示或功能異常參數(shù)名說明示例與注意事項(xiàng)FIELDNAME字段的技術(shù)名稱必須唯一建議以Z或Y開頭如Z_CUST_FIELDTABNAME參考表名通常填寫ITAB表示這是輸出內(nèi)表中的一個字段INTTYPE內(nèi)部數(shù)據(jù)類型C字符、N數(shù)值、D日期等需與數(shù)據(jù)實(shí)際類型匹配INTLEN內(nèi)部長度字段的長度如10, 20, 40等OUTPUTLEN輸出長度在ALV列表中顯示的寬度通常略大于或等于INTLENSELTEXT_M中字段描述將在列表列頭顯示的文字如“供應(yīng)商風(fēng)險等級”SELTEXT_S短字段描述縮寫描述SELTEXT_L長字段描述詳細(xì)描述NO_OUT是否隱藏空格顯示‘X’隱藏。可用于存儲中間數(shù)據(jù)。TECH是否技術(shù)字段空格業(yè)務(wù)字段‘X’技術(shù)字段通常隱藏。EDIT_MASK輸出格式模板控制顯示格式如日期DATUM金額WERT注意事項(xiàng)INTTYPE和INTLEN必須與你準(zhǔn)備填充的數(shù)據(jù)類型嚴(yán)格一致。例如從BSEG的附加結(jié)構(gòu)里取一個長度為20的字符字段那么INTTYPE應(yīng)為CINTLEN應(yīng)為20。如果設(shè)置錯誤在填充數(shù)據(jù)時可能會發(fā)生運(yùn)行時錯誤或數(shù)據(jù)截斷。3.3 數(shù)據(jù)填充的邏輯與性能在C_ITAB中填充數(shù)據(jù)是編碼的核心。這里有一個極其重要的技巧避免在循環(huán)中執(zhí)行單條查詢SELECT SINGLE。假設(shè)我們要為FBL3N添加兩個字段Z_VENDOR_COUNTRY供應(yīng)商國家來自LFA1-LAND1。Z_PROJ_PHASE項(xiàng)目階段來自BSEG的附加結(jié)構(gòu)字段。錯誤的做法性能殺手LOOP AT c_itab ASSIGNING fs_itab. 為每一行單獨(dú)查詢供應(yīng)商主數(shù)據(jù) SELECT SINGLE land1 FROM lfa1 INTO fs_itab-z_vendor_country WHERE lifnr fs_itab-lifnr. 直接讀取附加結(jié)構(gòu)字段假設(shè)已包含在BSEG中但標(biāo)準(zhǔn)ITAB未傳遞 SELECT SINGLE z_proj_phase FROM bseg INTO fs_itab-z_proj_phase WHERE bukrs fs_itab-bukrs AND belnr fs_itab-belnr AND gjahr fs_itab-gjahr AND buzei fs_itab-buzei. ENDLOOP.如果C_ITAB有1萬行這個循環(huán)將執(zhí)行2萬次數(shù)據(jù)庫查詢會嚴(yán)重拖慢報表速度。正確的做法批量處理DATA: lt_lfa1 TYPE TABLE OF lfa1, lt_bseg TYPE TABLE OF bseg. DATA: ls_lfa1 TYPE lfa1, ls_bseg TYPE bseg. 1. 收集所有需要查詢的供應(yīng)商編號 LOOP AT c_itab ASSIGNING fs_itab WHERE lifnr IS NOT INITIAL. COLLECT fs_itab-lifnr INTO lt_lifnr_range. ENDLOOP. 2. 一次性批量查詢供應(yīng)商數(shù)據(jù) IF lt_lifnr_range IS NOT INITIAL. SELECT lifnr, land1 FROM lfa1 INTO TABLE lt_lfa1 FOR ALL ENTRIES IN lt_lifnr_range WHERE lifnr lt_lifnr_range-lifnr. SORT lt_lfa1 BY lifnr. ENDIF. 3. 收集所有需要查詢的憑證行項(xiàng)目關(guān)鍵字段 LOOP AT c_itab ASSIGNING fs_itab. MOVE-CORRESPONDING fs_itab TO ls_key. COLLECT ls_key INTO lt_bseg_key. ENDLOOP. 4. 一次性批量查詢BSEG附加字段 IF lt_bseg_key IS NOT INITIAL. SELECT bukrs, belnr, gjahr, buzei, z_proj_phase FROM bseg INTO TABLE lt_bseg FOR ALL ENTRIES IN lt_bseg_key WHERE bukrs lt_bseg_key-bukrs AND belnr lt_bseg_key-belnr AND gjahr lt_bseg_key-gjahr AND buzei lt_bseg_key-buzei. SORT lt_bseg BY bukrs belnr gjahr buzei. ENDIF. 5. 在循環(huán)中使用READ TABLE讀取內(nèi)存中的數(shù)據(jù) LOOP AT c_itab ASSIGNING fs_itab. 填充供應(yīng)商國家 IF fs_itab-lifnr IS NOT INITIAL. READ TABLE lt_lfa1 INTO ls_lfa1 WITH KEY lifnr fs_itab-lifnr BINARY SEARCH. IF sy-subrc 0. fs_itab-z_vendor_country ls_lfa1-land1. ENDIF. ENDIF. 填充項(xiàng)目階段 READ TABLE lt_bseg INTO ls_bseg WITH KEY bukrs fs_itab-bukrs belnr fs_itab-belnr gjahr fs_itab-gjahr buzei fs_itab-buzei BINARY SEARCH. IF sy-subrc 0. fs_itab-z_proj_phase ls_bseg-z_proj_phase. ENDIF. ENDLOOP.這種方法將數(shù)萬次數(shù)據(jù)庫訪問減少到幾次是編寫高性能User Exit的黃金法則。4. 完整實(shí)操過程從零實(shí)現(xiàn)一個自定義字段讓我們以一個完整的場景為例手把手實(shí)現(xiàn)增強(qiáng)。需求在FBL3N中顯示憑證行項(xiàng)目對應(yīng)的“采購訂單文本”EKKO-BKTXT這是一個通過憑證中的采購訂單號EBELN關(guān)聯(lián)到采購訂單抬頭表EKKO的字段。4.1 第一步創(chuàng)建增強(qiáng)實(shí)施使用事務(wù)碼SE80對象導(dǎo)航器或SE38ABAP編輯器。在SE38中輸入程序名SAPLF086FBL3N的主程序點(diǎn)擊“顯示”。進(jìn)入菜單欄編輯 - 增強(qiáng)操作 - 顯示隱式增強(qiáng)選項(xiàng)或者直接使用快捷鍵CtrlF1。在程序代碼中找到INCLUDE ZXF086U01這就是User ExitEXIT_SAPF086_001的包含程序位置。如果客戶還沒有實(shí)施這個包含程序可能不存在。在包含程序ZXF086U01上右鍵選擇創(chuàng)建實(shí)現(xiàn)。系統(tǒng)會引導(dǎo)你創(chuàng)建一個增強(qiáng)實(shí)施Enhancement Implementation。給它起一個名字比如ZFBL3N_ENH_001并填寫簡短描述。創(chuàng)建完成后系統(tǒng)會自動生成增強(qiáng)點(diǎn)的代碼框架。你會看到類似下面的代碼*---------------------------------------------------------------------- **局部接口 * TABLES * C_TAB STRUCTURE TABSTRUCT * C_ITAB *----------------------------------------------------------------------這個框架里C_TAB和C_ITAB已經(jīng)作為參數(shù)聲明好了我們只需要在框架內(nèi)編寫代碼即可。4.2 第二步在字段目錄(C_TAB)中添加新字段我們需要在出口的一開始就將新字段的定義追加到C_TAB內(nèi)表中。DATA: ls_tab LIKE LINE OF c_tab. 清除工作區(qū) CLEAR ls_tab. 定義字段采購訂單文本 ls_tab-fieldname Z_PO_TEXT. 字段技術(shù)名 ls_tab-tabname ITAB. 參考表 ls_tab-inttype C. 字符類型 ls_tab-intlen 40. 內(nèi)部長度40 ls_tab-outputlen 45. 顯示寬度稍大 ls_tab-seltext_m 采購訂單文本. 列標(biāo)題 ls_tab-seltext_s PO文本. ls_tab-seltext_l 采購訂單抬頭文本. ls_tab-no_out space. 顯示字段 ls_tab-tech space. 非技術(shù)字段 APPEND ls_tab TO c_tab.這段代碼的作用是告訴FBL3N的ALV列表“請?jiān)黾右涣屑夹g(shù)名稱叫Z_PO_TEXT顯示為‘采購訂單文本’寬度45用來放字符數(shù)據(jù)?！?.3 第三步在數(shù)據(jù)內(nèi)表(C_ITAB)中擴(kuò)充結(jié)構(gòu)并填充數(shù)據(jù)C_ITAB是一個動態(tài)內(nèi)表它的結(jié)構(gòu)取決于C_TAB。當(dāng)我們添加了字段定義后C_ITAB會自動擁有一個名為Z_PO_TEXT的組件。我們需要做的是為C_ITAB的每一行數(shù)據(jù)填充Z_PO_TEXT字段的值。這個值需要通過憑證行項(xiàng)目中的采購訂單號EBELN去表EKKO中查找BKTXT字段。DATA: lt_ekko TYPE TABLE OF ekko, ls_ekko TYPE ekko. DATA: lt_ebeln_range TYPE RANGE OF ekko-ebeln, ls_ebeln_range LIKE LINE OF lt_ebeln_range. FIELD-SYMBOLS: fs_itab TYPE ANY, 因?yàn)镃_ITAB是動態(tài)的用泛型字段符號 fs_ebeln TYPE ANY, fs_po_text TYPE ANY. 1. 準(zhǔn)備收集所有出現(xiàn)在行項(xiàng)目中的采購訂單號 LOOP AT c_itab ASSIGNING fs_itab. 動態(tài)分配字段獲取當(dāng)前行EBELN字段的值 ASSIGN COMPONENT EBELN OF STRUCTURE fs_itab TO fs_ebeln. IF sy-subrc 0 AND fs_ebeln IS NOT INITIAL. ls_ebeln_range-sign I. ls_ebeln_range-option EQ. ls_ebeln_range-low fs_ebeln. COLLECT ls_ebeln_range INTO lt_ebeln_range. ENDIF. ENDLOOP. 2. 批量獲取采購訂單文本 IF lt_ebeln_range IS NOT INITIAL. SELECT ebeln, bktxt FROM ekko INTO TABLE lt_ekko WHERE ebeln IN lt_ebeln_range. SORT lt_ekko BY ebeln. ENDIF. 3. 循環(huán)填充數(shù)據(jù) LOOP AT c_itab ASSIGNING fs_itab. 動態(tài)分配字段獲取當(dāng)前行的EBELN字段 ASSIGN COMPONENT EBELN OF STRUCTURE fs_itab TO fs_ebeln. 動態(tài)分配字段獲取當(dāng)前行我們要填充的Z_PO_TEXT字段 ASSIGN COMPONENT Z_PO_TEXT OF STRUCTURE fs_itab TO fs_po_text. IF sy-subrc 0 AND fs_ebeln IS NOT INITIAL AND fs_po_text IS ASSIGNED. 在內(nèi)存表lt_ekko中查找 READ TABLE lt_ekko INTO ls_ekko WITH KEY ebeln fs_ebeln BINARY SEARCH. IF sy-subrc 0. fs_po_text ls_ekko-bktxt. 填充文本 ELSE. CLEAR fs_po_text. 清空避免顯示上一條記錄的值 ENDIF. ENDIF. ENDLOOP.代碼關(guān)鍵點(diǎn)解析動態(tài)字段訪問因?yàn)镃_ITAB的結(jié)構(gòu)在運(yùn)行時才確定我們不能直接用fs_itab-ebeln這樣的靜態(tài)方式訪問字段。必須使用ASSIGN COMPONENT ... OF STRUCTURE ...語句進(jìn)行動態(tài)分配。性能優(yōu)化我們使用了FOR ALL ENTRIES的變體通過構(gòu)建范圍RANGE表并用于IN查詢這是SAP中批量查詢關(guān)聯(lián)表的推薦做法避免了LOOP中的SELECT。清空字段在READ TABLE失敗后主動CLEAR目標(biāo)字段非常重要。如果不這樣做上一行成功讀取的值可能會錯誤地保留在當(dāng)前行導(dǎo)致數(shù)據(jù)錯亂。4.4 第四步激活與測試編寫完所有代碼后點(diǎn)擊激活CtrlF3。返回到SE38初始界面或者直接使用事務(wù)碼FBL3N。輸入查詢條件例如公司代碼、一個已知的包含采購訂單的會計期間執(zhí)行。在輸出的ALV列表界面點(diǎn)擊設(shè)置布局或直接右鍵列頭。在“可用字段”列表中你現(xiàn)在應(yīng)該能找到我們新添加的“采購訂單文本”或Z_PO_TEXT字段。將其移動到“已選字段”區(qū)域確認(rèn)后列表就會顯示出這一列數(shù)據(jù)。踩坑記錄第一次測試時很可能會發(fā)現(xiàn)新字段是空的。別急按以下步驟排查1) 檢查C_TAB中字段的FIELDNAME和C_ITAB中動態(tài)分配的字段名是否完全一致大小寫敏感。2) 在代碼中設(shè)置斷點(diǎn)檢查lt_ekko內(nèi)表是否被正確填充。3) 檢查動態(tài)分配fs_ebeln和fs_po_text的sy-subrc返回值確保字段分配成功。4) 確認(rèn)你查詢的測試數(shù)據(jù)中確實(shí)存在有效的采購訂單號EBELN。5. FAGLL03的增強(qiáng)與特殊考量FAGLL03總賬科目余額顯示的增強(qiáng)邏輯與FBL3N非常相似但它使用的User Exit不同數(shù)據(jù)來源和結(jié)構(gòu)也有差異。通常FAGLL03的增強(qiáng)出口是EXIT_SAPF086_002或類似的出口具體出口號需查閱SAP標(biāo)準(zhǔn)程序SAPF086的文檔或代碼。5.1 FAGLL03與FBL3N的核心差異數(shù)據(jù)粒度不同F(xiàn)BL3N展示的是行項(xiàng)目Line Item每一行代表一張憑證的一個行項(xiàng)目。而FAGLL03展示的是余額Balance每一行代表一個科目或科目輔助核算項(xiàng)在某個期間的期初、本期發(fā)生、期末余額。因此FAGLL03的C_ITAB內(nèi)表結(jié)構(gòu)更聚合。關(guān)鍵字段不同F(xiàn)BL3N的C_ITAB包含憑證號BELNR、行項(xiàng)目號BUZEI等。FAGLL03的C_ITAB則包含總賬科目SAKNR、公司代碼BUKRS、會計年度GJAHR、期間POPER等以及余額字段HSLVT, HSL01...HSL16。增強(qiáng)目的不同為FAGLL03添加字段通常不是為了顯示憑證級別的信息而是為了顯示與科目余額維度相關(guān)的信息。例如你想在科目余額行后面顯示該科目主數(shù)據(jù)中的“科目組”SKB1-KTOPL或“賬戶管理編號”SKB1-MITKZ或者顯示根據(jù)科目和公司代碼從自定義配置表中讀取的“預(yù)算負(fù)責(zé)人”。5.2 為FAGLL03添加“科目組”字段示例假設(shè)我們想在FAGLL03中顯示每個科目的“科目組”SKB1-KTOPL。找到正確的出口通過查閱SAP標(biāo)準(zhǔn)程序SAPF086我們找到用于FAGLL03的出口可能是EXIT_SAPF086_002。創(chuàng)建其包含程序如ZXF086U02的實(shí)現(xiàn)。在C_TAB中添加字段DATA ls_tab LIKE LINE OF c_tab. CLEAR ls_tab. ls_tab-fieldname Z_ACCT_GROUP. ls_tab-tabname ITAB. ls_tab-inttype C. ls_tab-intlen 4. KTOPL 長度通常為4 ls_tab-outputlen 10. ls_tab-seltext_m 科目組. APPEND ls_tab TO c_tab.在C_ITAB中填充數(shù)據(jù)DATA: lt_skb1 TYPE TABLE OF skb1, ls_skb1 TYPE skb1. DATA: lt_key TYPE TABLE OF ty_key, 自定義類型包含BUKRS和SAKNR ls_key TYPE ty_key. FIELD-SYMBOLS: fs_itab TYPE ANY, fs_bukrs TYPE ANY, fs_saknr TYPE ANY, fs_acct_grp TYPE ANY. 1. 收集所有唯一的公司代碼科目組合 LOOP AT c_itab ASSIGNING fs_itab. ASSIGN COMPONENT BUKRS OF STRUCTURE fs_itab TO fs_bukrs. ASSIGN COMPONENT SAKNR OF STRUCTURE fs_itab TO fs_saknr. IF sy-subrc 0. MOVE-CORRESPONDING fs_itab TO ls_key. 假設(shè)ty_key包含BUKRS和SAKNR COLLECT ls_key INTO lt_key. ENDIF. ENDLOOP. 2. 批量查詢SKB1表 IF lt_key IS NOT INITIAL. SELECT bukrs, saknr, ktopl FROM skb1 INTO TABLE lt_skb1 FOR ALL ENTRIES IN lt_key WHERE bukrs lt_key-bukrs AND saknr lt_key-saknr. SORT lt_skb1 BY bukrs saknr. ENDIF. 3. 循環(huán)填充 LOOP AT c_itab ASSIGNING fs_itab. ASSIGN COMPONENT BUKRS OF STRUCTURE fs_itab TO fs_bukrs. ASSIGN COMPONENT SAKNR OF STRUCTURE fs_itab TO fs_saknr. ASSIGN COMPONENT Z_ACCT_GROUP OF STRUCTURE fs_itab TO fs_acct_grp. IF sy-subrc 0 AND fs_bukrs IS NOT INITIAL AND fs_saknr IS NOT INITIAL. READ TABLE lt_skb1 INTO ls_skb1 WITH KEY bukrs fs_bukrs saknr fs_saknr BINARY SEARCH. IF sy-subrc 0. fs_acct_grp ls_skb1-ktopl. ENDIF. ENDIF. ENDLOOP.注意事項(xiàng)FAGLL03的C_ITAB中科目編號字段名可能是SAKNR也可能是RACCT新總賬。在編寫代碼前最好先通過調(diào)試模式查看一下C_ITAB的實(shí)際結(jié)構(gòu)確認(rèn)字段名稱這是避免字段映射錯誤的最可靠方法。6. 常見問題、調(diào)試技巧與性能優(yōu)化即使按照步驟操作在實(shí)際開發(fā)中還是會遇到各種問題。這里分享一些我積累的排查技巧和優(yōu)化經(jīng)驗(yàn)。6.1 字段不顯示或顯示為空白這是最常見的問題。請按以下清單逐一核對字段名拼寫錯誤檢查C_TAB中的FIELDNAME和ASSIGN COMPONENT語句中的字段名字符串是否完全一致包括大小寫。建議將字段名定義為一個常量避免硬編碼字符串。未將字段添加到布局代碼增強(qiáng)只是讓字段“可用”。用戶必須在ALV列表的“設(shè)置布局”或“字段選擇”中手動將新字段添加到顯示列中。數(shù)據(jù)填充邏輯錯誤在填充數(shù)據(jù)的循環(huán)中設(shè)置斷點(diǎn)檢查動態(tài)字段分配是否成功sy-subrc 0。用于查找的關(guān)鍵字段如LIFNR,EBELN是否有值。批量查詢的內(nèi)表如lt_lfa1,lt_ekko是否被正確填充。READ TABLE ... BINARY SEARCH是否成功。確保READ之前源內(nèi)表已按查找關(guān)鍵字正確排序。數(shù)據(jù)類型或長度不匹配C_TAB中定義的INTTYPE和INTLEN必須與你要填充的數(shù)據(jù)類型匹配。例如從BSEG里取一個長度為1的字符字段INTLEN就不能定義為10否則可能導(dǎo)致數(shù)據(jù)錯位。6.2 如何調(diào)試User Exit調(diào)試是解決問題的利器。由于User Exit在標(biāo)準(zhǔn)程序中被調(diào)用需要特殊方式進(jìn)入調(diào)試。方法一在出口代碼中設(shè)置外部斷點(diǎn)在SE38中打開你的增強(qiáng)包含程序如ZXF086U01。在你想要調(diào)試的行號前雙擊設(shè)置斷點(diǎn)。直接執(zhí)行FBL3N。當(dāng)程序運(yùn)行到你的出口代碼時會自動跳轉(zhuǎn)到調(diào)試器。方法二使用/h命令在SAP命令框中輸入/h回車激活調(diào)試模式。執(zhí)行FBL3N輸入查詢條件后執(zhí)行。程序會在第一個可調(diào)試語句處停下。此時你可以使用F5單步執(zhí)行或F6單步跳過逐步運(yùn)行直到進(jìn)入你的User Exit代碼塊。在調(diào)試器中重點(diǎn)關(guān)注C_TAB內(nèi)表檢查你的字段定義是否被成功添加。C_ITAB內(nèi)表查看其動態(tài)結(jié)構(gòu)確認(rèn)你的字段是否已作為組件存在。你定義的內(nèi)部工作表和變量檢查數(shù)據(jù)是否按預(yù)期被填充。6.3 性能優(yōu)化進(jìn)階技巧當(dāng)處理的數(shù)據(jù)量極大數(shù)十萬行時即使使用了批量查詢性能仍可能成為瓶頸。以下是一些進(jìn)階優(yōu)化思路減少不必要的數(shù)據(jù)傳輸在SELECT語句中只選取你真正需要的字段避免SELECT *。這能減少數(shù)據(jù)庫和應(yīng)用程序服務(wù)器之間的網(wǎng)絡(luò)傳輸量。使用更高效的關(guān)聯(lián)如果自定義字段需要從多個表關(guān)聯(lián)獲取考慮是否可以在數(shù)據(jù)庫層面通過一個JOIN視圖來實(shí)現(xiàn)然后在增強(qiáng)中只查詢這一個視圖。但這需要 BASIS 權(quán)限創(chuàng)建視圖。利用緩存如果某些關(guān)聯(lián)數(shù)據(jù)如主數(shù)據(jù)變動不頻繁可以考慮使用SAP內(nèi)存EXPORT/IMPORT或共享內(nèi)存對象進(jìn)行緩存在一定時間內(nèi)如一天避免重復(fù)查詢數(shù)據(jù)庫。但這增加了數(shù)據(jù)一致性的復(fù)雜度需謹(jǐn)慎設(shè)計。審視需求合理性與業(yè)務(wù)部門溝通是否真的需要在初始列表顯示所有行項(xiàng)目的復(fù)雜關(guān)聯(lián)字段有時提供一個“雙擊鉆取”到明細(xì)時再顯示這些字段的功能是更優(yōu)的解決方案。這可以通過增強(qiáng)行項(xiàng)目的雙擊事件比如通過BADIFAGL_ITEM_DISPLAY來實(shí)現(xiàn)將計算開銷分?jǐn)偟接脩糁鲃诱埱髸r。6.4 升級與傳輸注意事項(xiàng)命名空間你的增強(qiáng)程序ZXF086U01創(chuàng)建在客戶命名空間Z/Y通常不會在SAP升級時被覆蓋。但標(biāo)準(zhǔn)程序SAPLF086本身可能會被更新。如果SAP在新版本中修改了調(diào)用出口的方式或內(nèi)部表結(jié)構(gòu)你的增強(qiáng)可能需要調(diào)整。因此在每次系統(tǒng)升級后都需要測試這些自定義增強(qiáng)。傳輸請求確保將增強(qiáng)實(shí)施Enhancement Implementation和包含程序Include Program都包含在同一個傳輸請求中并正確傳輸?shù)綔y試和生產(chǎn)系統(tǒng)。遺漏傳輸包含程序是導(dǎo)致增強(qiáng)在生產(chǎn)系統(tǒng)失效的常見原因。文檔化在增強(qiáng)程序的頭部添加清晰的注釋說明增強(qiáng)的目的、添加的字段、關(guān)聯(lián)的邏輯和作者。這對于后續(xù)維護(hù)至關(guān)重要。為FBL3N和FAGLL03添加自定義字段是SAP財務(wù)模塊實(shí)施和后運(yùn)維中一項(xiàng)極具價值的工作。它直接提升了核心工具的業(yè)務(wù)適配能力。掌握這項(xiàng)技能的關(guān)鍵在于理解ALV字段目錄與數(shù)據(jù)內(nèi)表的配合機(jī)制遵循批量處理的數(shù)據(jù)查詢原則并熟練運(yùn)用調(diào)試工具進(jìn)行問題排查。從簡單的附加字段顯示到復(fù)雜的多表關(guān)聯(lián)與邏輯計算這個框架都能很好地支撐。當(dāng)你成功讓業(yè)務(wù)用戶在熟悉的報表中一眼看到他們夢寐以求的關(guān)鍵信息時那種成就感就是技術(shù)價值最直接的體現(xiàn)。 SAP FBL3N/FAGLL03自定義字段增強(qiáng)：User Exit實(shí)現(xiàn)與性能優(yōu)化
1. 項(xiàng)目概述為什么我們需要自定義總賬報表字段在SAP的日常運(yùn)維和財務(wù)分析中FBL3N總賬科目行項(xiàng)目和FAGLL03總賬科目余額是兩個最常用、最核心的總賬報表事物碼。幾乎每個財務(wù)顧問和關(guān)鍵用戶都離不開它們。但用久了大家都會遇到一個共同的痛點(diǎn)標(biāo)準(zhǔn)報表提供的字段總是不夠用。比如標(biāo)準(zhǔn)FBL3N里你想看每一筆憑證行項(xiàng)目對應(yīng)的利潤中心、成本中心、訂單號這些基礎(chǔ)字段是有的。但如果公司啟用了復(fù)雜的段Segment或功能范圍Functional Area或者你想把供應(yīng)商主數(shù)據(jù)里的某個自定義字段比如“供應(yīng)商風(fēng)險等級”直接拉到行項(xiàng)目清單里標(biāo)準(zhǔn)報表就無能為力了。你只能先導(dǎo)出數(shù)據(jù)再用Excel做VLOOKUP費(fèi)時費(fèi)力還容易出錯。FAGLL03余額顯示也一樣標(biāo)準(zhǔn)視圖可能只顯示科目、期間、本位幣余額但業(yè)務(wù)部門常常需要按成本中心、利潤中心甚至自定義的“業(yè)務(wù)板塊”維度來查看余額。這就是“FBL3N/FAGLL03自定義字段顯示”這個項(xiàng)目的核心價值所在。它不是一個開發(fā)新功能而是對現(xiàn)有核心工具的深度定制和增強(qiáng)讓標(biāo)準(zhǔn)報表能“看見”并展示那些對業(yè)務(wù)至關(guān)重要的、但隱藏在后臺的字段信息。這直接關(guān)系到財務(wù)數(shù)據(jù)的透明度、分析效率和決策支持能力。我經(jīng)歷過太多業(yè)務(wù)用戶抱怨報表不好用最后發(fā)現(xiàn)根源就是缺了幾個關(guān)鍵字段。通過這個自定義項(xiàng)目我們可以把數(shù)據(jù)獲取的主動權(quán)交還給用戶減少IT部門的重復(fù)取數(shù)需求實(shí)現(xiàn)真正的自助式財務(wù)分析。2. 核心思路與方案選型從用戶需求到技術(shù)實(shí)現(xiàn)當(dāng)接到“為FBL3N/FAGLL03增加自定義字段”的需求時一個有經(jīng)驗(yàn)的SAP顧問腦子里會立刻浮現(xiàn)出幾條技術(shù)路徑。我們需要根據(jù)字段的來源、復(fù)雜度和性能要求選擇最合適的那一條。2.1 需求分析與字段溯源首先必須明確要添加的字段是什么、從哪里來。這決定了后續(xù)的技術(shù)方案。通常自定義字段的來源可以分為以下幾類標(biāo)準(zhǔn)表字段字段本身就存在于SAP標(biāo)準(zhǔn)表中只是標(biāo)準(zhǔn)報表的字段選擇Field Selection里沒有包含它。例如憑證行項(xiàng)目表BSEG里的字段ZTERM付款條款、ZLSCH付款方式或者總賬科目主數(shù)據(jù)表SKB1里的某個描述字段。自定義表字段Append Structure業(yè)務(wù)在標(biāo)準(zhǔn)表如BSEG、BKPF上通過附加結(jié)構(gòu)Append Structure添加的Z字段。這是國內(nèi)項(xiàng)目實(shí)施中最常見的情況比如在BSEG上附加一個Z_PROJ_PHASE項(xiàng)目階段字段。關(guān)聯(lián)表字段字段不在主業(yè)務(wù)表里但可以通過某個關(guān)鍵字段關(guān)聯(lián)獲取。例如想顯示供應(yīng)商的國家這個信息在供應(yīng)商主數(shù)據(jù)表LFA1的LAND1字段需要通過BSEG中的LIFNR供應(yīng)商編號去關(guān)聯(lián)。計算字段或邏輯字段字段并非直接存儲在數(shù)據(jù)庫中而是需要通過一些邏輯判斷或簡單計算得出。例如根據(jù)憑證類型BLART和金額判斷業(yè)務(wù)類型或者計算一個行項(xiàng)目距今天的天數(shù)。2.2 主流技術(shù)方案對比針對以上不同來源的字段SAP提供了幾種主流的增強(qiáng)方案各有優(yōu)劣。方案一使用標(biāo)準(zhǔn)增強(qiáng)點(diǎn)User Exit這是最傳統(tǒng)、也是最靈活的方法。SAP在FBL3N和FAGLL03的程序中預(yù)留了用戶出口如EXIT_SAPF086_001。我們可以通過SE38創(chuàng)建包含該出口的增強(qiáng)程序在其中編寫ABAP代碼將自定義字段的數(shù)據(jù)填充到系統(tǒng)預(yù)留的內(nèi)部表中。優(yōu)點(diǎn)功能強(qiáng)大幾乎可以實(shí)現(xiàn)任何邏輯包括復(fù)雜的表關(guān)聯(lián)和計算。缺點(diǎn)需要ABAP開發(fā)能力對顧問技術(shù)要求高代碼維護(hù)在客戶命名空間升級時需要檢查兼容性。適用場景字段來源復(fù)雜如多表關(guān)聯(lián)、復(fù)雜計算或需要高度定制化邏輯時。方案二利用隱式增強(qiáng)Implicit Enhancement在較新版本的SAP基于NetWeaver 7.0以上中可以在報表程序的關(guān)鍵子例程如LIST_FILL中直接插入隱式增強(qiáng)點(diǎn)寫代碼。其原理和User Exit類似但位置更靈活。優(yōu)點(diǎn)無需事先聲明出口直接在標(biāo)準(zhǔn)代碼中插入有時更直接。缺點(diǎn)同樣需要ABAP開發(fā)且如果標(biāo)準(zhǔn)程序升級改動較大增強(qiáng)點(diǎn)可能失效或需要調(diào)整。適用場景作為User Exit的替代方案當(dāng)標(biāo)準(zhǔn)出口不滿足位置要求時使用。方案三通過配置字段組Field Group和會計憑證增強(qiáng)ACDOCA對于新總賬New GL環(huán)境特別是當(dāng)數(shù)據(jù)主要來源于ACDOCAUniversal Journal表時SAP提供了更配置化的增強(qiáng)方式?？梢酝ㄟ^SPRO路徑財務(wù)會計-財務(wù)會計全局設(shè)置-工具-總賬科目的業(yè)務(wù)交易-字段-向總賬科目業(yè)務(wù)交易添加字段來定義字段并將其分配給字段組最終在Fiori或某些新報表中顯示。優(yōu)點(diǎn)標(biāo)準(zhǔn)化、配置化與New GL架構(gòu)集成好升級影響小。缺點(diǎn)主要適用于基于ACDOCA的字段和場景對傳統(tǒng)的BSEG表支持有限配置相對復(fù)雜。適用場景公司已全面啟用新總賬且自定義字段需要在新總賬憑證中更新和報告。方案四使用報表繪制器Report Painter或報表編寫器Report Writer這是一個完全不同的思路不修改FBL3N/FAGLL03而是用SAP自帶的報表工具Report Painter/Writer基于相同的底層表如BSEG、FAGLFLEXT重新制作一個報表在制作過程中可以自由選擇任何字段。優(yōu)點(diǎn)無需ABAP開發(fā)純配置功能強(qiáng)大可以制作出格式更復(fù)雜的報表。缺點(diǎn)學(xué)習(xí)成本高維護(hù)的是另一個獨(dú)立的報表對象用戶需要學(xué)習(xí)使用新事物碼。適用場景需求不僅僅是加字段而是涉及復(fù)雜的報表布局、格式計算時或者作為長期方案替代頻繁增強(qiáng)標(biāo)準(zhǔn)事務(wù)碼。實(shí)操心得在大多數(shù)傳統(tǒng)ECC或S/4 HANA的經(jīng)典場景下對于在FBL3N/FAGLL03中快速添加幾個自定義字段的需求方案一User Exit仍然是平衡效率、靈活性和穩(wěn)定性的首選。它直接作用于用戶最熟悉的事物碼改動直觀。本篇文章后續(xù)的詳細(xì)實(shí)操也將圍繞此方案展開。3. 核心細(xì)節(jié)解析解剖FBL3N的User Exit我們以最常用的FBL3N為例深入看一下如何使用User ExitEXIT_SAPF086_001來實(shí)現(xiàn)自定義字段的顯示。理解這個出口的運(yùn)作機(jī)制是成功的關(guān)鍵。3.1 出口結(jié)構(gòu)與數(shù)據(jù)流當(dāng)你執(zhí)行FBL3N時系統(tǒng)大致遵循以下流程根據(jù)用戶輸入的篩選條件公司代碼、會計期間、科目等從數(shù)據(jù)庫表主要是BSEG關(guān)聯(lián)BKPF等中讀取數(shù)據(jù)。將讀取到的數(shù)據(jù)填充到一個系統(tǒng)定義好的內(nèi)部表ITAB中這個表是FBL3N顯示列表的數(shù)據(jù)源。在將ITAB輸出到屏幕列表之前系統(tǒng)會調(diào)用出口EXIT_SAPF086_001。在這個出口里我們可以編寫代碼為ITAB的每一行數(shù)據(jù)補(bǔ)充我們想要的自定義字段的值。系統(tǒng)繼續(xù)執(zhí)行將增強(qiáng)后的ITAB顯示出來。出口EXIT_SAPF086_001的接口參數(shù)是固定的主要包含兩個重要的內(nèi)表C_TAB這是一個字段目錄Field Catalog定義了ALV列表將要顯示的所有字段。我們需要在這里添加自定義字段的定義。C_ITAB這就是上面提到的數(shù)據(jù)內(nèi)表ITAB。我們需要在這里添加自定義字段對應(yīng)的數(shù)據(jù)列并為每一行填充數(shù)據(jù)。所以增強(qiáng)的核心工作就兩步在C_TAB中注冊新字段在C_ITAB中填充新字段的數(shù)據(jù)。3.2 字段定義的關(guān)鍵參數(shù)在C_TAB中添加字段時有幾個參數(shù)必須正確設(shè)置否則字段可能無法顯示或功能異常參數(shù)名說明示例與注意事項(xiàng)FIELDNAME字段的技術(shù)名稱必須唯一建議以Z或Y開頭如Z_CUST_FIELDTABNAME參考表名通常填寫ITAB表示這是輸出內(nèi)表中的一個字段INTTYPE內(nèi)部數(shù)據(jù)類型C字符、N數(shù)值、D日期等需與數(shù)據(jù)實(shí)際類型匹配INTLEN內(nèi)部長度字段的長度如10, 20, 40等OUTPUTLEN輸出長度在ALV列表中顯示的寬度通常略大于或等于INTLENSELTEXT_M中字段描述將在列表列頭顯示的文字如“供應(yīng)商風(fēng)險等級”SELTEXT_S短字段描述縮寫描述SELTEXT_L長字段描述詳細(xì)描述NO_OUT是否隱藏空格顯示‘X’隱藏。可用于存儲中間數(shù)據(jù)。TECH是否技術(shù)字段空格業(yè)務(wù)字段‘X’技術(shù)字段通常隱藏。EDIT_MASK輸出格式模板控制顯示格式如日期DATUM金額WERT注意事項(xiàng)INTTYPE和INTLEN必須與你準(zhǔn)備填充的數(shù)據(jù)類型嚴(yán)格一致。例如從BSEG的附加結(jié)構(gòu)里取一個長度為20的字符字段那么INTTYPE應(yīng)為CINTLEN應(yīng)為20。如果設(shè)置錯誤在填充數(shù)據(jù)時可能會發(fā)生運(yùn)行時錯誤或數(shù)據(jù)截斷。3.3 數(shù)據(jù)填充的邏輯與性能在C_ITAB中填充數(shù)據(jù)是編碼的核心。這里有一個極其重要的技巧避免在循環(huán)中執(zhí)行單條查詢SELECT SINGLE。假設(shè)我們要為FBL3N添加兩個字段Z_VENDOR_COUNTRY供應(yīng)商國家來自LFA1-LAND1。Z_PROJ_PHASE項(xiàng)目階段來自BSEG的附加結(jié)構(gòu)字段。錯誤的做法性能殺手LOOP AT c_itab ASSIGNING fs_itab. 為每一行單獨(dú)查詢供應(yīng)商主數(shù)據(jù) SELECT SINGLE land1 FROM lfa1 INTO fs_itab-z_vendor_country WHERE lifnr fs_itab-lifnr. 直接讀取附加結(jié)構(gòu)字段假設(shè)已包含在BSEG中但標(biāo)準(zhǔn)ITAB未傳遞 SELECT SINGLE z_proj_phase FROM bseg INTO fs_itab-z_proj_phase WHERE bukrs fs_itab-bukrs AND belnr fs_itab-belnr AND gjahr fs_itab-gjahr AND buzei fs_itab-buzei. ENDLOOP.如果C_ITAB有1萬行這個循環(huán)將執(zhí)行2萬次數(shù)據(jù)庫查詢會嚴(yán)重拖慢報表速度。正確的做法批量處理DATA: lt_lfa1 TYPE TABLE OF lfa1, lt_bseg TYPE TABLE OF bseg. DATA: ls_lfa1 TYPE lfa1, ls_bseg TYPE bseg. 1. 收集所有需要查詢的供應(yīng)商編號 LOOP AT c_itab ASSIGNING fs_itab WHERE lifnr IS NOT INITIAL. COLLECT fs_itab-lifnr INTO lt_lifnr_range. ENDLOOP. 2. 一次性批量查詢供應(yīng)商數(shù)據(jù) IF lt_lifnr_range IS NOT INITIAL. SELECT lifnr, land1 FROM lfa1 INTO TABLE lt_lfa1 FOR ALL ENTRIES IN lt_lifnr_range WHERE lifnr lt_lifnr_range-lifnr. SORT lt_lfa1 BY lifnr. ENDIF. 3. 收集所有需要查詢的憑證行項(xiàng)目關(guān)鍵字段 LOOP AT c_itab ASSIGNING fs_itab. MOVE-CORRESPONDING fs_itab TO ls_key. COLLECT ls_key INTO lt_bseg_key. ENDLOOP. 4. 一次性批量查詢BSEG附加字段 IF lt_bseg_key IS NOT INITIAL. SELECT bukrs, belnr, gjahr, buzei, z_proj_phase FROM bseg INTO TABLE lt_bseg FOR ALL ENTRIES IN lt_bseg_key WHERE bukrs lt_bseg_key-bukrs AND belnr lt_bseg_key-belnr AND gjahr lt_bseg_key-gjahr AND buzei lt_bseg_key-buzei. SORT lt_bseg BY bukrs belnr gjahr buzei. ENDIF. 5. 在循環(huán)中使用READ TABLE讀取內(nèi)存中的數(shù)據(jù) LOOP AT c_itab ASSIGNING fs_itab. 填充供應(yīng)商國家 IF fs_itab-lifnr IS NOT INITIAL. READ TABLE lt_lfa1 INTO ls_lfa1 WITH KEY lifnr fs_itab-lifnr BINARY SEARCH. IF sy-subrc 0. fs_itab-z_vendor_country ls_lfa1-land1. ENDIF. ENDIF. 填充項(xiàng)目階段 READ TABLE lt_bseg INTO ls_bseg WITH KEY bukrs fs_itab-bukrs belnr fs_itab-belnr gjahr fs_itab-gjahr buzei fs_itab-buzei BINARY SEARCH. IF sy-subrc 0. fs_itab-z_proj_phase ls_bseg-z_proj_phase. ENDIF. ENDLOOP.這種方法將數(shù)萬次數(shù)據(jù)庫訪問減少到幾次是編寫高性能User Exit的黃金法則。4. 完整實(shí)操過程從零實(shí)現(xiàn)一個自定義字段讓我們以一個完整的場景為例手把手實(shí)現(xiàn)增強(qiáng)。需求在FBL3N中顯示憑證行項(xiàng)目對應(yīng)的“采購訂單文本”EKKO-BKTXT這是一個通過憑證中的采購訂單號EBELN關(guān)聯(lián)到采購訂單抬頭表EKKO的字段。4.1 第一步創(chuàng)建增強(qiáng)實(shí)施使用事務(wù)碼SE80對象導(dǎo)航器或SE38ABAP編輯器。在SE38中輸入程序名SAPLF086FBL3N的主程序點(diǎn)擊“顯示”。進(jìn)入菜單欄編輯 - 增強(qiáng)操作 - 顯示隱式增強(qiáng)選項(xiàng)或者直接使用快捷鍵CtrlF1。在程序代碼中找到INCLUDE ZXF086U01這就是User ExitEXIT_SAPF086_001的包含程序位置。如果客戶還沒有實(shí)施這個包含程序可能不存在。在包含程序ZXF086U01上右鍵選擇創(chuàng)建實(shí)現(xiàn)。系統(tǒng)會引導(dǎo)你創(chuàng)建一個增強(qiáng)實(shí)施Enhancement Implementation。給它起一個名字比如ZFBL3N_ENH_001并填寫簡短描述。創(chuàng)建完成后系統(tǒng)會自動生成增強(qiáng)點(diǎn)的代碼框架。你會看到類似下面的代碼*---------------------------------------------------------------------- **局部接口 * TABLES * C_TAB STRUCTURE TABSTRUCT * C_ITAB *----------------------------------------------------------------------這個框架里C_TAB和C_ITAB已經(jīng)作為參數(shù)聲明好了我們只需要在框架內(nèi)編寫代碼即可。4.2 第二步在字段目錄(C_TAB)中添加新字段我們需要在出口的一開始就將新字段的定義追加到C_TAB內(nèi)表中。DATA: ls_tab LIKE LINE OF c_tab. 清除工作區(qū) CLEAR ls_tab. 定義字段采購訂單文本 ls_tab-fieldname Z_PO_TEXT. 字段技術(shù)名 ls_tab-tabname ITAB. 參考表 ls_tab-inttype C. 字符類型 ls_tab-intlen 40. 內(nèi)部長度40 ls_tab-outputlen 45. 顯示寬度稍大 ls_tab-seltext_m 采購訂單文本. 列標(biāo)題 ls_tab-seltext_s PO文本. ls_tab-seltext_l 采購訂單抬頭文本. ls_tab-no_out space. 顯示字段 ls_tab-tech space. 非技術(shù)字段 APPEND ls_tab TO c_tab.這段代碼的作用是告訴FBL3N的ALV列表“請?jiān)黾右涣屑夹g(shù)名稱叫Z_PO_TEXT顯示為‘采購訂單文本’寬度45用來放字符數(shù)據(jù)?！?.3 第三步在數(shù)據(jù)內(nèi)表(C_ITAB)中擴(kuò)充結(jié)構(gòu)并填充數(shù)據(jù)C_ITAB是一個動態(tài)內(nèi)表它的結(jié)構(gòu)取決于C_TAB。當(dāng)我們添加了字段定義后C_ITAB會自動擁有一個名為Z_PO_TEXT的組件。我們需要做的是為C_ITAB的每一行數(shù)據(jù)填充Z_PO_TEXT字段的值。這個值需要通過憑證行項(xiàng)目中的采購訂單號EBELN去表EKKO中查找BKTXT字段。DATA: lt_ekko TYPE TABLE OF ekko, ls_ekko TYPE ekko. DATA: lt_ebeln_range TYPE RANGE OF ekko-ebeln, ls_ebeln_range LIKE LINE OF lt_ebeln_range. FIELD-SYMBOLS: fs_itab TYPE ANY, 因?yàn)镃_ITAB是動態(tài)的用泛型字段符號 fs_ebeln TYPE ANY, fs_po_text TYPE ANY. 1. 準(zhǔn)備收集所有出現(xiàn)在行項(xiàng)目中的采購訂單號 LOOP AT c_itab ASSIGNING fs_itab. 動態(tài)分配字段獲取當(dāng)前行EBELN字段的值 ASSIGN COMPONENT EBELN OF STRUCTURE fs_itab TO fs_ebeln. IF sy-subrc 0 AND fs_ebeln IS NOT INITIAL. ls_ebeln_range-sign I. ls_ebeln_range-option EQ. ls_ebeln_range-low fs_ebeln. COLLECT ls_ebeln_range INTO lt_ebeln_range. ENDIF. ENDLOOP. 2. 批量獲取采購訂單文本 IF lt_ebeln_range IS NOT INITIAL. SELECT ebeln, bktxt FROM ekko INTO TABLE lt_ekko WHERE ebeln IN lt_ebeln_range. SORT lt_ekko BY ebeln. ENDIF. 3. 循環(huán)填充數(shù)據(jù) LOOP AT c_itab ASSIGNING fs_itab. 動態(tài)分配字段獲取當(dāng)前行的EBELN字段 ASSIGN COMPONENT EBELN OF STRUCTURE fs_itab TO fs_ebeln. 動態(tài)分配字段獲取當(dāng)前行我們要填充的Z_PO_TEXT字段 ASSIGN COMPONENT Z_PO_TEXT OF STRUCTURE fs_itab TO fs_po_text. IF sy-subrc 0 AND fs_ebeln IS NOT INITIAL AND fs_po_text IS ASSIGNED. 在內(nèi)存表lt_ekko中查找 READ TABLE lt_ekko INTO ls_ekko WITH KEY ebeln fs_ebeln BINARY SEARCH. IF sy-subrc 0. fs_po_text ls_ekko-bktxt. 填充文本 ELSE. CLEAR fs_po_text. 清空避免顯示上一條記錄的值 ENDIF. ENDIF. ENDLOOP.代碼關(guān)鍵點(diǎn)解析動態(tài)字段訪問因?yàn)镃_ITAB的結(jié)構(gòu)在運(yùn)行時才確定我們不能直接用fs_itab-ebeln這樣的靜態(tài)方式訪問字段。必須使用ASSIGN COMPONENT ... OF STRUCTURE ...語句進(jìn)行動態(tài)分配。性能優(yōu)化我們使用了FOR ALL ENTRIES的變體通過構(gòu)建范圍RANGE表并用于IN查詢這是SAP中批量查詢關(guān)聯(lián)表的推薦做法避免了LOOP中的SELECT。清空字段在READ TABLE失敗后主動CLEAR目標(biāo)字段非常重要。如果不這樣做上一行成功讀取的值可能會錯誤地保留在當(dāng)前行導(dǎo)致數(shù)據(jù)錯亂。4.4 第四步激活與測試編寫完所有代碼后點(diǎn)擊激活CtrlF3。返回到SE38初始界面或者直接使用事務(wù)碼FBL3N。輸入查詢條件例如公司代碼、一個已知的包含采購訂單的會計期間執(zhí)行。在輸出的ALV列表界面點(diǎn)擊設(shè)置布局或直接右鍵列頭。在“可用字段”列表中你現(xiàn)在應(yīng)該能找到我們新添加的“采購訂單文本”或Z_PO_TEXT字段。將其移動到“已選字段”區(qū)域確認(rèn)后列表就會顯示出這一列數(shù)據(jù)。踩坑記錄第一次測試時很可能會發(fā)現(xiàn)新字段是空的。別急按以下步驟排查1) 檢查C_TAB中字段的FIELDNAME和C_ITAB中動態(tài)分配的字段名是否完全一致大小寫敏感。2) 在代碼中設(shè)置斷點(diǎn)檢查lt_ekko內(nèi)表是否被正確填充。3) 檢查動態(tài)分配fs_ebeln和fs_po_text的sy-subrc返回值確保字段分配成功。4) 確認(rèn)你查詢的測試數(shù)據(jù)中確實(shí)存在有效的采購訂單號EBELN。5. FAGLL03的增強(qiáng)與特殊考量FAGLL03總賬科目余額顯示的增強(qiáng)邏輯與FBL3N非常相似但它使用的User Exit不同數(shù)據(jù)來源和結(jié)構(gòu)也有差異。通常FAGLL03的增強(qiáng)出口是EXIT_SAPF086_002或類似的出口具體出口號需查閱SAP標(biāo)準(zhǔn)程序SAPF086的文檔或代碼。5.1 FAGLL03與FBL3N的核心差異數(shù)據(jù)粒度不同F(xiàn)BL3N展示的是行項(xiàng)目Line Item每一行代表一張憑證的一個行項(xiàng)目。而FAGLL03展示的是余額Balance每一行代表一個科目或科目輔助核算項(xiàng)在某個期間的期初、本期發(fā)生、期末余額。因此FAGLL03的C_ITAB內(nèi)表結(jié)構(gòu)更聚合。關(guān)鍵字段不同F(xiàn)BL3N的C_ITAB包含憑證號BELNR、行項(xiàng)目號BUZEI等。FAGLL03的C_ITAB則包含總賬科目SAKNR、公司代碼BUKRS、會計年度GJAHR、期間POPER等以及余額字段HSLVT, HSL01...HSL16。增強(qiáng)目的不同為FAGLL03添加字段通常不是為了顯示憑證級別的信息而是為了顯示與科目余額維度相關(guān)的信息。例如你想在科目余額行后面顯示該科目主數(shù)據(jù)中的“科目組”SKB1-KTOPL或“賬戶管理編號”SKB1-MITKZ或者顯示根據(jù)科目和公司代碼從自定義配置表中讀取的“預(yù)算負(fù)責(zé)人”。5.2 為FAGLL03添加“科目組”字段示例假設(shè)我們想在FAGLL03中顯示每個科目的“科目組”SKB1-KTOPL。找到正確的出口通過查閱SAP標(biāo)準(zhǔn)程序SAPF086我們找到用于FAGLL03的出口可能是EXIT_SAPF086_002。創(chuàng)建其包含程序如ZXF086U02的實(shí)現(xiàn)。在C_TAB中添加字段DATA ls_tab LIKE LINE OF c_tab. CLEAR ls_tab. ls_tab-fieldname Z_ACCT_GROUP. ls_tab-tabname ITAB. ls_tab-inttype C. ls_tab-intlen 4. KTOPL 長度通常為4 ls_tab-outputlen 10. ls_tab-seltext_m 科目組. APPEND ls_tab TO c_tab.在C_ITAB中填充數(shù)據(jù)DATA: lt_skb1 TYPE TABLE OF skb1, ls_skb1 TYPE skb1. DATA: lt_key TYPE TABLE OF ty_key, 自定義類型包含BUKRS和SAKNR ls_key TYPE ty_key. FIELD-SYMBOLS: fs_itab TYPE ANY, fs_bukrs TYPE ANY, fs_saknr TYPE ANY, fs_acct_grp TYPE ANY. 1. 收集所有唯一的公司代碼科目組合 LOOP AT c_itab ASSIGNING fs_itab. ASSIGN COMPONENT BUKRS OF STRUCTURE fs_itab TO fs_bukrs. ASSIGN COMPONENT SAKNR OF STRUCTURE fs_itab TO fs_saknr. IF sy-subrc 0. MOVE-CORRESPONDING fs_itab TO ls_key. 假設(shè)ty_key包含BUKRS和SAKNR COLLECT ls_key INTO lt_key. ENDIF. ENDLOOP. 2. 批量查詢SKB1表 IF lt_key IS NOT INITIAL. SELECT bukrs, saknr, ktopl FROM skb1 INTO TABLE lt_skb1 FOR ALL ENTRIES IN lt_key WHERE bukrs lt_key-bukrs AND saknr lt_key-saknr. SORT lt_skb1 BY bukrs saknr. ENDIF. 3. 循環(huán)填充 LOOP AT c_itab ASSIGNING fs_itab. ASSIGN COMPONENT BUKRS OF STRUCTURE fs_itab TO fs_bukrs. ASSIGN COMPONENT SAKNR OF STRUCTURE fs_itab TO fs_saknr. ASSIGN COMPONENT Z_ACCT_GROUP OF STRUCTURE fs_itab TO fs_acct_grp. IF sy-subrc 0 AND fs_bukrs IS NOT INITIAL AND fs_saknr IS NOT INITIAL. READ TABLE lt_skb1 INTO ls_skb1 WITH KEY bukrs fs_bukrs saknr fs_saknr BINARY SEARCH. IF sy-subrc 0. fs_acct_grp ls_skb1-ktopl. ENDIF. ENDIF. ENDLOOP.注意事項(xiàng)FAGLL03的C_ITAB中科目編號字段名可能是SAKNR也可能是RACCT新總賬。在編寫代碼前最好先通過調(diào)試模式查看一下C_ITAB的實(shí)際結(jié)構(gòu)確認(rèn)字段名稱這是避免字段映射錯誤的最可靠方法。6. 常見問題、調(diào)試技巧與性能優(yōu)化即使按照步驟操作在實(shí)際開發(fā)中還是會遇到各種問題。這里分享一些我積累的排查技巧和優(yōu)化經(jīng)驗(yàn)。6.1 字段不顯示或顯示為空白這是最常見的問題。請按以下清單逐一核對字段名拼寫錯誤檢查C_TAB中的FIELDNAME和ASSIGN COMPONENT語句中的字段名字符串是否完全一致包括大小寫。建議將字段名定義為一個常量避免硬編碼字符串。未將字段添加到布局代碼增強(qiáng)只是讓字段“可用”。用戶必須在ALV列表的“設(shè)置布局”或“字段選擇”中手動將新字段添加到顯示列中。數(shù)據(jù)填充邏輯錯誤在填充數(shù)據(jù)的循環(huán)中設(shè)置斷點(diǎn)檢查動態(tài)字段分配是否成功sy-subrc 0。用于查找的關(guān)鍵字段如LIFNR,EBELN是否有值。批量查詢的內(nèi)表如lt_lfa1,lt_ekko是否被正確填充。READ TABLE ... BINARY SEARCH是否成功。確保READ之前源內(nèi)表已按查找關(guān)鍵字正確排序。數(shù)據(jù)類型或長度不匹配C_TAB中定義的INTTYPE和INTLEN必須與你要填充的數(shù)據(jù)類型匹配。例如從BSEG里取一個長度為1的字符字段INTLEN就不能定義為10否則可能導(dǎo)致數(shù)據(jù)錯位。6.2 如何調(diào)試User Exit調(diào)試是解決問題的利器。由于User Exit在標(biāo)準(zhǔn)程序中被調(diào)用需要特殊方式進(jìn)入調(diào)試。方法一在出口代碼中設(shè)置外部斷點(diǎn)在SE38中打開你的增強(qiáng)包含程序如ZXF086U01。在你想要調(diào)試的行號前雙擊設(shè)置斷點(diǎn)。直接執(zhí)行FBL3N。當(dāng)程序運(yùn)行到你的出口代碼時會自動跳轉(zhuǎn)到調(diào)試器。方法二使用/h命令在SAP命令框中輸入/h回車激活調(diào)試模式。執(zhí)行FBL3N輸入查詢條件后執(zhí)行。程序會在第一個可調(diào)試語句處停下。此時你可以使用F5單步執(zhí)行或F6單步跳過逐步運(yùn)行直到進(jìn)入你的User Exit代碼塊。在調(diào)試器中重點(diǎn)關(guān)注C_TAB內(nèi)表檢查你的字段定義是否被成功添加。C_ITAB內(nèi)表查看其動態(tài)結(jié)構(gòu)確認(rèn)你的字段是否已作為組件存在。你定義的內(nèi)部工作表和變量檢查數(shù)據(jù)是否按預(yù)期被填充。6.3 性能優(yōu)化進(jìn)階技巧當(dāng)處理的數(shù)據(jù)量極大數(shù)十萬行時即使使用了批量查詢性能仍可能成為瓶頸。以下是一些進(jìn)階優(yōu)化思路減少不必要的數(shù)據(jù)傳輸在SELECT語句中只選取你真正需要的字段避免SELECT *。這能減少數(shù)據(jù)庫和應(yīng)用程序服務(wù)器之間的網(wǎng)絡(luò)傳輸量。使用更高效的關(guān)聯(lián)如果自定義字段需要從多個表關(guān)聯(lián)獲取考慮是否可以在數(shù)據(jù)庫層面通過一個JOIN視圖來實(shí)現(xiàn)然后在增強(qiáng)中只查詢這一個視圖。但這需要 BASIS 權(quán)限創(chuàng)建視圖。利用緩存如果某些關(guān)聯(lián)數(shù)據(jù)如主數(shù)據(jù)變動不頻繁可以考慮使用SAP內(nèi)存EXPORT/IMPORT或共享內(nèi)存對象進(jìn)行緩存在一定時間內(nèi)如一天避免重復(fù)查詢數(shù)據(jù)庫。但這增加了數(shù)據(jù)一致性的復(fù)雜度需謹(jǐn)慎設(shè)計。審視需求合理性與業(yè)務(wù)部門溝通是否真的需要在初始列表顯示所有行項(xiàng)目的復(fù)雜關(guān)聯(lián)字段有時提供一個“雙擊鉆取”到明細(xì)時再顯示這些字段的功能是更優(yōu)的解決方案。這可以通過增強(qiáng)行項(xiàng)目的雙擊事件比如通過BADIFAGL_ITEM_DISPLAY來實(shí)現(xiàn)將計算開銷分?jǐn)偟接脩糁鲃诱埱髸r。6.4 升級與傳輸注意事項(xiàng)命名空間你的增強(qiáng)程序ZXF086U01創(chuàng)建在客戶命名空間Z/Y通常不會在SAP升級時被覆蓋。但標(biāo)準(zhǔn)程序SAPLF086本身可能會被更新。如果SAP在新版本中修改了調(diào)用出口的方式或內(nèi)部表結(jié)構(gòu)你的增強(qiáng)可能需要調(diào)整。因此在每次系統(tǒng)升級后都需要測試這些自定義增強(qiáng)。傳輸請求確保將增強(qiáng)實(shí)施Enhancement Implementation和包含程序Include Program都包含在同一個傳輸請求中并正確傳輸?shù)綔y試和生產(chǎn)系統(tǒng)。遺漏傳輸包含程序是導(dǎo)致增強(qiáng)在生產(chǎn)系統(tǒng)失效的常見原因。文檔化在增強(qiáng)程序的頭部添加清晰的注釋說明增強(qiáng)的目的、添加的字段、關(guān)聯(lián)的邏輯和作者。這對于后續(xù)維護(hù)至關(guān)重要。為FBL3N和FAGLL03添加自定義字段是SAP財務(wù)模塊實(shí)施和后運(yùn)維中一項(xiàng)極具價值的工作。它直接提升了核心工具的業(yè)務(wù)適配能力。掌握這項(xiàng)技能的關(guān)鍵在于理解ALV字段目錄與數(shù)據(jù)內(nèi)表的配合機(jī)制遵循批量處理的數(shù)據(jù)查詢原則并熟練運(yùn)用調(diào)試工具進(jìn)行問題排查。從簡單的附加字段顯示到復(fù)雜的多表關(guān)聯(lián)與邏輯計算這個框架都能很好地支撐。當(dāng)你成功讓業(yè)務(wù)用戶在熟悉的報表中一眼看到他們夢寐以求的關(guān)鍵信息時那種成就感就是技術(shù)價值最直接的體現(xiàn)。