* ls_pocond-cond_count = lv_cond_count. LS_POCOND-COND_TYPE = P_KSCHA. "定价条件 LS_POCOND-COND_VALUE = P_VALUE. LS_POCOND-CURRENCY = 'RMB'. "币别 LS_POCOND-CHANGE_ID = 'I'. "修改类型 I U D APPEND LS_POCOND TO LT_POCOND. CLEAR LS_POCONDX. LS_POCONDX-ITM_NUMBER ...
* ls_pocondx-cond_count = lv_cond_count. ls_pocondx-cond_type = p_value. "定价条件 ls_pocondx-cond_value = 'X'. "价格 ls_pocondx-change_id = 'X'. "修改类型 if ls_pocond-currency is not initial. ls_pocondx-currency = 'X'. "币别 endif. append ls_pocondx to lt_poc...
* ls_pocondx-cond_count = lv_cond_count. ls_pocondx-cond_type = p_value. "定价条件 ls_pocondx-cond_value = 'X'. "价格 ls_pocondx-change_id = 'X'. "修改类型 if ls_pocond-currency is not initial. ls_pocondx-currency = 'X'. "币别 endif. append ls_pocondx to lt_poc...
* ls_pocondx-cond_count = lv_cond_count. ls_pocondx-cond_type = p_value. "定价条件 ls_pocondx-cond_value = 'X'. "价格 ls_pocondx-change_id = 'X'. "修改类型 if ls_pocond-currency is not initial. ls_pocondx-currency = 'X'. "币别 endif. append ls_pocondx to lt_poc...