销售订单（SO）新建BAPI_SALESORDER_CREATEFROMDAT2或修改BAPI_SALESORDER_CHANGE价格条件值扩大或缩小问题解决方法

新建和修改销售订单BAPI如下：

BAPI_SALESORDER_CREATEFROMDAT2

BAPI_SALESORDER_CHANGE

对应价格条件参数

创建和修改效果如下：

总结如下：

价格条件是金额的 必须传入 货币字段（currency），不传入或导致金额扩大

针对本例：PR01/ZPR0/ZPR2 是金额字段，必须传入货币

价格条件是非金额的 不要传入 货币字段，传入会导致金额缩小

针对本例：ZP01 百分比 非金额字段，不要传入货币

ZPR0参数设置如下：

      READ TABLE lt_prcd INTO ls_prcd WITH KEY kschl = 'ZPR0'.
      IF sy-subrc = 0.
        lt_conditions_in = VALUE #( BASE lt_conditions_in
                                    ( itm_number = ls_item-posnr
                                      cond_st_no = ls_prcd-stunr
                                      cond_count = |{ ls_prcd-zaehk ALPHA = IN }|
                                      cond_type  = 'ZPR0'
                                      cond_value = ls_item-zkbetr
                                      currency   = ls_prcd-waers ) ).

        lt_conditions_inx = VALUE #( BASE lt_conditions_inx
                                    ( itm_number = ls_item-posnr
                                      cond_st_no = ls_prcd-stunr
                                      cond_count = |{ ls_prcd-zaehk ALPHA = IN }|
                                      cond_type  = 'ZPR0'
                                      updateflag = 'U'
                                      cond_value = 'X'
                                      currency   = 'X' ) ).
        lv_mod_flag = 'X'.
      ELSE.
        IF ls_item-zkbetr GT 0.
          lt_conditions_in = VALUE #( BASE lt_conditions_in
                                      ( itm_number = ls_item-posnr
                                        cond_type  = 'ZPR0'
                                        cond_value = ls_item-zkbetr
                                        currency   = gwa_item-zwaers ) ).

          lt_conditions_inx = VALUE #( BASE lt_conditions_inx
                                      ( itm_number = ls_item-posnr
                                        cond_type  = 'ZPR0'
                                        updateflag = 'I'
                                        cond_value = 'X'
                                        currency   = 'X' ) ).
          lv_mod_flag = 'X'.
        ENDIF.
      ENDIF.

ZP01参数设置：

    READ TABLE lt_prcd INTO ls_prcd WITH KEY kschl = 'ZR01'.
    IF sy-subrc = 0.
      IF ls_prcd-kbetr NE ls_item-zyj.
        lt_conditions_in = VALUE #( BASE lt_conditions_in
                                    ( itm_number = ls_item-posnr
                                      cond_st_no = ls_prcd-stunr
                                      cond_count = |{ ls_prcd-zaehk ALPHA = IN }|
                                      cond_type  = 'ZR01'
                                      cond_value = ls_item-zyj
                                      currency   = ls_prcd-waers ) ).

        lt_conditions_inx = VALUE #( BASE lt_conditions_inx
                                    ( itm_number = ls_item-posnr
                                      cond_st_no = ls_prcd-stunr
                                      cond_count = |{ ls_prcd-zaehk ALPHA = IN }|
                                      cond_type  = 'ZR01'
                                      updateflag = 'U'
                                      cond_value = 'X'
                                      currency   = 'X' ) ).
        lv_mod_flag = 'X'.
      ENDIF.
    ELSE.
      IF ls_item-zyj GT 0.
        lt_conditions_in = VALUE #( BASE lt_conditions_in
                                    ( itm_number = ls_item-posnr
                                      cond_type  = 'ZR01'
                                      cond_value = ls_item-zyj
                                       ) ).

        lt_conditions_inx = VALUE #( BASE lt_conditions_inx
                                    ( itm_number = ls_item-posnr
                                      cond_type  = 'ZR01'
                                      updateflag = 'I'
                                      cond_value = 'X'
                                       ) ).
        lv_mod_flag = 'X'.
      ENDIF.
    ENDIF.