Formating variables

[_pi]

is that somehow possible ?

example is nonsense

Code:

Copy      Help

for _i 1 6
,m.from("m" _i)=_s.from("test" _i)
,
out m1

i would like to create and fill my variables m1,m2,m3,etc

[_pi]

here is a realworld example which i would like to put into a loop

Code:

Copy      Help

pf_menge.MoveFirst
,d.m1=pf_menge.Fields.Item("Menge").Value
,d.ek1=pf_menge.Fields.Item("EK").Value
,d.m1vki=pf_menge.Fields.Item("vki").Value
,d.m1vkh=pf_menge.Fields.Item("vkh").Value    
pf_menge.MoveNext
,d.m2=pf_menge.Fields.Item("Menge").Value
,d.ek2=pf_menge.Fields.Item("EK").Value
,d.m2vki=pf_menge.Fields.Item("vki").Value
,d.m2vkh=pf_menge.Fields.Item("vkh").Value    
pf_menge.MoveNext
,d.m3=pf_menge.Fields.Item("Menge").Value
,d.ek3=pf_menge.Fields.Item("EK").Value
,d.m3vki=pf_menge.Fields.Item("vki").Value
,d.m2vkh=pf_menge.Fields.Item("vkh").Value    
pf_menge.MoveNext
,d.m4=pf_menge.Fields.Item("Menge").Value
,d.ek4=pf_menge.Fields.Item("EK").Value
,d.m4vki=pf_menge.Fields.Item("vki").Value
,d.m4vkh=pf_menge.Fields.Item("vkh").Value    
pf_menge.MoveNext
,d.m5=pf_menge.Fields.Item("Menge").Value
,d.ek5=pf_menge.Fields.Item("EK").Value
,d.m5vki=pf_menge.Fields.Item("vki").Value
,d.m5vkh=pf_menge.Fields.Item("vkh").Value

[Gintaras]

if m1, m2 etc are placed like array, then declare str* and use [].

type T m1 m2 m3 m4
T t

str* a=&t.m1
for i 0 4
,a[i]=...

---

type TT m1 e1 m2 e2
TT t

str* a=&t.m1
for i 0 2 2
,a[i]=... ;;mx
,a[i+1]=... ;;ex

---

type T m e
type TT T't[4]
TT t

for i 0 4
,t.t[i].e=...
,t.t[i].m=...

----

type T m e
type TT T't1 T't2
TT t

T* a=&t.t1
for i 0 2
,a[i].m=...
,a[i].e=...