Fehlerhafter logischer Ausdruck

Fehlerhafter logischer Ausdruck

Hi,
ich habe da eine Funktion, die eine zeichenkette durchläuft,und schaut, ob diese nur aus den zeichen
meiner unob liste besteht. Falls nicht werden äüö 's zu auo's, wenn nicht die unbekannten zeichen werden mit einem leerzeichen ersetzt.

Dabei bekomme ich ganze zeit den Fehler :

* Incorrect logical expression: Comparison/SELECT-OPTION can only be
* followed by "AND","OR" or ")".

hier ist mein Programm.Es wäre toll, wenn ihr den Fehler entdecken würdet.

FUNCTION Z_NEU1.
*"----------------------------------------------------------------------
*"*"Local interface:
*" IMPORTING
*" REFERENCE(TEMP_UNOB) TYPE STRING
*" EXPORTING
*" REFERENCE(RET_UNOB) TYPE STRING
*"----------------------------------------------------------------------

DATA laenge TYPE i.
DATA offset TYPE i.
DATA unob(68) TYPE c VALUE
'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890!"%& ()*+
,-./'.

Data Unob_Temp TYPE c.
Unob_Temp = temp_unob.

laenge = strlen( Unob_Temp ).

CLEAR offset.

WHILE offset < laenge.

IF Unob_Temp + offset(1) = 'Ä'.

* Hier wird der Cursor vor Gleichheitszeichen gesetzt bei dem Fehler.
* Incorrect logical expression: Comparison/SELECT-OPTION can only be
* followed by "AND","OR" or ")".

MOVE 'A' TO Unob_Temp + offset(1).
ELSEIF Unob_Temp +offset(1) = 'ä'.
MOVE 'a' TO Unob_Temp +offset(1).
ELSEIF Unob_Temp +offset(1) = 'Ö'.
MOVE 'O' TO Unob_Temp +offset(1).
ELSEIF Unob_Temp+offset(1) = 'ö'.
MOVE 'o' TO Unob_Temp+offset(1).
ELSEIF Unob_Temp+offset(1) = 'Ü'.
MOVE 'U' TO Unob_Temp+offset(1).
ELSEIF Unob_Temp+offset(1) = 'ü'.
MOVE 'u' TO Unob_Temp+offset(1).
ENDIF.

IF Unob_Temp+offset(1) CO unob.
ELSE.
MOVE ' ' TO Unob_Temp+offset(1).
ENDIF.

offset = offset + 1.

ENDWHILE.
temp_unob = unob_temp.
WRITE: / Unob_Temp.

ENDFUNCTION.

-------------
Meine 2. Frage wäre:
Wenn ich eine variable definieren will, die aus 4 buchstaben bestehen soll, dann nehme ich doch Datentyp ‚c’ oder? Und für eine 3 stellige zahl ‚p’ :

REPORT z_kurs .

TYPES: BEGIN OF st_kurs,
bez TYPE c length 4 ,
erg TYPE p length 3 ,
END OF st_kurs.

Aber, ich bekomme einen Fehler :

, or DECIMALS … expected after c.

Was ist da nicht richtig?
-------------

Ich bin übrigens Neuling in Abap, Die Sparche gefält mir aber bis jetzt ganz gut.
Es wird wahrscheinlich immer komplexer werden aber, was ist schon einfach im Leben

Also, danke schonmal für die Antworten.

Grüße
mineabap

Re: Fehlerhafter logischer Ausdruck

Hier ein paar Vorschläge meinerseits:

Der Fehler wird wohl folgendes sein:
OHNE Leerzeichen bei dem '+'
Ich verwende nie ' ' oder '' (also zwei Hochkomatas) sondern imme die variable SPACE oder den Befehl Clear wenn ich die Variable initialisieren will.

Re: Fehlerhafter logischer Ausdruck

Hallo mineabap,

bei der Deklaration eines Feldes mit dem Typ p ist zwingend eine Angabe der Anzahl Dezimalstellen erforderlich:

Re: Fehlerhafter logischer Ausdruck

Noch mal zum Ersetzen...
Wenn man immer genau ein Zeichen des Quellstrings durch jeweils ein Zeichen ersetzen will, geht das (auch noch in älteren Releases) mit einer einzigen Translate-Anweisung.
ersetzt alle Umlaute und jedes ß durch space.
oder z.B. .

Was so nicht geht, ist z.B. alle 'Ä' durch 'Ae' zu ersetzen.
Das könnte man aber z.B. mit REPLACE ALL OCCURRENCES OF ... erledigen (erfordert aber SY-SAPRL > '46D').