Dynamisch Workarea und interne Tabellen benutzen?

Code: Alles auswählen.

do.
  (?)
  Lesen der Quell-Textdatei.
  (?)
  Aufbereiten der Workarea lw_outtab in einer Schleife.
  (?)
* Aufbereitete Workarea an interne Tabelle hängen
  append lw_outtab to lt_outtab.
  l_count = l_count + 1.
  if l_count > 100000.
     insert (ld_tabname) from table lt_outtab.
   endif.
enddo.

Code: Alles auswählen.

data:
      lt_outtab TYPE STANDARD TABLE OF z_aag,
      lw_outtab TYPE z_aag.

Code: Alles auswählen.

  FIELD-SYMBOLS:
       <fs_outtab>   TYPE ANY TABLE,
       <fs_outline>  TYPE ANY,
       <fs_outfield> TYPE ANY.

Code: Alles auswählen.

append <fs_outline> to <fs_outtab>.

Code: Alles auswählen.

* Für den Dynamischen DB-Zugriff
FIELD-SYMBOLS: <table> TYPE ANY TABLE,
               <wa>    TYPE ANY,

DATA: gr_table TYPE REF TO   data,
      gr_zeile TYPE REF TO   data.


PARAMETERS: p_table  TYPE tabname OBLIGATORY.

* Erstmal DATA dynamisch erzeugen
    CREATE DATA gr_table TYPE TABLE OF (p_table).
    CREATE DATA gr_zeile TYPE          (p_table).
* Um auf die Daten zu zugreifen die Referenz auf ein Feldsymbole umswitchen
    ASSIGN gr_table->* TO <table>.
    ASSIGN gr_zeile->* TO <zeile>.