Ord eines characters
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
10 Beiträge
•
Seite 1 von 1
10 Beiträge
Seite 1 von 1
Hallo zusammen,
ich habe eine an sich wohl banale Frage, kann sie aber nicht beantworten. Wie kann ich in ABAP zu einem gegebenen Charakter seine Ordinalzahl bestimmen. In anderen Programmiersprachen geht das mit "ord" (Pascal) oder "asc" (Basic), aber wie geht es in ABAP?
Anders ich such zu gegebenen A die 65, zu B die 66 usw.
Gruß
Heiko
ich habe eine an sich wohl banale Frage, kann sie aber nicht beantworten. Wie kann ich in ABAP zu einem gegebenen Charakter seine Ordinalzahl bestimmen. In anderen Programmiersprachen geht das mit "ord" (Pascal) oder "asc" (Basic), aber wie geht es in ABAP?
Anders ich such zu gegebenen A die 65, zu B die 66 usw.
Gruß
Heiko
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Beitrag
von Frank Dittrich (Expert / 674 / 0 /
15
)
»
Für Nicht-Unicode-Systeme tut's auch noch:
Code: Alles auswählen.
DATA: c TYPE c,
BEGIN OF s_x, x TYPE x, END OF s_x,
i TYPE i.
c = 'A'.
s_x = c.
i = s_x-x.
WRITE: c, s_x-x, i.
Beitrag
von black_adept (Top Expert / 4158 / 136 /
959
)
»
@ Olaf:
Ist doch eigentlich egal wofür er es braucht, oder? Auch prinzipielle Fragen sind Fragen.
@Gast:
Ich denke nicht, dass die Funktionalität fehlt.
Wenn du 2 Variablen geschickt verknüpfst kannst du durch einfach Wertzuweisung das Ergebnis haben das du wünscht.
Ist doch eigentlich egal wofür er es braucht, oder? Auch prinzipielle Fragen sind Fragen.
@Gast:
Ich denke nicht, dass die Funktionalität fehlt.
Wenn du 2 Variablen geschickt verknüpfst kannst du durch einfach Wertzuweisung das Ergebnis haben das du wünscht.
Code: Alles auswählen.
REPORT zsstest1 LINE-SIZE 1000.
DATA: i TYPE i.
TYPES: BEGIN OF ty_i,
dummy(3) TYPE x,
x TYPE x,
END OF ty_i.
FIELD-SYMBOLS: <ord_i> TYPE ty_i,
<ord> TYPE c.
ASSIGN i TO <ord_i> CASTING.
ASSIGN <ord_i>-x TO <ord> CASTING.
_____________________________________________
* ORD-Funktion
DO 25 TIMES.
<ord> = sy-abcde+sy-index(1).
WRITE:/ <ord>,i.
ENDDO.
ULINE.
* ASC-Funktion
DO 256 TIMES.
i = sy-index - 1.
WRITE:/ i,<ord>.
ENDDO.Moin Stefan,
im Prinzip ist es egal, trotzdem interessiert es mich.
Einerseits kann man eventuell, wenn man die Problemstellung kennt, einen anderen Lösungsansatz vorschlagen und damit weiterhelfen. Andererseits kommt es häufiger vor, dass nach einer speziellen Problemlösung gefragt wird, die Ursache aber im Lösungsansatz zu finden ist. Das liegt m. E. auch daran, dass vieles in ABAP anders gelöst wird, als in anderen Programmiersprachen.
Auf jeden Fall muss auch die ursprüngliche Frage beantwortet werden, dass war bereits geschehen.
VG Olaf
im Prinzip ist es egal, trotzdem interessiert es mich.
Einerseits kann man eventuell, wenn man die Problemstellung kennt, einen anderen Lösungsansatz vorschlagen und damit weiterhelfen. Andererseits kommt es häufiger vor, dass nach einer speziellen Problemlösung gefragt wird, die Ursache aber im Lösungsansatz zu finden ist. Das liegt m. E. auch daran, dass vieles in ABAP anders gelöst wird, als in anderen Programmiersprachen.
Auf jeden Fall muss auch die ursprüngliche Frage beantwortet werden, dass war bereits geschehen.
VG Olaf
Hallo zusammen.
Das geht auch einfach mit Move und WRITE.
zumindest bei RELEASE 45B.
REPORT ZTESTHEX.
DATA CHARACT(2).
DATA HEX TYPE X.
DATA INTEG TYPE I.
PARAMETERS P_ZEICH(1).
WRITE P_ZEICH TO HEX.
WRITE HEX TO CHARACT. "Zusatz Info
MOVE HEX TO INTEG.
WRITE:/ 'Das eigegebene Zeichen:',
P_ZEICH,
'ist hexadezimal:',
CHARACT,
' Das ist dezimal:',
(3) INTEG,
'( abhängig vom Betriebssystem (ASCII/EBCDIC) )'.
Das geht auch einfach mit Move und WRITE.
zumindest bei RELEASE 45B.
REPORT ZTESTHEX.
DATA CHARACT(2).
DATA HEX TYPE X.
DATA INTEG TYPE I.
PARAMETERS P_ZEICH(1).
WRITE P_ZEICH TO HEX.
WRITE HEX TO CHARACT. "Zusatz Info
MOVE HEX TO INTEG.
WRITE:/ 'Das eigegebene Zeichen:',
P_ZEICH,
'ist hexadezimal:',
CHARACT,
' Das ist dezimal:',
(3) INTEG,
'( abhängig vom Betriebssystem (ASCII/EBCDIC) )'.
Seite 1 von 1
Frage die ABAP Experten
Über diesen Beitrag
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
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.