| * Definimos una constante
con las letras en mayúscula (MAYUS) y otra con las letras en minúscula
(MINUS). D Mayus C CONST('ABCDEFGHIJKLMNÑOPQRSTUVWXYZ')
D Minus C CONST('abcdefghijklmnñopqrstuvwxyz')
* Para convertir el contenido de un campo de
minúscula a mayúscula utilizamos la función XLATE que compara los caracteres del campo
que queremos convertir (CAMPO1) con el contenido de la constante MINUS, los convierte a
los valores de la constante MAYUS y finalmente mueve el resultado a CAMPO2.
C Minus:Majus XLATE CAMPO1 CAMPO2
* Este ejemplo ha sido comprobado en un AS/400 con la
versión de sistema operativo 3.7
|
