Subversion Repositories wimsdev

Rev

Rev 10169 | Rev 10276 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. <!-- BEGIN of html/headmenu_* -->
  2. !read name.phtml.$lang
  3. !read themes/$wims_theme/lang/name.phtml.$lang
  4. !default wims_name_bgcolor=$wims_ref_bgcolor
  5. !if $wims_hm$wims_home_items$wims_link_close!=$empty
  6.  !goto defend
  7. !endif
  8. !if $job=print or $printing=yes
  9.  !goto defend
  10. !endif
  11. !reset 1_ home_
  12. !if _ isin $wims_session
  13.  !if _exam isin $wims_session
  14.   !set wims_pses=!translate _ to , in $wims_session
  15.   !set wims_pses=!item 1 of $wims_pses
  16.   !set wims_pser=!randint 1,99999
  17.   !set wims_href_opener=window.opener.location='$wims_ref_name?session=$wims_pses.1&+cmd=reply&+job=student&+randomizer=$wims_pser';
  18.  !endif
  19.  !set 1_=!append line back,3,window.close();$wims_href_opener to $1_
  20. !else
  21.   !if $module!=home or ($module=home and $seq!=$empty)
  22.    !set home_=!append line class_home,1,session=$wims_session.1 to $home_
  23.   !else
  24.    !set home_=!append line class_home,8, to $home_
  25.   !endif
  26. !endif
  27.  
  28. !!! deconnexion link
  29. !if _tool notin $wims_session
  30.  !if $class_cas_auth!=$empty
  31.   !if $wims_user=supervisor
  32.      !set wims_link_close=!append line visitor,1,cmd=close&module=adm/class/classes&type=supervisor&class_auth=$class_cas_auth to $wims_link_close
  33.   !else
  34.    !if $wims_class!=$empty
  35.      !set wims_link_close=!append line visitor,1,cmd=close&module=adm/class/classes&type=participant&class_auth=$class_cas_auth to $wims_link_close
  36.    !else
  37.     !set wims_link_close=!append line visitor,1,cmd=close&class_auth=$wims_cas_auth to $wims_link_close
  38.    !endif
  39.   !endif
  40.  !else
  41.   !if $wims_user=supervisor
  42.     !set wims_link_close=!append line visitor,1,cmd=close&module=adm/class/classes&type=supervisor to $wims_link_close
  43.   !else
  44.      !if $wims_user=anonymous
  45.        !set wims_link_close=!append line visitor,1,cmd=close&module=adm/class/classes&type=example to $wims_link_close
  46.      !else
  47.        !if _exam notin $wims_session
  48.          !set wims_link_close=!append line visitor,1,cmd=close&module=adm/class/classes&type=participant to $wims_link_close
  49.        !endif
  50.     !endif
  51.   !endif
  52.  !endif
  53. !endif
  54.  
  55. !if _check isin $wims_session
  56.  !set ckstep=$special_parm
  57.  !distribute item $wims_check into ckmodule,ckuser,cksession,ckexo,cksteps,score
  58.  !set qstr=module=$ckmodule&+cmd=new&+job=examcheck&+checkuser=$ckuser&+checksession=$cksession&+checkexo=$ckexo
  59.  !set 2_=$wims_page_name : &nbsp;
  60.  !ifval $ckstep>1
  61.   !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=1">1</a>&nbsp;
  62.   !if $ckstep=2
  63.    !set 2_=$(2_)2&nbsp;
  64.   !else
  65.    !if $ckstep=3
  66.     !set 2_=$(2_)<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=2">2</a>&nbsp;3&nbsp;
  67.    !else
  68.     !set 2_=$(2_)&nbsp;...&nbsp;<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep-1]">$[$ckstep-1]</a>&nbsp;$ckstep&nbsp;
  69.    !endif
  70.   !endif
  71.  !else
  72.   !set 2_=$2_ 1 &nbsp;
  73.  !endif
  74.  !if $ckstep<$cksteps
  75.   !ifval $ckstep<$cksteps-2
  76.    !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep+1]">$[$ckstep+1]</a>&nbsp;...&nbsp;<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$cksteps">$cksteps</a>
  77.   !else
  78.    !ifval $ckstep=$cksteps-2
  79.     !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep+1]">$[$ckstep+1]</a>&nbsp;<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$cksteps">$cksteps</a>
  80.    !else
  81.     !ifval $ckstep=$cksteps-1
  82.      !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep+1]">$[$ckstep+1]</a>
  83.     !endif
  84.    !endif
  85.   !endif
  86.  !endif
  87.  !set 1_=!append line nav,0,$2_ to $1_
  88.  !set 3_=!translate internal - to , in $ckexo
  89.  !set 3_=!item -1 of $3_
  90.  !set 2_=<small>$ckuser: $3_=$module. $cksteps steps, $score/10.</small>
  91.  !set wims_hm=!append line score,0,$2_ to $1_
  92.  !goto defend
  93. !endif
  94. !if adm/forum notin $module and _ notin $wims_session \
  95.         and $wims_sheet=$empty
  96.  !!!set 1_=!append line forum,1,module=adm/forum/mboard to $1_
  97. !endif
  98. !!if $cmd=intro
  99. !! !set 1_=!append line work,1,module=$module&cmd=new to $1_
  100. !!endif
  101. !!if $wims_sheet!=$empty or _exam isin $wims_session
  102. !!  !set 1_=!append line tools,4,module=home,tool to $1_
  103. !!endif
  104. !!!if _ notin $wims_session and adm/ notin $module \
  105.         and $cmd notwordof help ref
  106.  !!!set 1_=!append line reference,4,module=$module&cmd=ref&special_parm=$cmd,ref to $1_
  107. !!!endif
  108. !if $wims_sequence>0 and (adm/sheet isin $module or $module_category!=adm)
  109.  !if $wims_user=supervisor
  110.    !set wims_ariane=!append line sequence,1,module=adm/class/sequence&seq=$wims_sequence\
  111. to $wims_ariane
  112.  !else
  113.    !set wims_ariane=!append line sequence,1,module=home&seq=$wims_sequence to $wims_ariane
  114.  !endif
  115.  !set wims_ariane_self=no
  116. !endif
  117. !if $wims_sheet>0 or P isin $wims_sheet
  118.    !set wims_ariane=!append line sheet,1,module=adm/sheet&sh=$wims_sheet to $wims_ariane
  119.    !set wims_ariane_self=no
  120. !endif
  121.  
  122.  
  123. !if $cmd=help or $cmd=hint
  124.  !set 1_=!append line resume,1,cmd=resume to $1_
  125. !endif
  126. !if $module_has_intro=yes and $cmd notwordof intro help and \
  127.         $wims_sheet=$empty and exam notin $wims_session and mfeed notin $wims_session
  128.    !if $wims_theme!=default
  129.      !set wims_ariane=!append line intro,1,module=$module&cmd=intro&special_parm=$special_parm&special_parm2=$special_parm2&special_parm3=$special_parm3&special_parm4=$special_parm4 to $wims_ariane
  130.      !set wims_ariane_self=no
  131.    !else
  132.      !set 1_=!append line intro,1,module=$module&cmd=intro&special_parm=$special_parm&special_parm2=$special_parm2&special_parm3=$special_parm3&special_parm4=$special_parm4 to $1_
  133.    !endif
  134. !endif
  135. !if $module_has_help=yes and $cmd notwordof intro help and _exam notin $wims_session
  136.  !if $module_help=$empty or $module_help=popup
  137.    !set 1_=!append line help,4,module=$module&cmd=help&special_parm=$wims_help_parm,mhelp to $1_
  138.  !else
  139.    !set 1_=!append line help,1,module=$module&cmd=help&special_parm=$wims_help_parm to $1_
  140.  !endif
  141. !endif
  142.  
  143. !if $wims_theme_version=0
  144.   !if _ notin $wims_session
  145.     !set 1_=!append line whelp,4,module=help/main&$wims_helper,help to $1_
  146.   !endif
  147. !endif
  148.  
  149. !!********* Link: "About"
  150. !if $module_has_about=yes and $cmd notwordof help and $module!=home \
  151.   and _exam notin $wims_session and _mfeed notin $wims_session \
  152.   and (adm notin $module or $wims_user iswordof supervisor developper or $wims_user=$empty)
  153.   !set 1_=!append line about,4,module=$module&cmd=help&special_parm=about,mhelp,,$wims_name_module_infos ($module) to $1_
  154. !endif
  155.  
  156. !set wims_hm=$1_
  157. !set wims_home_items=$home_
  158. :defend
  159. !set wims_hm_cnt=!linecnt $wims_hm
  160. !set wims_home_items_cnt=!linecnt $wims_home_items
  161. !set wims_link_close_cnt=!linecnt $wims_link_close
  162. !set wims_ariane_cnt=!linecnt $wims_ariane
  163. !read themes.phtml header
  164. <div class="wimsbody">
  165. <!-- END of html/headmenu_* -->
  166.