Pessoal, Consegui da seguinte maneira:
TESTE=""
for ( i = 1; i <= length(CAMPOB); i++ ){
if ( i%2 == 0 ){
x = i-1
TESTE=TESTE substr(CAMPOB,x,1)
} else {
x = i+1
TESTE=TESTE substr(CAMPOB,x,1)
}
}
print TESTE
Obrigado pelas dicas,
JP
[As partes desta mensagem que não continham texto foram removidas]
