Dynamic variable name

Easy enough

set base ORC1_

set var fld2cpt1

set $base$var “SOME VALUE”

I will leave to you how to vary the variable part each time and also how to keep track of variable names used.

In a situation like this, I think it’s simpler to use an array.

You’ll certainly do this in a loop.

So, that would look something like this…

# if there’s a possibility orcArray already exists – if testing in a shell, for example – you’ll want to unset it.

—————

catch {unset orcArray}

# initialize an array element to keep track of how many pairs of values you extract

set orcArray(numOrcSegments) 0
set outOfOrcSegments 0
while { 1 } {

# get your ORC values here – if out of ORC segments, set the value in break out of while loop if you have no more ORC segments, set outOfOrcSegments to 1

if { $outOfOrcSegments } {
break
} else {
set i $orcArray(numOrcSegments)
set orcArray(f1,c1,$i) $orc2_1
set orcArray(f2,c1,$i) $orc3_1
incr orcArray(numOrcSegments)
}

}

—————

When you want to access a value, precede the array name with $ – just like any other variable.
This for loop will list all of the f1/f2 value pairs in the array.

———–

for { set i 0 } { $i < $orcArray(numOrcSegments) } { incr i } {
puts “index $i – f1 c1= $orcArray(f1,c1,$i), f2 c1= $orcArray(f2,c1,$i)”
}

<hr />

You could also use parallel lists, keyed lists – always more than one way to skin the cat…