功能模块RV_CONDITION_COPY,用于创建无比例定价

2020-09-01 22:49发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中) ABAP专家/SD专家 前一...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


ABAP专家/SD专家

前一天的问候。

我正在使用功能模块RV_CONDITION_COPY进行无比例定价的创建,并且我的代码也正在更新VK13中的SCALES ARE MAINTAINED标志。 屏幕快照,用于参考和随附的代码。

我不希望SCALES标志为'X',但应为Blank。 我应该在代码中传递什么参数,或者我应该尝试哪种方法。

感谢您的答复。

感谢和指导,

Devendra Singh

代码段

常量:lc_mode TYPE char1 VALUE'A',
               lc_kposn TYPE kposn VALUE'000001',
               lc_type TYPE char1 VALUE'E',
               lc_stype类型char1值'S'。


   数据:lv_kvewe TYPE char1,
          lv_kotabnr TYPE char3。

   清除:lv_kotabnr,lv_kvewe。

   数据:komv的lt_cr类型表,
          lwa_cr TYPE komv,
          lwa_key_fields TYPE komg,
          lwa_komk TYPE komk,
          lwa_komp TYPE komp,
          lt_copy_staffel condscale类型表,
          lwa_copy_staffel TYPE condscale,
          lt_knumh knumh_comp的标准类型表,
          lt_komv_idoc komv_idoc的类型表,
          lwa_komv_idoc类型komv_idoc。

   条件记录逐行更新,不包含刻度数据
   循环至gt_tabdata INTO gwa_tabdata中。

     gwa_tabdata-varkey = gwa_tabdata-dyn。
     从gwa_tabdata传输varkey修改gt_tabdata。
     清除:gwa_tabdata。

   结束。

   lv_kotabnr = gv_table + 1(3)。
   lv_kvewe = gv_table + 0(1)。

   循环至gt_tabdata INTO gwa_tabdata中。

 *-填充关键字段""根据KVEWE,KOTABNR和VAKEY填充KOMG结构
     通话功能'SD_CONDITION_KOMG_FILL'
       出口
         p_kotabnr ='304'
         p_kvewe ='A'
         p_vakey = gwa_tabdata-varkey
       输入
         p_komg = lwa_key_fields。

     lwa_key_fields-kbstat ='SM'。

 *-填写KOMK工作区的要求
     lwa_komk-mandt = sy-mandt。

 *-为KOMP工作区填写kposn
     lwa_komp-kposn ='000001'

 *-填写KOMV_IDOC
     lwa_komv_idoc-kznep =''。

     附加lwa_komv_idoc至lt_komv_idoc。

 *-填充KOMV
     lwa_cr-kappl ='V'。
     lwa_cr-kschl ='PR00'。
     lwa_cr-kbetr = gwa_tabdata-amount。  " 单价
     lwa_cr-krech ='C'
     lwa_cr-kpein = 1。
     lwa_cr-kmein ='EA'。
     lwa_cr-waers = gwa_tabdata-unit。
     lwa_cr-knumh ='$ 000000001'。
     lwa_cr-mandt = sy-mandt。

 *以下是KOMV中体重秤的重要字段。
     lwa_cr-kopos = 1。
     lwa_cr-kzbzg ='C'。
     lwa_cr-konms ='EA'。
     lwa_cr-stfkz =''。

     追加lwa_cr至lt_cr。

 *-填充秤
     lwa_copy_staffel-klfn1 = 1。
     lwa_copy_staffel-kopos ='01'。
     lwa_copy_staffel-kstbm ='0.00'。
     lwa_copy_staffel-kbetr = gwa_tabdata-amount。 规模价格
     lwa_copy_staffel-kzbzg ='C'。
     lwa_copy_staffel-rv13akonwa = gwa_tabdata-unit。
     lwa_copy_staffel-konpkmein = gwa_tabdata-cond_unit。
     lwa_copy_staffel-konpkonms = gwa_tabdata-cond_unit。
     APPEND lwa_copy_staffel至lt_copy_staffel。


     "条件上传,不带刻度值
     通话功能" RV_CONDITION_COPY"
       出口
         应用程序= gc_kappl
         condition_table = lv_kotabnr
         condition_type = p_kschl
         date_from = gwa_tabdata_scale-valid_from
         date_to = gwa_tabdata_scale-valid_to
         入队= gc_flag
         i_komk = lwa_komk
         i_komp = lwa_komp
         key_fields = lwa_key_fields
         maintenance_mode = lc_mode
         no_authority_check = gc_flag
 * keep_old_records ='X'
         used_by_idoc ='X'"在提供按比例缩放价格时,此标志必须为X,否则将使用零价格创建价格。
         overlay_confirmed ='X'
       桌子
         copy_records = lt_cr
         copy_staffel = lt_copy_staffel
         copy_recs_idoc = lt_komv_idoc
       例外情况
         enqueue_on_record = 01
         invalid_application = 02
         invalid_condition_number = 03
         invalid_condition_type = 04
         no_authority_ekorg = 05
         no_authority_kschl = 06
         no_authority_vkorg = 07
         no_selection = 08
         table_not_valid = 09。

     案例sy-subrc。
       0时
         通话功能" RV_CONDITION_SAVE"
           桌子
             knumh_map = lt_knumh。
         调用功能" RV_CONDITION_RESET"。

         提交工作并等待。

     结束。

(28.4 kB)