Code: Alles auswählen.
FORM .....
data: l_table type table of table1,
l_wert(20) type c.
l_wert = g_wert.
....
select a~feld1 b~feld1 into corresponding fields of table l_table from TabelleA AS a INNER JOINTabelleB AS b on a~FeldmitID1 = b~FeldmitID1 where a~L_FeldmitID2 = L-wert.
....
perform form2 using l_table.
Code: Alles auswählen.
Form2 using l_table1
Code: Alles auswählen.
DATA f_line LIKE LINE OF l_table1.
Code: Alles auswählen.
FORM ... USING ... TYPE ...
Code: Alles auswählen.
FORM ... USING ... TYPE STANDARD TABLE OF ...
Soll das kommen? Wann? Hab ich schon wieder was verpasst?a-dead-trousers hat geschrieben:geht syntaktisch (derzeit noch) nicht.Code: Alles auswählen.
FORM ... USING ... TYPE STANDARD TABLE OF ...
Ne, aber wäre IMHO eine sinnvolle Erweiterung, da es bei den Methoden ja auch funktioniert.ralf.wenzel hat geschrieben:Soll das kommen? Wann? Hab ich schon wieder was verpasst?
Tgut hat geschrieben:...
l_table ist aber definitiv eine interne Tabelle.
Ich möchte die oben mit Select in eine interne Tabelle geschriebenen Daten an die form übergeben und dort die Daten wiederrum als Tabelle weiter verarbeiten.
Code: Alles auswählen.
FORM ... USING l_table TYPE STANDARD TABLE.
FIELD-SYMBOLS: <ls_table_line> TYPE ANY.
LOOP AT l_table ASSIGNING <ls_table_line>.
...
Klar geht. Tabellentyp im Programm anlegen.black_adept hat geschrieben:Geht aber nicht...
Yepp!ralf.wenzel hat geschrieben:Klar geht. Tabellentyp im Programm anlegen.
Code: Alles auswählen.
TYPES tt_table TYPE STANDARD TABLE OF ts_struct WITH DEFAULT KEY.
FORM do_something USING ut_table TYPE tt_table.
FIELD-SYMBOLS <ls_line> LIKE LINE OF ut_table.
...
ENDFORM.
Code: Alles auswählen.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
* DDIC_STRUCTURE = ''
retfield = ' '
* PVALKEY = ' '
dynpprog = vc_repid
dynpnr = vc_dynnr
* dynprofield = ''
* STEPL = 0
WINDOW_TITLE = ' '
* VALUE = ' '
value_org = 'S'
* MULTIPLE_CHOICE = ' '
* DISPLAY = ' '
* CALLBACK_PROGRAM = ' '
* CALLBACK_FORM = ' '
* MARK_TAB =
* IMPORTING
* USER_RESET =
TABLES
value_tab = ' '
* FIELD_TAB =
RETURN_TAB = ' '
* DYNPFLD_MAPPING =
* EXCEPTIONS
* PARAMETER_ERROR = 1
* NO_VALUES_FOUND = 2
* OTHERS = 3