Subversion Repositories wimsdev

Rev

Rev 14868 | Rev 16819 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14868 Rev 16615
Line 141... Line 141...
141 
      class_parent=$wims_superclass/$parentcheck
 141 
      class_parent=$wims_superclass/$parentcheck
142 
    !endif
 142 
    !endif
143 
  !endif
 143 
  !endif
144 
  !default wims_realuser=$wims_user
 144 
  !default wims_realuser=$wims_user
145 
  !read adm/class/userdef logclasses,$wims_class,$wims_realuser
 145 
  !read adm/class/userdef logclasses,$wims_class,$wims_realuser
146 
  supervisable=!defof user_supervisable in $userdef
 146 
  supervisable=!defof user_supervisable,user_forcechpwd in $userdef
- 
 
 147 
  !distribute item $supervisable into supervisable forcechpwd
- 
 
 148 
  !if $wims_realuser!=supervisor and $forcechpwd=yes
- 
 
 149 
    test=!fileexists wimshome/sessions/$wims_session/var
- 
 
 150 
    !if $test!=yes
- 
 
 151 
      !writefile wimshome/$wims_sesdir/var REMOTE_ADDR=$httpd_REMOTE_ADDR\
- 
 
 152 
HTTP_REFERER=$httpd_HTTP_REFERER\
- 
 
 153 
QUERY_STRING=\
- 
 
 154 
HTTP_USER_AGENT=$httpd_HTTP_USER_AGENT\
- 
 
 155 
HTTP_COOKIE=$httpd_HTTP_COOKIE\
- 
 
 156 
w_cmd=new\
- 
 
 157 
w_lang=$class_lang\
- 
 
 158 
w_module=$module\
- 
 
 159 
w_session=$session\
- 
 
 160 
w_special_parm=\
- 
 
 161 
w_special_parm2=\
- 
 
 162 
w_useropts=$wims_useropts\
- 
 
 163 
w_wims_session=$wims_session\
- 
 
 164 
w_wims_subsession=$wims_subsession\
- 
 
 165 
w_wims_window=$wims_window\
- 
 
 166 
w_worksheet=\
- 
 
 167 
w_wims_exo=\
- 
 
 168 
w_wims_isexam=\
- 
 
 169 
w_wims_ismanager=$wims_ismanager\
- 
 
 170 
w_wims_mode=$wims_mode\
- 
 
 171 
w_wims_module_start_time=\
- 
 
 172 
w_wims_protocol=$wims_protocol\
- 
 
 173 
w_wims_req_time=$wims_req_time\
- 
 
 174 
w_wims_scorereg=\
- 
 
 175 
w_wims_session_serial=$wims_session_serial\
- 
 
 176 
w_wims_session_start_time=$wims_session_start_time\
- 
 
 177 
w_wims_sheet=
- 
 
 178 
    !endif
- 
 
 179 
    !restart module=adm/class/passwd&+job=user
- 
 
 180 
  !endif
147 
  !if $class_type>=2
 181 
  !if $class_type>=2
148 
    !if $class_type=4
 182 
    !if $class_type=4
149 
      subclasses=!record 0 of wimshome/log/classes/$wims_class/classes
 183 
      subclasses=!record 0 of wimshome/log/classes/$wims_class/classes
150 
      subclasses=!column 1 of $subclasses
 184 
      subclasses=!column 1 of $subclasses
151 
      subclasses=!makelist $wims_class/x for x in $subclasses
 185 
      subclasses=!makelist $wims_class/x for x in $subclasses
Line 199... Line 233...
199 
    subclasscnt1=!itemcnt $subclass1
 233 
    subclasscnt1=!itemcnt $subclass1
200 
    subclasscnt2=!itemcnt $subclass2
 234 
    subclasscnt2=!itemcnt $subclass2
201 
    subclasscnt3=!itemcnt $subclass3
 235 
    subclasscnt3=!itemcnt $subclass3
202 
  !endif
 236 
  !endif
203 
!endif
 237 
!endif
- 
 
 238 
 
204 
!readproc ./var.cdt
 239 
!readproc ./var.cdt
205 
!read ./otherclass.proc
 240 
!read ./otherclass.proc
206 
!if $wims_sheet=$empty
 241 
!if $wims_sheet=$empty
207 
  !!! should be on the complete home page
 242 
  !!! should be on the complete home page
208 
  !!distribute items no,no into wims_ariane_self,wims_ariane_home
 243 
  !!distribute items no,no into wims_ariane_self,wims_ariane_home