[56170] in SAPr3-news

home help back first fref pref prev next nref lref last post

Re: Flatfile datenextraktion in SAP R/3

daemon@ATHENA.MIT.EDU (MichaelB)
Fri Dec 2 06:48:45 2005

To: sapr3-news@mit.edu
Date: 2 Dec 2005 03:48:36 -0800
From: "MichaelB" <michael.beigel@gmail.com>
Message-ID: <1133524116.735572.76990@g14g2000cwa.googlegroups.com>

Also relativ einfach geht es, wenn man programmieren kann:
REPORT         xxxx LINE-SIZE 500.
*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
PARAMETERS:    tabnam(10) TYPE c  DEFAULT 'SFLIGHT',
               p_anzahl   TYPE p  DEFAULT 200.

DATA           objekt     TYPE REF TO data.
FIELD-SYMBOLS  <aber>     TYPE ANY.
FIELD-SYMBOLS  <feld>     TYPE ANY.

*=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
START-OF-SELECTION.
  CREATE DATA objekt TYPE (tabnam).
  ASSIGN objekt->* TO <aber>.

  SELECT * FROM (tabnam) INTO <aber>.
    NEW-LINE.
    DO p_anzahl TIMES.
      ASSIGN COMPONENT sy-index OF STRUCTURE <aber> TO <feld>.
      IF sy-subrc NE 0.
        EXIT.
      ENDIF.
      WRITE <feld>.
    ENDDO.
  ENDSELECT.

Wenn man dann statt Write das ganze in ein dataset schiebt, hatt man
ein Tool f=FCr alle Tabellen...

Gr=FCsse
Michael


home help back first fref pref prev next nref lref last post