Subversion Repositories wimsdev

Rev

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 user__$uvn=$uvv in $userfile
155
      !setdef !set user_techvar_$(classid)_$number=$uvv in $userfile
-
 
156
  !endif
140
!next uv
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