Rev 7198 | Rev 10289 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 7198 | Rev 10146 | ||
---|---|---|---|
Line 127... | Line 127... | ||
127 | !endif |
127 | !endif |
128 | 128 | ||
129 | !! -------------------------- |
129 | !! -------------------------- |
130 | !! these lines are writing the variable user__ttt in the user file when |
130 | !! these lines are writing the variable user__ttt in the user file when |
131 | !!\uservar{ttt, ....} |
131 | !!\uservar{ttt, ....} |
- | 132 | ||
132 | 133 | ||
133 | ccc=!itemcnt $uvcnt |
134 | ccc=!itemcnt $uvcnt |
- | 135 | !if $ccc>0 |
|
- | 136 | !readproc adm/vfilter/listvarfilter.proc |
|
- | 137 | localname=!item $tv_listlocal of $tv_listname |
|
134 | !for i=1 to $ccc |
138 | !for i=1 to $ccc |
135 | uvc=!item $i of $uvcnt |
139 | uvc=!item $i of $uvcnt |
136 | uvn=!item $i of $uvname |
140 | uvn=!item $i of $uvname |
- | 141 | !! no registery if the technical variable is not already define |
|
- | 142 | !if $uvn isitemof $localname |
|
137 | uvv=!line $i of $uvval |
143 | uvv=!line $i of $uvval |
138 | uvv=!item $(parm$uvc)+1 of $uvv |
144 | uvv=!item $(parm$uvc)+1 of $uvv |
- | 145 | !! check if the value exists for this technical variable (only defined values can be save in user .def file) |
|
- | 146 | po=!positionof item $uvn in $tv_listname |
|
- | 147 | don=!line $po of $tv_listtechvar |
|
- | 148 | !distribute item $don into name,classid,number |
|
- | 149 | don=!record $number of wimshome/log/classes/$wims_class/.techvar |
|
- | 150 | don=!line 2 of $don |
|
- | 151 | !if $uvv notitemof $don |
|
- | 152 | uvv=$empty |
|
- | 153 | !endif |
|
- | 154 | classid=!replace internal / by A in $classid |
|
139 | !setdef !set |
155 | !setdef !set user_techvar_$(classid)_$number=$uvv in $userfile |
- | 156 | !endif |
|
140 | !next |
157 | !next i |
- | 158 | !endif |
|
141 | !! ------------------------------------------- |
159 | !! ------------------------------------------- |
142 | 160 | ||
143 | !restart module=adm/vote&job=read&vote=$vote |
161 | !restart module=adm/vote&job=read&vote=$vote |
144 | 162 |