Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

New in ABAP 7.5

0 Kudos

Dear all,

I would like to begin writing in ABAP 7.50.

How can I write the following sample code in new format?

Thanks in advance for your help.

David

SELECT k~ebeln k~lifnr p~ebelp p~matnr p~werks
INTO TABLE lt_ekxo
FROM ekpo AS p INNER JOIN ekko 
ON p~ebeln = k~ebeln
WHERE ebeln = lv_ebeln.
IF sy-subrc EQ 0.
SORT  lt_ekxo BY ebeln ebelp.
ENDIF.

lt_ekxo_tmp = lt_ekxo.
SORT lt_ekxo_tmp BY matnr.
DELETE ADJACENT DUPLICATES FROM lt_ekxo_tmp COMPARING matnr.

IF NOT lt_ekxo_tmp IS INITIAL.
SELECT matnr mtart
INTO TABLE lt_mara
FROM mara
FOR ALL ENTRIES IN lt_ekxo_tmp
WHERE matnr = lt_ekxo_tmp.
IF sy-subrc NE 0.
CLEAR lt_mara.
ENDIF.
ENDIF.
2 REPLIES 2

SimoneMilesi
Active Contributor

0 Kudos

Hello Simone,

Thanks for your return (long time after - Sorry for this).

I discovered some other ones too.

David