谢谢harishkumar.d ...这是我的第一个方法，但是BDC不会返回我想要的字段，我必须保存估计，这是客户不希望的一件事...

但是与此同时（经过大量标准调试），我想出了一个解决方案...

 *＆---------------------------------------------  ------------------------ *
 *＆报告ZTESTERJM
 *＆
 *＆------------------------------------------------  --------------------- *
 *＆
 *＆
 *＆------------------------------------------------  --------------------- *

 报告ZTESTERJM。

 数据：
       ls_keph像keph，
       k_faktor TYPE f，
       lv_meng1喜欢keko-losgr，
       lv_unit1喜欢keko-meins，
       lv_meng2像keko-losgr一样，
       lv_unit2喜欢keko-meins，
       lv_elehk像keko-elehk，
       lv_sicht1喜欢kuse-sicht1，
       lv_val_tot像cki64a-gk_sicht1，
       lv_val_fix像cki64a-fk_sicht1，
       lv_val_var像cki64a-vk_sicht1，
       f_tckh8x喜欢v_ckh8。


 数据：t_tckh8x像v_ckh8的10号广告标题行，
       t_tckh8像tckh8出现在标题行中的0，
       t_tckh9像tckh9的标题行一起出现0。

 DATA ls_keko像keko。



 参数：p_matnr像mara-matnr。




 lv_meng1 = '50 .000'。  "勇气无畏
 lv_unit1 ='UN'。  " Unidade a colocar no inicio ecran？ou por defeito
 lv_meng2 ='1.000'。  " QuantidadeReferência（keko-losau-> Tamanho de lote考虑和回避）
 lv_unit2 ='UN'。  "梅迪达大学（keko-meins->梅迪达大学avaliação）

 lv_elehk ='Z1'。  " Esquema de elementos-custos de prod。e custos adm。+ vendas（01" Esquema Modelo"; Z1" Esquema Portobay"）
 lv_sicht1 ='01'。  "Visãodos elementos de Custo（01" CustosProdução"...。Ver tabela KUSE）


 选择单*从可可
                 进入ls_keko
                哪里kalka ='01'
                  AND kadky> ='20110501'
                  AND tvers ='01'
                  AND bwvar ='Z01'
                  AND matnr = p_matnr。

 如果sy-subrc = 0。
   选择单*从keph
                   INTO ls_keph
                  在哪里bzobj = ls_keko-bzobj
                    AND kalnr = ls_keko-kalnr
                    AND kadky = ls_keko-kadky
                    AND tvers = ls_keko-tvers
                    AND bwvar = ls_keko-bwvar
                    AND keart ='H'
                    AND kkzst ="。
 万一。


 调用功能'CK_F_TCKH4_HIERARCHY_READING'
   出口
     p_elehk ='01'
   桌子
     t_tckh8 = t_tckh8
     t_tckh9 = t_tckh9。

 在计划SAPLCKDI表中执行fill_tckh8x t_tckh8
                                                 t_tckh9
                                                 t_tckh8x。

 使用p_matnr执行define_faktor
                          更改lv_meng1
                                   lv_unit1
                                   lv_meng2
                                   lv_unit2
                                   k_faktor。

 *使用lv_elehk在程序SAPLCKDI中执行berechne_kosten_f0b
 * lv_sicht1
 * ls_keph
 * k_faktor
 *                                                      空间
 * lv_val_tot
 * lv_val_fix
 * lv_val_var。

 使用lv_elehk执行calculo_custos
                                                       lv_sicht1
                                                       ls_keph
                                                       k_faktor
                                                       空间
                                                       lv_val_tot
                                                       lv_val_fix
                                                       lv_val_var。

 BREAK-POINT。
 *＆------------------------------------------------  --------------------- *
 *＆表格DETERMINE_FAKTOR
 *＆------------------------------------------------  --------------------- *
 *文字
 * -------------------------------------------------  --------------------- *
 *-> P_P_MATNR文字
 * <-P_LV_MENG1文字
 * <-P_LV_UNIT1文字
 * <-P_LV_MENG2文字
 * <-P_LV_UNIT2文字
 * <-P_K_FAKTOR文本
 * -------------------------------------------------  --------------------- *
 使用P_MATNR的表格DETERMINE_FAKTOR
                        更改P_MENG1
                                 P_UNIT1
                                 P_MENG2
                                 P_UNIT2
                                 P_FAKTOR。

   如果不是p_unit1 = p_unit2。
     p_faktor = p_meng1。
     调用函数" MATERIAL_UNIT_CONVERSION"
       出口
         输入= p_faktor
         kzmeinh ='X'
         matnr = p_matnr
         meinh = p_unit1
         意思= p_unit2
       输入
         输出= p_faktor
       例外情况
         其他= 1。
     如果sy-subrc = 0。
       p_faktor = p_faktor/p_meng2。
     其他。
       p_unit1 = p_unit2。
       p_faktor = p_meng1/p_meng2。
     万一。
   其他。
     p_faktor = p_meng1/p_meng2。
   万一。
 ENDFORM。  " DETERMINE_FAKTOR



 *＆------------------------------------------------  --------------------- *
 *＆形式calculo_custos
 *＆------------------------------------------------  --------------------- *
 *文字
 * -------------------------------------------------  --------------------- *
 *-> ELEMENTESCHEMA文字
 *-> SICHT文字
 *-> SCHICHTUNG文字
 *->文本
 *-> S_NUR_WAELZELEMETE文字
 *-> GK文字
 *-> FK文字
 *-> VK文字
 * -------------------------------------------------  --------------------- *
 FORM calculo_custos使用
             ELEMENTESCHEMA LIKE TCK07-ELEHK
             像KUSE-SICHT1一样
             SCHICHTUNG STRUCTURE KEPH
             FAKTOR TYPE F
             S_NUR_WAELZELEMETE C型
             GK像CKI64A-GK_SICHT1
             FK像CKI64A-FK_SICHT1
             VK样CKI64A-VK_SICHT1。

   数据：K_GES像CKI64A-H_WERTV8，
         K_FIX LIKE CKI64A-H_WERTV8，
         K_VAR像CKI64A-H_WERTV8。

 * LESEN SICHT
   如果SICHT是初始的。  " => WertfürKundenauftrag，
     T_TCKH8X = F_TCKH8X。
   其他。
     在SICHT = SICHT的地方在T_TCKH8X处循环。
       出口。
     结局。
   万一。
   如果SY-SUBRC <> 0。
 *消息E
   其他。
     将T_TCKH8X移动到T_TCKH8。
     通话功能'CK_F_ELEMENTS_ADD'
       出口
         ELEMENTESCHEMA = ELEMENTESCHEMA
         KALKULATIONSVARIANTE =''
         SCHICHTUNG = SCHICHTUNG
         SELKENTIONSKENNZEICHEN =''
         SUMMIERE_NUR_WAELZELEMENTE = S_NUR_WAELZELEMETE
         I_TCKH8 = T_TCKH8
       输入
         KOSTEN_ZUR_SICHT_GESAMT = K_GES
         KOSTEN_ZUR_SICHT_FIX = K_FIX。

     K_VAR = K_GES-K_FIX。
     GK = K_GES * FAKTOR。
     FK = K_FIX * FAKTOR。
     VK = K_VAR * FAKTOR。
   万一。
 ENDFORM。  " calculo_custos