Code: Alles auswählen.
FUNCTION z_erp_01_beleg_get_detail.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*" VALUE(I_BELEGNUMMER) TYPE Z_ERP_01_BELEGNR
*" VALUE(I_BUCHUNGSKREIS) TYPE BUKRS
*" VALUE(I_GESCHAEFTSJAHR) TYPE GJAHR
*" EXPORTING
*" VALUE(E_BELEGKOPF) TYPE ZERP_01_BELEG
*" VALUE(E_T_POSITION) TYPE Z_ERP_01_T_BELEGPOSITION
*"----------------------------------------------------------------------
SELECT SINGLE * FROM zerp_01_beleg INTO e_belegkopf
WHERE belegnr = i_belegnummer
AND bukrs = i_buchungskreis
AND gjahr = i_geschaeftsjahr.
SELECT * FROM zerp_01_position INTO TABLE e_t_position
WHERE belegnr = i_belegnummer
AND bukrs = i_buchungskreis
AND gjahr = i_geschaeftsjahr.
ENDFUNCTION.
Code: Alles auswählen.
DATA: BEGIN OF gt_mat,
belegnr LIKE deineTabelleBelegkopf-deinFeld,
bukrs LIKE deineTabelleBelegkopf-deinFeld,
gjahr LIKE deineTabelleBelegkopf-deinFeld,
belegnrpos LIKE deineTabelleBelegPos-deinFeld,
END OF gt_mat,
itab_mat LIKE gt_mat OCCURS 0 WITH HEADER LINE.
" SELECT mit INENR JOIN
SELECT zerp_01_beleg~belegnr zerp_01_beleg~bukrs zerp_01_beleg~gjahr zerp_01_position~belegnrpos
INTO TABLE itab_mat
FROM zerp_01_beleg
INNER JOIN zerp_01_position ON zerp_01_beleg~belegnrpos = zerp_01_position~belegnrpos
WHERE zerp_01_beleg~belegnr = ....
AND zerp_01_beleg~bukrs IN ....
AND zerp_01_beleg~gjahr IN ....
Code: Alles auswählen.
DATA: g_tab_irgendwas type table of blabla,
g_wa_irgendwas type blabla.