REPLACE mit byteartigem Separator
8 Beiträge
•
Seite 1 von 1
8 Beiträge
Seite 1 von 1
Beitrag
von reinhold_j (ForumUser / 29 / 0 /
0
)
»
Hi,
ich bin dabei Programme "Unicodefähig" zu machen (also obsoletes Coding und FuBa's auszutauschen).
Bei folgender Problematik weiß ich momentan nicht weiter....
Replace ',' with.... ist so ja nun nicht mehr erlaubt, da c_sep type x ist.
hat jemand eine Idee??
der Zusatz IN BYTE MODE hilft mir glaub ich a net richtig, da upload_field zeichenartig ist....
ich bin dabei Programme "Unicodefähig" zu machen (also obsoletes Coding und FuBa's auszutauschen).
Bei folgender Problematik weiß ich momentan nicht weiter....
Code: Alles auswählen.
DATA: BEGIN OF upload_field OCCURS 100,
one(3000) TYPE c,
END OF upload_field.Code: Alles auswählen.
CONSTANTS: c_sep TYPE x VALUE '09'. "TAB DELIMITERCode: Alles auswählen.
LOOP AT upload_field.
TRANSLATE upload_field-one USING '" '. "Entomo file contains ",s
DO fsize TIMES.
REPLACE ',' WITH c_sep INTO upload_field. "tab delimiter.
IF upload_field-one NA ','.
EXIT.
ENDIF.
ENDDO.
CONDENSE upload_field-one NO-GAPS.
MODIFY upload_field.
ENDLOOP.hat jemand eine Idee??
der Zusatz IN BYTE MODE hilft mir glaub ich a net richtig, da upload_field zeichenartig ist....
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Hallo Reinhold!
Versuche es mal so:
report zsntest.
DATA: BEGIN OF upload_field OCCURS 100,
one(3000) TYPE c,
END OF upload_field.
CONSTANTS: c_sep(4) TYPE x VALUE '0009'. "TAB DELIMITER
field-symbols: <f>.
data: c(1).
break-point.
assign c_sep to <f> type 'C'.
c = <f>.
LOOP AT upload_field.
TRANSLATE upload_field-one USING '" '. "Entomo file contains ",s
DO 1 TIMES.
REPLACE ',' WITH c INTO upload_field. "tab delimiter.
IF upload_field-one NA ','.
EXIT.
ENDIF.
ENDDO.
CONDENSE upload_field-one NO-GAPS.
MODIFY upload_field.
ENDLOOP.
Viele Grüße
Wilfried
Versuche es mal so:
report zsntest.
DATA: BEGIN OF upload_field OCCURS 100,
one(3000) TYPE c,
END OF upload_field.
CONSTANTS: c_sep(4) TYPE x VALUE '0009'. "TAB DELIMITER
field-symbols: <f>.
data: c(1).
break-point.
assign c_sep to <f> type 'C'.
c = <f>.
LOOP AT upload_field.
TRANSLATE upload_field-one USING '" '. "Entomo file contains ",s
DO 1 TIMES.
REPLACE ',' WITH c INTO upload_field. "tab delimiter.
IF upload_field-one NA ','.
EXIT.
ENDIF.
ENDDO.
CONDENSE upload_field-one NO-GAPS.
MODIFY upload_field.
ENDLOOP.
Viele Grüße
Wilfried
Beitrag
von reinhold_j (ForumUser / 29 / 0 /
0
)
»
Hallo Wilfried,
danke schon mal - aber leider bekomme ich nun dir mir nichts sagende Fehlermeldung
???
danke schon mal - aber leider bekomme ich nun dir mir nichts sagende Fehlermeldung
Code: Alles auswählen.
Die Länge von "C_SEP" in Bytes muß unabhängig von der Größe eines Unicode-Zeichens ein Vielfaches dieser Größe sein.
Hallo,
noch als Nachtrag: Wenn C_SEP für den Befehl SPLIT verwendet wird, kann es sein, dass vor der Deklaration von C_SEP noch ein
DATA: PSEUDO TYPE D.
gesetzt werden muss, da dann C_SEP zumindest auf Halbwortgrenze ausgerichtet sein muss.
Viele Grüße
Wilfried
noch als Nachtrag: Wenn C_SEP für den Befehl SPLIT verwendet wird, kann es sein, dass vor der Deklaration von C_SEP noch ein
DATA: PSEUDO TYPE D.
gesetzt werden muss, da dann C_SEP zumindest auf Halbwortgrenze ausgerichtet sein muss.
Viele Grüße
Wilfried
Hallo Reinhold_J,
du könntest auch die Klasse cl_abap_char_utilities benutzen.
....
class cl_abap_char_utilities definition load.
REPLACE ',' WITH cl_abap_char_utilities=>horizontal_tab.
War auch gerade nach der Suche für eine Lösung escape (1B) und File Separator (1C). Da gibt es aber noch keine Konstanten. Aber mit dem Tip jetzt von euch kann ich nun auch weitermachen
Ciao Sylvia
du könntest auch die Klasse cl_abap_char_utilities benutzen.
....
class cl_abap_char_utilities definition load.
REPLACE ',' WITH cl_abap_char_utilities=>horizontal_tab.
War auch gerade nach der Suche für eine Lösung escape (1B) und File Separator (1C). Da gibt es aber noch keine Konstanten. Aber mit dem Tip jetzt von euch kann ich nun auch weitermachen
Ciao Sylvia
Hallo zusammen!
Die Lösung mit cl_abap_char_utilities ist sehr elegant und einfach. Vielen Dank!
Die andere Lösung habe ich auch getestet. Allerdings musste ich die Definition der Konstante etwas ändern: 0900 anstelle 0009
CONSTANTS: c_sep(4) TYPE x VALUE '0900'. "TAB DELIMITER
Ich bin nicht sicher, ob auch 0009 vorkommen kan - je nach OS des Servers. Ist ja eine typische Frage, ob Big Endian or Little Endian benutzt wird.
Die Konstante cl_abap_char_utilities=>horizontal_tab hatte übrigens in meinem System den Wert 0900.
Viele Grüße,
Steffen
Die Lösung mit cl_abap_char_utilities ist sehr elegant und einfach. Vielen Dank!
Die andere Lösung habe ich auch getestet. Allerdings musste ich die Definition der Konstante etwas ändern: 0900 anstelle 0009
CONSTANTS: c_sep(4) TYPE x VALUE '0900'. "TAB DELIMITER
Ich bin nicht sicher, ob auch 0009 vorkommen kan - je nach OS des Servers. Ist ja eine typische Frage, ob Big Endian or Little Endian benutzt wird.
Die Konstante cl_abap_char_utilities=>horizontal_tab hatte übrigens in meinem System den Wert 0900.
Viele Grüße,
Steffen
Seite 1 von 1
Vergleichbare Themen
3
Antw.
Antw.
2242
Views
Views
Verschiedene Zeichenfolgen als Separator
von ABAP_User » 18.05.2011 15:24 • Verfasst in ABAP® für Anfänger
von ABAP_User » 18.05.2011 15:24 • Verfasst in ABAP® für Anfänger
6
Antw.
Antw.
2974
Views
Views
Frage die ABAP Experten
Über diesen Beitrag
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.