Insert value every other character 1

[Naith]

Can one of you bright sparks display the logical way to convert these values:

2000
9999999
13

to

2 0 0 0
9 9 9 9 9 9 9
1 3

All source values are numerical, but naturally, it isn't essential that the formula preserve this.

 

[GJParker]

This should give you what you want, convert the number to a string and then step through each character and add the space.

local NumberVar i;
local StringVar strValue := cstr({MyField},0,'');
local stringvar strTemp;

For i := 1 to Len(strValue)
Do(
strTemp := strTemp & strValue[i] & ' ');

Left(strTemp,Len(strTemp) -1)

Gary Parker
MIS Data Analyst
Manchester, England

 

[Naith]

Beautifully done.