Para tu caso debes escribir
Código COBOL:
MOVE POW-TEXT OF Cmtext2 TO NOMBRE
MOVE FUNCTION UPPER-CASE (NOMBRE) TO NOMBRE-MAS
en NOMBRE estara en minuscula porque asi la debieron digitar en Cmtext2
Y en NOMBRE-MAS quedara el texto en mayuscula
Ahora si Cmtext2 es un control de tu form simplemente en las propiedades definalo como Upper y directamente estara en mayusculas asi lo digiten en minuscula