[manu_lolo27]

data var_fecha(7).

concatenate fecha(2) fecha+2(4) into var_fecha separte by '-'.

o

concatenate fecha(2) '-' fecha+2(4) into var_fecha.

creo q esta es la solucion mas rapida, desconozco si hay una funcion que lo haga,

espero q te sirva