CO01创建生产订单长文本成功，但是界面不显示内容

我们经常习惯了用CREATE_TEXT或SAVE_TEXT 函数创建长文本，一般场景都是OK的，但是创建某些订单的长文本就可能有BUG，比如创建生产订单的长文本，实际是创建成功，但是CO03前台界面不显示。

查阅了很多资料，最终发现是由于生产订单主数据表AUFK-LTEXT缺少值导致的，像这样的场景还有很多，详见NOTE：1982719

SAP推荐创建长文本首选在创建订单的BAPI里直接创建，如果没有对应的BAPI再选择CREATE_TEXT或SAVE_TEXT 函数，如PM订单就有对应的BAPI：BAPI_ALM_ORDER_MAINTAIN ，IT_TEXT对应的长文本。

暴力方式：直接更新标准表字段值

1. DATA:lv_name  TYPE thead-tdname.
   
2. 
   
3. lv_name = sy-mandt && ls_aufk-aufnr.
   
4. PERFORM frm_create_text USING 'KOPF' lv_name 'AUFK'
   
5.                       CHANGING git_head_print-text_l.
   
6. 
   
7. FORM frm_create_text USING pi_id TYPE thead-tdid
   
8.                            pi_name TYPE thead-tdname
   
9.                            pi_object TYPE thead-tdobject
   
10.                      CHANGING pc_text TYPE zdetext_l.
    
11. 
    
12.   DATA:lt_line  TYPE TABLE OF tline.
    
13.   DATA:ls_line  TYPE tline .
    
14.   DATA:lv_aufnr TYPE aufk-aufnr.
    
15. 
    
16.   WHILE pc_text <> '' .
    
17.     CLEAR ls_line .
    
18.     ls_line-tdformat = '*'.
    
19.     ls_line-tdline = pc_text+0(132).
    
20.     APPEND ls_line TO lt_line .
    
21.     pc_text  = pc_text+132(255) .
    
22.   ENDWHILE .
    
23. 
    
24.   CALL FUNCTION 'CREATE_TEXT' "表抬头
    
25.     EXPORTING
    
26.       fid         = pi_id
    
27.       flanguage   = sy-langu
    
28.       fname       = pi_name
    
29.       fobject     = pi_object
    
30.       save_direct = 'X'
    
31.     TABLES
    
32.       flines      = lt_line
    
33.     EXCEPTIONS
    
34.       no_init     = 1
    
35.       no_save     = 2
    
36.       OTHERS      = 3.
    
37.   IF sy-subrc = 0.
    
38.     lv_aufnr = pi_name+3(12).
    
39.     UPDATE aufk SET ltext = sy-langu WHERE aufnr EQ lv_aufnr. "CO03 显示长文本
    
40.   ENDIF.
    
41. 
    
42. ENDFORM.

复制代码

注意LTEXT的值不是X
或者使用函数：SAVE_TEXT，将SAVEMODE_DIRECT = ‘X’ 效果一样

除此之外，需要更新的标识汇总如下：

• Orders : field AUFK-LTEXT
• Operations : field AFVC-TXTSP
• Confirmations : field AFRU-TXTSP
• Notifications : field QMEL-INDTX
• Notifications tasks : field QMFE-INDTX
• Maintenance plan: MPLA-LTKNZ
• Maintenance item : MPOS-LTKNZ
• Equipment : EQKT-KZLTX
• Functional locations : IFLO-KZLTX
• Task list : PLKO-TXTSP
• Operation task lists : PLPO-TXTSP