TRANSFER von mehrere Struktur

Re: TRANSFER von mehrere Struktur

Moin,
Du machst den Transfer nur von einer Zeile in die Datei.
lwa* ist eine Struktur.

autohandel7 hat geschrieben: CONCATENATE '/' sysid '/sapif/common/tmp/' 'test' '.wrk' INTO v_fname. "sy-cprog
OPEN DATASET v_fname FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
TRANSFER lwa_z6mo000hs TO v_fname LENGTH 138.
TRANSFER lwa_z6do013as2 TO v_fname LENGTH 138.
TRANSFER lwa_z6do013as5 TO v_fname LENGTH 138.
TRANSFER lwa_z6do013as1 TO v_fname LENGTH 138.
CLOSE DATASET v_fname.
WRITE text.

Das sollte ungefähr so aussehen:
open
loop
transfer
endloop
close

Re: TRANSFER von mehrere Struktur

autohandel7 hat geschrieben:Danke, abe ich soll satz für satz in datei schreiben gleich von 4 Struktur. ungefer so sein:

Deine Programmlogik passt da aber nicht!

Du baust dir vier ITABs auf, jede mit einem Segment. Diese brauchst du aber so nicht, da diese nur sehr umständlich in der richtigen Reihenfolge in die Datei zu übertragen sind.

Einfacher ist es mit der gegebenen Programmlogik:

Re: TRANSFER von mehrere Struktur

Danke für Hilfe, leider bekomme ich jetz andere Fehler:

Kategorie ABAP Programmierfehler
Laufzeitfehler DATASET_CANT_OPEN
Ausnahme CX_SY_FILE_OPEN
ABAP Programm ZMM_WMS_LIEFERUNGEN
Anwendungskomponente Nicht zugeordnet
Datum und Zeit 19.08.2014 14:42:23



Kurztext
Datei "/VT1/sapif/common/tmp/test.wrk" kann nicht geöffnet werden.
Die Datei ist nie geofnet, und frue link funktioniert.
sy-subrc =8
Fehker Passirt Hier Satz 598:

596 TRANSLATE sysid TO LOWER CASE.
597
>>>> TRANSFER <lwa_z6mo000hs> TO v_fname LENGTH 138.
599
600
601 FIELD-SYMBOLS <lwa_z6do013as1> TYPE z6do013as1.
602 *LOOP at lit_z6do013as1 ASSIGNING <lwa_z6do013as1>.
603
604
605 MOVE: c_vorgang_201 to lwa_z6do013as1-wms_vorgan
606 c_wms_mandant_0052 to lwa_z6do013as1-wms_mandant,
607 <lwa_lieferung>-VBELN to lwa_z6do013as1-lrnr,
608 <lwa_lieferung>-PSTYv to lwa_z6do013as1-sap_lfart.


Ich habe so gemacht:

sysid = sy-sysid.
CONCATENATE '/' sysid '/sapif/common/tmp/' 'test' '.wrk' INTO v_fname. "sy-cprog
OPEN DATASET v_fname FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.


*----------------------------------------------------------------------*
* *
*----------------------------------------------------------------------*
* Füllen des File_Z6DO013AS1 für Lieferungen --> WMS
************************************************************************
LOOP AT lit_lieferung into lwa_lieferung.

*----------------------------------------------------------------------*
* *
*----------------------------------------------------------------------*
* Füllen des File_Headers für Lieferungen --> WMS
************************************************************************
FIELD-SYMBOLS <lwa_z6mo000hs> TYPE z6mo000hs.
MOVE: c_satzart TO lwa_z6mo000hs-satzart,
c_intf_name TO lwa_z6mo000hs-intf_name.

CONCATENATE sy-datum sy-uzeit INTO lwa_z6mo000hs-intf_datum_zeit.
*----------------------------------------------------------------------*

TRANSLATE sysid TO LOWER CASE.

TRANSFER <lwa_z6mo000hs> TO v_fname LENGTH 138.


FIELD-SYMBOLS <lwa_z6do013as1> TYPE z6do013as1.
*LOOP at lit_z6do013as1 ASSIGNING <lwa_z6do013as1>.


MOVE: c_vorgang_201 to lwa_z6do013as1-wms_vorgang,
c_wms_mandant_0052 to lwa_z6do013as1-wms_mandant,
<lwa_lieferung>-VBELN to lwa_z6do013as1-lrnr,
<lwa_lieferung>-PSTYv to lwa_z6do013as1-sap_lfart.

append lwa_z6do013as1 to lit_z6do013as1.

TRANSFER lwa_z6do013as1 TO v_fname LENGTH 138.

*----------------------------------------------------------------------*
* *
*----------------------------------------------------------------------*
* Füllen des File_Z6DO013AS2 für Lieferungen --> WMS
************************************************************************
FIELD-SYMBOLS <lwa_z6do013as2> TYPE z6do013as2.

MOVE: c_vorgang_202 to lwa_z6do013as2-wms_vorgang,
c_wms_mandant_0052 to lwa_z6do013as2-wms_mandant,
<lwa_lieferung>-VBELN to lwa_z6do013as2-lrnr,
<lwa_lieferung>-PSTYv to lwa_z6do013as2-sap_auart,
<lwa_lieferung>-VGBEL to lwa_z6do013as2-sapaufnr,
<lwa_lieferung>-BSTDK_E to lwa_z6do013as2-opco_best_dat.
append lwa_z6do013as2 to lit_z6do013as2.


TRANSFER lwa_z6do013as2 TO v_fname LENGTH 138.
*----------------------------------------------------------------------*
* *
*----------------------------------------------------------------------*
* Füllen des File_Z6DO013AS2 für Lieferungen --> WMS
************************************************************************
FIELD-SYMBOLS <lwa_z6do013as5> TYPE z6do013as5.

MOVE: c_vorgang_205 to lwa_z6do013as5-wms_vorgang,
c_wms_mandant_0052 to lwa_z6do013as5-wms_mandant,
<lwa_lieferung>-VBELN to lwa_z6do013as5-lrnr,
<lwa_lieferung>-POSNR to lwa_z6do013as5-lrnrp,
<lwa_lieferung>-VGBEL to lwa_z6do013as5-sapaufnr,
<lwa_lieferung>-VGBEL to lwa_z6do013as5-opco_aufnr,
<lwa_lieferung>-VGPOS to lwa_z6do013as5-sapaufpos,
<lwa_lieferung>-MATNR to lwa_z6do013as5-article_number,
<lwa_lieferung>-LFIMG to lwa_z6do013as5-menged,
<lwa_lieferung>-VGPOS to lwa_z6do013as5-opco_auftr_pos_nr.


append lwa_z6do013as5 to lit_z6do013as5.

TRANSFER lwa_z6do013as5 TO v_fname LENGTH 138.


endloop.
CLOSE DATASET v_fname.

Re: TRANSFER von mehrere Struktur

Thomas17 hat geschrieben:

autohandel7 hat geschrieben:Danke für Hilfe, leider bekomme ich jetz andere Fehler:
Laufzeitfehler DATASET_CANT_OPEN
Ausnahme CX_SY_FILE_OPEN

Hi,
der Fehler sagt, dass die Datei aber noch auf ist.
Am besten die Datei mal komplett vom Server löschen.
Und nochmal versuchen.
Grüße

Danke, ich hab schon probiert die Name von Datei ändern, bekomme ich gleiche Fehler, die alle Rechte habe ich auch, weil wenn ich ohne loop mache , bekomme ich Datei mit letzte Eintrag. Aber ich brauche alle anträge aus Tabelle.