Ok, I seem to have destroyed my sample. So perhaps I'll start again by asking a question. Why won't the following concept work?

break on
DIM $PCsetting[4]
InitialiseVariables()
Report()
Quit

FUNCTION InitialiseVariables()
$PCsetting[1]='one'
$PCsetting[2]='two'
$PCsetting[3]='three'
ENDFUNCTION

FUNCTION Report()
FOR EACH $element IN $PCsetting
?$element
NEXT
ENDFUNCTION