PC Toledo

Preciso criar um vetor de 2 dimensões assim:

aDados := { 0, 0, 0, 20380.00, 20435.00, 20421.00, 20196.00, 20239.00, 19875.00, 19708.00, 19461.00, 19230.00 }, ;
{ 0, 0, 0, 6435.00, 6465.00, 6225.00, 5805.00, 5865.00, 5850.00, 5850.00, 5775.00, 5640.00 } }

Queria fazer um for each em que cada linha do aDados fosse um ano (1..12)

Isso é para usar no RMChart, o meu caso é por valor

Código: Selecionar todos

"1392"	"1"	  "2019"
"1371"	"2"	  "2019"
"1364"	"3"	  "2019"
"1327"	"4"	  "2019"
"1316"	"5"	  "2019"
"1319"	"6"	  "2019"
"1321"	"7"	  "2019"
"1299"	"8"	  "2019"
"1302"	"9"	  "2019"
"1290"	"10"	"2019"
"1286"	"11"	"2019"
"1276"	"12"	"2019"

"1250"	"1"	  "2020"
"1206"	"2"	  "2020"
"1167"	"3"	  "2020"
"1050"	"4"	  "2020"
"1001"	"5"	  "2020"
"970"	  "6"	  "2020"
"998"	  "7"	  "2020"
"1007"	"8"	  "2020"
"944"	  "9"	  "2020"
"965"	  "10"	"2020"
"923"	  "11"	"2020"
"454"	  "12"	"2020"

Seria isso?

Código: Selecionar todos

aList := {}
FOR nCont = 1 TO 2
   FOR EACH nValor IN aDados[ nCont ]
      AAdd( aList, { nValor, nValor:__EnumIndex, 2018 + nCont ] )
   NEXT
NEXT

Ou o contrário?

Código: Selecionar todos

aDados := { {}, {} }
FOR EACH aItemList in aOrigemList
   AAdd( aDados[ iif( aItemList[ 3 ] == "2019", 1, 2 ) ], aItemList[ 1 ] )
NEXT

JoséQuintas escreveu:Ou o contrário?
Código: Selecionar todos
aDados := { {}, {} }
FOR EACH aItemList in aOrigemList
   AAdd( aDados[ iif( aItemList[ 3 ] == "2019", 1, 2 ) ], aItemList[ 1 ] )
NEXT

Prefeito, isso mesmo. Obrigado

Quintas

Isso foi para produzir isso:

PC Toledo

Criar vetor de 2 dimensões

Criar vetor de 2 dimensões

Criar vetor de 2 dimensões

Criar vetor de 2 dimensões

Criar vetor de 2 dimensões

Criar vetor de 2 dimensões