method if_ex_me_process_po_cust~process_header .
data:items type purchase_order_items,
item_obj type purchase_order_item.
data:l_head type mepoheader.
data:l_item type mepoitem.
data:icount type i .
data: v_vkorg type a304-vkorg .
data: v_vbund type lfa1-vbund .
data: v_werks type lfa1-werks .
data: v_kbetr type kbetr_kond.
data: v_mgvgw type plfh-mgvgw .
data: v_kpein type kpein.
data: v_kmein type kmein.
data: im_conditions type mmpur_tkomv .
data: lw_komv type komv .
data: v_clsever type zefi_client-clsever .
data: it_tkomv type mmpur_tkomv,
wa_tkomv like line of it_tkomv.
data:lv_lifnr type ekko-lifnr .
l_head = im_header->get_data( ).
items = im_header->get_items( ) .
import lv_lifnr to lv_lifnr from memory id 'zlifnr'.
if lv_lifnr ne l_head-lifnr .
*------瓶蓋控制bydev23--------on20091202------------------
if l_head-ekorg = '5101' and
( l_head-ekgrp = '500' or l_head-ekgrp = '501' ) .
loop at items into item_obj .
l_item = item_obj-item->get_data( ).
icount = icount + 1 .
clear : v_vbund , v_werks .
select single vbund werks into (v_vbund,v_werks)
from lfa1
where lifnr = l_head-lifnr .
if sy-subrc = 0 .
v_vkorg = v_vbund+2(4) .
else .
clear v_vkorg .
endif .
endif .
endif .
lv_lifnr = l_head-lifnr .
export lv_lifnr from lv_lifnr to memory id 'zlifnr'.
*-------瓶蓋控制-------------
*1.表頭為空,行專案不為空，直接退出程式
endmethod.
ERP的採購訂單（2）
今天記錄一下處理的erp問題 根據上圖可以看出 1 同乙個物料不同 商對應不同的 2 同乙個物料對應同乙個 商起訂量不同，單價不同 量大價優 3 如何根據採購量選取合適的 商，從而達到資源利用最大化。關於問題 1 2 這些設定基本上都是在基礎資料中設定成功，在採購訂單生成的時候自動帶出單價，金額等資...
採購訂單收貨
migo收貨，其中，101是收貨，102是對收貨的沖銷 進去以後第一行是灰色的，是因為被選中了，在明細那裡可以改數量，勾選確定的話可以檢查正確了可以過賬 這個是計畫協議的收貨，在ekko裡面，計畫協議的型別 bsart 是lp 計畫協議是由mrp跑出來的，採購訂單是由前台錄入的，我理解計畫協議就是由...
採購訂單 退貨
本文件屬於mm模組，描述的是採購流程的退貨訂單。當之前採購的貨物已入庫並向 商結算，由於某種原因 如發現質量問題 需退回給 商，就可以建立退貨型採購訂單。退貨型採購訂單後續操作也需要收貨，並進行發票校驗。其中收貨的移動型別是161，發票校驗採用貸方憑證 與發票類作法相反 二 操作 此示例資料與建立標...