Code: Alles auswählen.
REPORT z_09_hausarbeit_brue_kre_1 .
TABLES: ekko, ekpo.
PARAMETERS : datum LIKE ekko-bedat DEFAULT '19980101'.
DATA: BEGIN OF lieferanten_angebot OCCURS 20,
anfragenummer LIKE ekpo-anfnr,
belegnummer LIKE ekko-ebeln,
lieferant LIKE ekko-lifnr,
materialnr LIKE ekpo-ematn,
materialbezeichnung LIKE ekpo-txz01,
anfragemenge LIKE ekpo-abmng,
nettopreis LIKE ekpo-netpr,
datum LIKE ekko-bedat,
END OF lieferanten_angebot.
SELECT
ekpo~anfnr
ekko~ebeln
ekko~lifnr
ekpo~ematn
ekpo~txz01
ekpo~abmng
ekpo~netpr
ekko~bedat
INTO lieferanten_angebot
FROM ekpo INNER JOIN ekko
ON ekpo~ebeln = ekko~ebeln
WHERE ekko~bedat >= datum.
APPEND lieferanten_angebot.
ENDSELECT.
LOOP AT lieferanten_angebot.
WRITE:/ lieferanten_angebot-belegnummer,
lieferanten_angebot-lieferant,
lieferanten_angebot-materialnr,
lieferanten_angebot-materialbezeichnung,
lieferanten_angebot-anfragemenge,
lieferanten_angebot-nettopreis,
lieferanten_angebot-datum.
ENDLOOP.
Code: Alles auswählen.
...
WHERE ekko~bedat >= datum
and anfnr <> space.