*-->SMOD: COPCP005->EXIT_SAPLCK21_002->ZXCKAU08
IF imp_klvar = 'ZPC1' OR imp_klvar = 'PS02' OR imp_klvar = 'PPP1'.
DATA:lt_mseg TYPE TABLE OF mseg,
ls_mseg TYPE mseg.
data:begin of lt_ekpo occurs 0,
ebeln like ekpo-ebeln,
ebelp like ekpo-ebelp,
aedat like ekko-aedat,
lifnr like ekko-lifnr,
matnr like ekpo-matnr,
netpr like ekpo-netpr,
peinh like ekpo-peinh,
end of lt_ekpo.
SELECT mblnr
mjahr
zeile
dmbtr
menge
INTO CORRESPONDING FIELDS OF TABLE lt_mseg
FROM mseg
WHERE matnr = f_matbw-matnr
AND werks = f_matbw-werks
AND bwart = '105'.
SORT lt_mseg BY mblnr DESCENDING