Puedes usar lo siguiente:
Define
pn_nulos,
pr_tabla record like nombre_tabla.*,
Vtext char(2000)
declare cursor_tipo for
select * from nombre_tabla
where condicion1 = algo
and condicion2 = algo2
...
...
..
foreach cursor_tipo into pr_tabla.*
let Vtext = pr_tabla.campo1 clipped, -- Suponemos que este campo es char(n)
" ", -- Esto hace que por lo menos exista un espacio enblanco entre
-- un campo y el otro.
pr_tabla.campo2 clippe, -- Suponemos que este campo es char(n)
" ", -- Esto hace que por lo menos exista un espacio enblanco entre
-- un campo y el otro.
pr_tabla.campo3 clipped, -- Suponemos que este campo es char(n),
" " -- Esto hace que por lo menos exista un espacio enblanco entre
-- un campo y el otro
...
...
...
insert into nombre_tabla_nueva values ( Vtext ) --o a un reporte.
let pr_tabla.* = pn_nulos.*
end foreach
Nota: El clipped es solamente usado para variables tipo char, strings o varchar o text,
Ok.