Feld umsetzen Groß/Klein

[AK1]

Hallo,
ich möchte einen Feldinhalt alpha mit Groß/Kleinschreibibung auf Großschreibung konvertieren.
Will aber keine Tabelle benutzen. wie
z.B.
aA
bB
cC

Gibt es eine einfachere Methode?

Danke

[B.Hauser]

... am einfachsten geht das mit der SQL-Funktion UPPER:

Select  Upper(MyText) from MyTable;

Oder mit embedded SQL:

/Free
    Exec SQL   Set :MyText = Upper(:MyText);
/End-Free

Birgitta

[RobertMack]

Oder mit Api QLGCNVCS/QlgConvertCase


Converting Between Lower and Upper Case - Refined | System iNetwork

[prsbrc]

Da gäbe es auch noch den Umweg über %XLATE mit 2 Konstanten (lower und Upper).

D cXUpper         C                   'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 
D CXLower         C                   'abcdefghijklmnopqrstuvwxyz' 

gaData=%XLate(cXLower:cXUpper:gdsSrc.Data);

MfG
Christian Brunner

[Spateneder]

Oder mit Api QLGCNVCS/QlgConvertCase


Converting Between Lower and Upper Case - Refined | System iNetwork

Diesem Tip schließe ich mich an.
Ergänzung: NEWSolutions 11/09 enthielt einen deutschsprachigen Artikel dazu (S. 30), mit Code zum Download.
Mit QlgConvertcase kann man wesentlich mehr umsetzen als a-z nach A-Z, falls erforderlich, z.B. die mit Accent und sonstigen Häkchen verzierten Buchstaben in manchen Sprachen, oder griechische Kleinbuchstaben in Großbuchstaben, u.s.w.