Coger toda la cadena menos los tres ultimos caráteres

[rperuchet]

Buenas,

Tengo un string de mida variable, y me interesaria coger toda la cadena menos los tres últimos carácteres. Alguien me ayuda? Muchas gracias!

[Carlos]

Puedes hacer algo como esto:

En la variable V guardo la cantidad de caracteres que tiene campo_var.
Luego a V le resto 3 y listo.

Código: [Seleccionar]

DATA v(2) TYPE n.

  v = strlen( campo_var ).
  v = v - 3.
  campo_var = campo_var(v).

Un saludo.