x

RTRIM(string)

donde:

string

Alfanumérico

Es la cadena que se va a recortar por la derecha.

Los datos de la cadena devuelta son de tipo AnV, con la misma longitud máxima que la de origen.

Principio de página

Ejemplo: Cómo eliminar los espacios en blanco al final (derecha) de una cadena

La siguiente solicitud, basada en el origen de datos MOVIES, crea el campo DIRLASH, con una barra diagonal al final del campo DIRECTOR. A continuación crea el campo TRIMDIR, que recorta los espacios finales del campo DIRECTOR y coloca una barra diagonal al final de éste.

TABLE FILE MOVIES
PRINT DIRECTOR NOPRINT AND
COMPUTE
DIRSLASH/A18 = DIRECTOR|'/';
TRIMDIR/A17V = RTRIM(DIRECTOR)|'/';
WHERE DIRECTOR CONTAINS 'BR'
ON TABLE SET PAGE NOPAGE
END

En la salida, las barras diagonales indican que los espacios finales del campo DIRECTOR han quedado eliminados en el campo TRIMDIR:

  DIRSLASH            TRIMDIR                           
  --------            -------                                         
  ABRAHAMS J.      /  ABRAHAMS J./     
  BROOKS R.        /  BROOKS R./       
  BROOKS J.L.      /  BROOKS J.L./