Purchasing Document Item Change History
SAS:Satınlama Siparişi Değişiklik Kayıtları:
CDHDR : Change document header
CDPOS : Change document items
For Purchasing Doc,
OBJECTCLAS = 'EINKBELEG'
OBJECTID = Purchase Doc Number
TABNAME = 'EKPO'
FNAME : Field name (For Quantity : 'MENGE')
Example Code;
You can get the first inserted quantity of purc. item,
DATA : lt_cdpos2 LIKE cdpos OCCURS 0 WITH HEADER LINE .
DATA lv_tabkey2 LIKE cdpos-tabkey.
CLEAR lv_tabkey2.
CONCATENATE
'200'
itab-EBELN "Purch.Doc.
itab-EBELp "Item No
INTO lv_tabkey2 .
REFRESH lt_cdpos2.
SELECT * FROM cdpos INTO TABLE lt_cdpos2
WHERE objectclas EQ 'EINKBELEG' AND
objectid EQ itab-EBELN AND
tabkey EQ lv_tabkey2 AND
tabname EQ 'EKPO' AND
fname EQ 'MENGE' AND "QTY
chngind EQ 'U' .
IF SY-SUBRC EQ 0 .
SORT lt_cdpos2 BY CHANGENR ASCENDING .
READ TABLE lt_cdpos2 INDEX 1.
ITAB-FIRST_MENGE = lt_cdpos2-value_old.
ENDIF.
Etiketler:
cdhdr,
cdpos,
change documanet header,
change document item,
değişiklik kayıtları,
ebeln,
ebelp,
EINKBELEG,
ekpo,
history,
menge,
purchase order,
purchasing doc,
sas,
satınalma siparişi,
tabkey
Kaydol:
Kayıt Yorumları (Atom)
Hiç yorum yok:
Yorum Gönder