Skip to Content
0
Jun 24, 2020 at 06:51 AM

How to join sap table of OBJK,SER01 in abap

969 Views Last edit Jun 28, 2020 at 10:51 AM 2 rev

How to join below sap table

SER01-OBJJK(table) = SERNR-MATNR(fields) .

SER01-OBJJK(table) = OBKNR(fields)

help me out how to join these two table using these fields , and i need serial number and material number in query .

*---------------------------------------------------------------------------------------------------------------------------------------------------------

select vbeln
aubel
kunrg
from zlr_details
into corresponding fields of table it_zlr_details
where vbeln eq s_bildoc.

if it_zlr_details is not initial .

select vbeln
bstkd
bstdk
from vbkd
into corresponding fields of table it_vbkd
for all entries in it_zlr_details
where vbeln eq it_zlr_details-aubel.

select name1
adrnr
ort01
pstlz
telf1
from kna1
into corresponding fields of table it_kna1
for all entries in it_zlr_details
where kunnr eq it_zlr_details-kunrg.

if it_ser01 is not initial .

SELECT OBKNR
LIEF_NR
from ser01
into CORRESPONDING FIELDS OF TABLE it_ser01
FOR ALL ENTRIES IN it_objk
where obknr eq it_objk-obknr.

select vgbel
from vbrp
into CORRESPONDING FIELDS OF TABLE it_vbrp
FOR ALL ENTRIES IN it_ser01
where vgbel eq it_ser01-LIEF_NR.

endif.

endif.

*---------------------------------------------------------------------------------------
sort it_zlr_details by vbeln.
loop at it_vbkd into wa_vbkd.
read table it_kna1 into wa_kna1 with key kunnr = wa_zlr_details-kunrg.
read table it_zlr_details into wa_zlr_details with key aubel = wa_vbkd-vbeln.
read table it_vbkd into wa_vbkd with key vbeln = wa_kna1-name1.
SORT it_objk by sernr matnr .
read table it_ser01 into wa_ser01 with key obknr = wa_objk-obknr.

it_ty_final-vbeln = wa_zlr_details-vbeln.
it_ty_final-kunrg = wa_zlr_details-kunrg.
it_ty_final-aubel = wa_zlr_details-aubel.
it_ty_final-bstkd = wa_vbkd-bstkd.
it_ty_final-bstdk = wa_vbkd-bstdk.
it_ty_final-name1 = wa_kna1-name1.
it_ty_final-ort01 = wa_kna1-ort01.
it_ty_final-pstlz = wa_kna1-pstlz.
it_ty_final-telf1 = wa_kna1-telf1.
it_ty_final-lief_nr = wa_ser01-lief_nr.
it_ty_final-SERNR = wa_objk-SERNR.
it_ty_final-MATNR = wa_objk-MATNR.

append it_ty_final.
clear it_ty_final.



endloop.