My code is as follows

 

Local StringVar Array strAddress;
Local NumberVar index;
Local StringVar strOutput;
local StringVar Address := Table1.Address

 

redim strAddress[10] ;

if Length (Address) = 0 then
strOutput := "No Address"
else

strAddress := SplitTable1.Address},',');

for index := 2 to UBound(strAddress) do
    strOutput := strOutput & strAddress [index] & ' ' & chr(13) ;
 
strOutput := " " & strAddress [1] & chr(13) & strOutput ;

strOutput

 

What I am trying to do is

1. Check that I have an address

2. If I have an address then build it up as an address for a document

 

In my table address = 1 Main Street, Sometown, A Region, Post Code

 

What I want displayed is

 

1 Main Street,

Sometown,

A Region,

Post Code

 

Is this the correct way or is there a better way?

 

Help