tabela uf ibge

[rosalvo rosa]

Alguém teria a tabela unidades da federaçao do IBGE ?

Preciso colocar no arquivo .txt que será importado, é o campo B|cUF|.

Agradeço a quem ajudar.


Rosalvo

[sygecom]

Seria essa:

Código: Selecionar todos

****************************
FUNCTION LISTA_UF(vBUSCA)
****************************
local nPos:=0
Local aestadosSigla := {}
Aadd( aestadosSigla, { 11, "RO"  } )
Aadd( aestadosSigla, { 12, "AC"  } )
Aadd( aestadosSigla, { 13, "AM"  } )
Aadd( aestadosSigla, { 14, "RR"  } )
Aadd( aestadosSigla, { 15, "PA"  } )
Aadd( aestadosSigla, { 16, "AP"  } )
Aadd( aestadosSigla, { 17, "TO"  } )
Aadd( aestadosSigla, { 21, "MA"  } )
Aadd( aestadosSigla, { 22, "PI"  } )
Aadd( aestadosSigla, { 23, "CE"  } )
Aadd( aestadosSigla, { 24, "RN"  } )
Aadd( aestadosSigla, { 25, "PB"  } )
Aadd( aestadosSigla, { 26, "PE"  } )
Aadd( aestadosSigla, { 27, "AL"  } )
Aadd( aestadosSigla, { 28, "SE"  } )
Aadd( aestadosSigla, { 29, "BA"  } )
Aadd( aestadosSigla, { 31, "MG"  } )
Aadd( aestadosSigla, { 32, "ES"  } )
Aadd( aestadosSigla, { 33, "RJ"  } )
Aadd( aestadosSigla, { 35, "SP"  } )
Aadd( aestadosSigla, { 41, "PR"  } )
Aadd( aestadosSigla, { 42, "SC"  } )
Aadd( aestadosSigla, { 43, "RS"  } )
Aadd( aestadosSigla, { 50, "MS"  } )
Aadd( aestadosSigla, { 51, "MT"  } )
Aadd( aestadosSigla, { 52, "GO"  } )
Aadd( aestadosSigla, { 53, "DF"  } )
Aadd( aestadosSigla, { 54, "EX"  } )
nPos:=ascan( aestadosSigla, {|x|x[2]==vBUSCA} )
if nPos==0
   Return(0)
else
   Return(aestadosSigla[nPos,1]) // retorna o codigo do Estado
endif
Return(0)

[rosalvo rosa]

Tchê Leo, muitas gracias.

Rosalvo.