Code: Alles auswählen.
perform material_lesen
Code: Alles auswählen.
perform material_lesen using lv_matnr changing ls_mat
Code: Alles auswählen.
DATA: lt_tabelle TYPE irgendeine Tabelle.
FIELD-SYMBOLS: <lt_tabelle> LIKE LINE OF lt_tabelle.
* füllen
APPEN INTITIAL LINE TO lt_tabelle ASSIGNING <lt_tabelle>.
<lt_tabelle>-Feld1 = ...
LOOP AT lt_tabelle ASSIGNING <lt_tabelle>.
<lt_tabelle>-feld2 = ...
* mach sonstwas
ENDLOOP.
READ TABLE lt_tabelle assigning <lt_tabelle>
index Zahl.
* oder
...
with key feld1 = 'XX'
.
Code: Alles auswählen.
APPEND <lt_tabelle> to LT_TAB2 (ASSIGNING <lt_tab2> "wenn man will").
Code: Alles auswählen.
report ...
parameters p_mypar as checkbox.
data go_myapp type ref to zcl_myapp.
start-of-selection.
create object go_myapp.
go_myapp->set_mypar( p_mypar ).
go_myapp->main( ).
Code: Alles auswählen.
* Eingabeparameter des FUBA: is_screen
* Ausgabeparameter: es_screen, ev_ucomm
* Die Funktionsbibliothek verwaltet die Bildschirmdaten als globale Struktur:
gs_screen = is_screen.
call screen 1.
es_screen = gs_screen.
ev_ucomm = sy-ucomm.
Code: Alles auswählen.
do.
call function 'Z_SHOW_THE_SCREEN'
exporting
is_screen = ls_screen_defaults
importing
es_screen = ls_screen_inputs
ev_ucomm = lv_user_command.
process_input( ls_screen_inputs ).
lv_exit = process_user_command( lv_user_command ).
if lv_exit = abap_true.
exit.
endif.
enddo.
Code: Alles auswählen.
SELECT COUNT(*)
Code: Alles auswählen.
SELECT SINGLE *
Code: Alles auswählen.
SELECT ... field1 field2...
Code: Alles auswählen.
SELECT *
Code: Alles auswählen.
INITIALIZATION.
SELECT field1 field2
INTO TABLE gt_t...
FROM t...
FORM ....
READ TABLE gt_t...
Code: Alles auswählen.
TYPES: BEGIN OF t_matnr,
matnr type matnr,
END OF t_matnr.
DATA: gt_mara TYPE TABLE OF mara,
gt_matnr TYPE TABLE OF t_matnr.
....
gt_matnr = gt_mara.
bei diesem Beispiel bin ich nicht der Meinung, dass es das Ergebnis erzielt, welches beabsichtigt ist.kotelna hat geschrieben:...
No 4. Tabellenoperationen verwenden.Code: Alles auswählen.
TYPES: BEGIN OF t_matnr, matnr type matnr, END OF t_matnr. DATA: gt_mara TYPE TABLE OF mara, gt_matnr TYPE TABLE OF t_matnr. .... gt_matnr = gt_mara.
babap hat geschrieben:Hallo,
meine goldene Regel zu internen Tabellen:
Verwende Feldsymbold statt impliziter Kopfzeile oder Workarea.Man "fährt" direkt auf der Tabellenzeile rum und muß sie nicht "modifyen".Code: Alles auswählen.
DATA: lt_tabelle TYPE irgendeine Tabelle. FIELD-SYMBOLS: <lt_tabelle> LIKE LINE OF lt_tabelle. * füllen APPEN INTITIAL LINE TO lt_tabelle ASSIGNING <lt_tabelle>. <lt_tabelle>-Feld1 = ... LOOP AT lt_tabelle ASSIGNING <lt_tabelle>. <lt_tabelle>-feld2 = ... * mach sonstwas ENDLOOP. READ TABLE lt_tabelle assigning <lt_tabelle> index Zahl. * oder ... with key feld1 = 'XX' .
Man kann die Zeile auch komplett an eine gleich strukturierte Tabelle anfügen
GrußCode: Alles auswählen.
APPEND <lt_tabelle> to LT_TAB2 (ASSIGNING <lt_tab2> "wenn man will").
babap
Code: Alles auswählen.
DATA: lt_tadir type table of tadir,
doceX hat geschrieben:babap hat geschrieben:Hallo,
meine goldene Regel zu internen Tabellen:
Verwende Feldsymbold statt impliziter Kopfzeile oder Workarea.Man "fährt" direkt auf der Tabellenzeile rum und muß sie nicht "modifyen".Code: Alles auswählen.
DATA: lt_tabelle TYPE irgendeine Tabelle. FIELD-SYMBOLS: <lt_tabelle> LIKE LINE OF lt_tabelle. * füllen APPEN INTITIAL LINE TO lt_tabelle ASSIGNING <lt_tabelle>. <lt_tabelle>-Feld1 = ... LOOP AT lt_tabelle ASSIGNING <lt_tabelle>. <lt_tabelle>-feld2 = ... * mach sonstwas ENDLOOP. READ TABLE lt_tabelle assigning <lt_tabelle> index Zahl. * oder ... with key feld1 = 'XX' .
Man kann die Zeile auch komplett an eine gleich strukturierte Tabelle anfügen
GrußCode: Alles auswählen.
APPEND <lt_tabelle> to LT_TAB2 (ASSIGNING <lt_tab2> "wenn man will").
babap
Ebenfalls auch eine gute Möglichkeit welche kein Modify benötigt sind Referenzen.
Code: Alles auswählen.
DATA: lt_tadir type table of tadir,
Code: Alles auswählen.
DATA: lt_tadir type table of tadir,
Code: Alles auswählen.
lr_tadir type ref to tadir.
Code: Alles auswählen.
DATA: l_obj_name type sobj_name.
Code: Alles auswählen.
LOOP AT lt_tadir REFERENCE INTO lr_tadir.
Code: Alles auswählen.
l_obj_name = lr_tadir->obj_name
Code: Alles auswählen.
ENDLOOP.