Leerzeichen in String entfernen

[Jannis2161]

Hallo zusammen,

Ich habe folgenden string:

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. 04.11.2009;          04.11.2009;          10007031;          ;          5;          ;          100;          ;          ;          ;          ;          4.00;          ;          ;          Dies ist ein Text;          100;          ;          ;

GeSHi ©

Mein Ziel ist die Leerzeichen zu entfernen. Ich habe es mit dem Befehl CONDENSE string NO-GAPS probiert, aber dann entfernt es mir auch die Leerzeichen im Text (DiesisteinText).

Hat jemand von euch einen Vorschlag / Idee wie ich alle Leerzeichen entfernen kann ausser die im Text?

Gruss
Jam

[Eymen5010]

Wie wärs mit einem SPLIT, danach in den gewünschten Feldern die Leerzeichen entfernen um das alles wieder mittels concatenate zusamen zu führen?

[Lennie3901]

condense (ohne no-gaps)
replace all occurencies of '; ' with ';' into string

[Ilja583]

In deinem Beispiel hast du keine ";" im Textfeld, welches die Leerzeichen enthält. Außerdem sind die Feldinhalte rechtsbündig gegen den Feldtrenner gesetzt.

Bei einem so einfachen Fall kannst du einfach einen regulären Ausdruck zum Entfernen verwenden.

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. REPORT LINE-SIZE 1000.
2.  
3. DATA s TYPE string.
4.  
5. s = '04.11.2009;          04.11.2009;          10007031;          ;          5;          ;          100;          ;          ;          ;          ;          4.00;          ;          ;          Dies ist ein Text;          100;          ;          ;'.
6.  
7. WRITE:/ s.
8. REPLACE ALL OCCURRENCES OF REGEX ';\s*' IN s WITH ';'.
9. WRITE:/ s.

GeSHi ©

[Jannis2161]

Vielen Dank für die Antworten.

Ich habe jetzt die Lösung von black_adept genutzt. Genau so etwas habe ich gesucht. Funktioniert bestens.

Gruss
Jam

[Dejan1830]

Hallo,

habe aehnliches Problem. Ich habe einen String mit TAB getrennten Felder, leider ist jedes mal ein Leerzeichen davor was mich stoert. Wie kann ich diese einzelnen Leerzeichen loeschen ohne den TAB zu loeschen.

Text TAB leer Text TAB leer Text Tab leer.
Ich frag mich woher die leerzeichen uberhaupt herkommen.

Fuer die Tabs verwende ich uebrigens
DATA: lv_tabulator TYPE ABAP_CR_LF value cl_abap_char_utilities=>HORIZONTAL_TAB.
....SEPARATED BY lv_tabulator.

Gruesse,
Hanny

[Ilja583]

Ist doch dasselbe in grün. Statt Semikolon nimm Tab, statt mehreren space hier nur 1 space.
Einfach mal die Doku zu "REGEX" lesen.

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. REPORT LINE-SIZE 1000.
2.  
3. CONSTANTS: tab TYPE c VALUE cl_abap_char_utilities=>horizontal_tab.
4. DATA:      s   TYPE string.
5.  
6.  
7. * Variante 1:  Falls du sonst keine weiteren Steuerzeichen außer dem TAB in deinem Text hast
8. CONCATENATE 'Text1' tab ` ` 'Text2' tab ` ` 'Text3' tab ` ` 'Text4' INTO s.
9. WRITE:/ s.
10. REPLACE ALL OCCURRENCES OF REGEX '([ [:cntrl:] ])\s' IN s WITH '$1'.
11. WRITE:/ s.
12.  
13. ULINE.
14.  
15.  
16. * Variante 2:  Falls es weitere Steuerzeichen geben könnte und wirklich nur das "TAB+blank" ersetzt werden soll
17. DATA: find TYPE string.
18.  
19. CONCATENATE tab ` ` INTO find.
20. CONCATENATE 'Text1' tab ` ` 'Text2' tab ` ` 'Text3' tab ` ` 'Text4' INTO s.
21. WRITE:/ s.
22. REPLACE ALL OCCURRENCES OF REGEX find IN s WITH tab.
23. WRITE:/ s.

GeSHi ©

[Ilja583]

Nachtrag.

Falls du nachher irgendwann die Felder mittels "SPLIT ... INTO TABLE" separierst, brauchst du dich um das Extraleerzeichen doch gar nicht zu kümmern - lass den SPLIT-Befehl das doch einfach automatisch mit entfernen, indem du statt bei "tab" bei "tab+blank" splittest.