Yo hago algo parecido, pero previendo que entre medio de los datos útiles haya mas de un espacio mando cualquier cosa al final de la variable. Ejemplo :
Código COBOL:
INSPECT WS-A REPLACING TRAILING SPACES BY "!"
Se que en esta variable no puede haber "!", de lo contrario reemplazo por cualquier otro caracter.
Y si necesito la variable como estaba al inicio :
Código COBOL:
INSPECT WS-A REPLACING ALL "!" BY " "
Y todo queda como estaba.
Y en el puntero, como bien dice
@Kuk, queda el número de caracteres útiles del campo.