Daten aus mehreren Tabellen auslesen

Probier's mal mit Type

DATA BEGIN OF struc [READ-ONLY].
...
{DATA dobj ...} | {INCLUDE {TYPE|STRUCTURE} ...}.
...
DATA END OF struc.



Wirkung
Die Deklaration einer neuen Struktur struc wird durch eine DATA-Anweisung mit dem Zusatz BEGIN OF eingeleitet und muss mit einer DATA-Anweisung mit dem Zusatz END OF beendet werden.

ODER

TYPES BEGIN OF struc_type.
...
{TYPES dtype ...} | {INCLUDE {TYPE|STRUCTURE} ...}.
...
TYPES END OF struc_type.



Wirkung
Ein strukturierter Typ struc_type wird durch eine TYPES-Anweisung mit dem Zusatz BEGIN OF eingeleitet und muss mit einer TYPES-Anweisung mit dem Zusatz END OF beendet werden.

immer noch keine Ausgabe

Das ist mein aktueller Code:

REPORT YPAG_TARIF_DA2 .

Types: begin of my_struc,
tariftyp like ertfnd-tariftyp,
tarifart like ertfnd-tarifart,
sparte like te069-sparte,
aklasse like te069-aklasse,
end of my_struc.

DATA: it_tarife type TABLE OF my_struc,
wa_tarife type my_struc.

PARAMETERS: jvb LIKE easte-perverbr OBLIGATORY.

START-OF-SELECTION.
CLEAR wa_tarife.
REFRESH it_tarife.

WRITE: / 'Tariftyp', 12'Tarifart', 28'Sparte', 40'Abrechnungsklasse'.


TABLES: EASTE, EASTS, ERTFND, TE069, ETTA.

SELECT * from EASTE
WHERE easte-perverbr = jvb .
select * from EASTS
where logikzw = easte-logikzw.
select * from TE069
where tarifart = easts-tarifart.
endselect.
select * from ERTFND
where tariftyp = etta-tariftyp.
endselect.
endselect.
endselect.
loop at it_tarife into wa_tarife.

WRITE: / wa_tarife-tariftyp, wa_tarife-tarifart, wa_tarife-sparte,
wa_tarife-aklasse.

endloop.

hierbei bekomme ich die Fehlermeldung, dass das Feld EASTE-PERVERBR nicht bekannt sei.
wenn ich es auf EASTE~PERVERBR ändere kommt die Fehlermeldung nicht mehr. ich bekomme aber dann in meiner Liste immer noch keine Ausgaben abgesehen von den Überschriften
Vielleicht hat ja jemand von euch noch einen Tip parat.

danke und gruß,
phil

Re: immer noch keine Ausgabe

phil1982 hat geschrieben:Das ist mein aktueller Code:

REPORT YPAG_TARIF_DA2 .

Types: begin of my_struc,
tariftyp like ertfnd-tariftyp,
tarifart like ertfnd-tarifart,
sparte like te069-sparte,
aklasse like te069-aklasse,
end of my_struc.

DATA: it_tarife type TABLE OF my_struc,
wa_tarife type my_struc.

PARAMETERS: jvb LIKE easte-perverbr OBLIGATORY.

START-OF-SELECTION.
CLEAR wa_tarife.
REFRESH it_tarife.

WRITE: / 'Tariftyp', 12'Tarifart', 28'Sparte', 40'Abrechnungsklasse'.


TABLES: EASTE, EASTS, ERTFND, TE069, ETTA.

SELECT * from EASTE
WHERE easte-perverbr = jvb .
WHERE jvb = easte-perverbr.
select * from EASTS
where logikzw = easte-logikzw.
select * from TE069
where tarifart = easts-tarifart.
endselect.
select * from ERTFND
where tariftyp = etta-tariftyp.
endselect.
endselect.
endselect.
loop at it_tarife into wa_tarife.

WRITE: / wa_tarife-tariftyp, wa_tarife-tarifart, wa_tarife-sparte,
wa_tarife-aklasse.

endloop.

hierbei bekomme ich die Fehlermeldung, dass das Feld EASTE-PERVERBR nicht bekannt sei.
wenn ich es auf EASTE~PERVERBR ändere kommt die Fehlermeldung nicht mehr. ich bekomme aber dann in meiner Liste immer noch keine Ausgaben abgesehen von den Überschriften
Vielleicht hat ja jemand von euch noch einen Tip parat.

danke und gruß,
phil

Gruß
Markus