PO增强,明细动抬头动
生活随笔
收集整理的這篇文章主要介紹了
PO增强,明细动抬头动
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
METHOD?IF_EX_ME_PROCESS_PO_CUST
~PROCESS_HEADER?
.
?? DATA :?LS_MEPOHEADER? TYPE?MEPOHEADER ,
????????LT_MEPOITEM??? TYPE?PURCHASE_ORDER_ITEMS ,
????????LO_MEPOITEM??? TYPE?PURCHASE_ORDER_ITEM ,
????????LS_MEPOITEM??? TYPE?MEPOITEM .
?? DATA :
????LV_ZZCGKH? TYPE?ZE_CGKH ,? "采購客服
????LV_ZZCGXZ? TYPE?ZE_CGXZ ,? "采購協助
????LV_ZZZCRY? TYPE??ZE_ZCRY .? "駐廠人員
??LS_MEPOHEADER? =?IM_HEADER ->GET_DATA (? ) .
??LT_MEPOITEM? =?IM_HEADER ->GET_ITEMS (? ) .
?? "采購客服?從合同取默認
?? LOOP? AT?LT_MEPOITEM? INTO?LO_MEPOITEM .
????LS_MEPOITEM? =?LO_MEPOITEM -ITEM ->GET_DATA (? ) .
???? IF?LS_MEPOITEM -KONNR?<>? '' .
?????? EXIT .
???? ENDIF .
?? ENDLOOP .
?? IF?LS_MEPOHEADER -ZZPRTIME? IS? INITIAL .
????LS_MEPOHEADER -ZZPRTIME? =?SY -UZEIT .
?? ENDIF .
??IM_HEADER ->SET_DATA (?LS_MEPOHEADER? ) .
ENDMETHOD .
?? DATA :?LS_MEPOHEADER? TYPE?MEPOHEADER ,
????????LT_MEPOITEM??? TYPE?PURCHASE_ORDER_ITEMS ,
????????LO_MEPOITEM??? TYPE?PURCHASE_ORDER_ITEM ,
????????LS_MEPOITEM??? TYPE?MEPOITEM .
?? DATA :
????LV_ZZCGKH? TYPE?ZE_CGKH ,? "采購客服
????LV_ZZCGXZ? TYPE?ZE_CGXZ ,? "采購協助
????LV_ZZZCRY? TYPE??ZE_ZCRY .? "駐廠人員
??LS_MEPOHEADER? =?IM_HEADER ->GET_DATA (? ) .
??LT_MEPOITEM? =?IM_HEADER ->GET_ITEMS (? ) .
?? "采購客服?從合同取默認
?? LOOP? AT?LT_MEPOITEM? INTO?LO_MEPOITEM .
????LS_MEPOITEM? =?LO_MEPOITEM -ITEM ->GET_DATA (? ) .
???? IF?LS_MEPOITEM -KONNR?<>? '' .
?????? EXIT .
???? ENDIF .
?? ENDLOOP .
?? IF?LS_MEPOHEADER -ZZPRTIME? IS? INITIAL .
????LS_MEPOHEADER -ZZPRTIME? =?SY -UZEIT .
?? ENDIF .
??IM_HEADER ->SET_DATA (?LS_MEPOHEADER? ) .
ENDMETHOD .
總結
以上是生活随笔為你收集整理的PO增强,明细动抬头动的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: ABAP长文本
- 下一篇: ABAP 锁对象与加锁机制