Subversion Repositories wimsdev

Rev

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

  1.  
  2. !set wims_form_method=post
  3. !read adm/title.phtml 1\
  4. $classname\
  5. $wims_name_csv
  6.  
  7. !if $wims_user=supervisor and ($wims_typename iswordof course or \
  8. ($wims_typename iswordof class and $wims_supertype iswordof 0 2))
  9.  <p class="wimscenter">
  10.  !set wims_ref_class=wims_button
  11.  !href cmd=reply $name_direct_score
  12.  </p>
  13. !endif
  14.  
  15. !if $error!=$empty
  16.  <div class="wims_msg alert">
  17.  !read lang/msg.phtml.$moduclass_lang
  18.  </div>
  19.  !if $error iswordof not_secure not_superclass
  20.   !exit
  21.  !endif
  22. <hr />
  23. !endif
  24.  
  25. !if $outfile!=$empty
  26.  <div class="wims_msg success">
  27.   $name_file <span class="tt wims_fname">
  28.  !getfile $outfile $outfile
  29.  </span> $name_download
  30.  </div>
  31. !endif
  32.  
  33. !if $processed=yes
  34.  !if $remark$change$added$missing$erased!=$empty or $manual=yes
  35.   <div class="wims_msg success">
  36.   $name_deposit
  37.   <ul>
  38.   !if $change!=$empty
  39.    <li>$name_infochanged: <span class="tt wims_login">
  40.    !replace internal , by ,$ $ in $change
  41.    </span></li>
  42.   !endif
  43.   !if $added!=$empty
  44.    <li>$name_added: <span class="tt wims_login">
  45.    !replace internal , by ,$ $ in $added
  46.    </span></li>
  47.   !endif
  48.   !if $bad_login!=$empty
  49.    <li>$name_badlogin: <span class="tt wims_login">
  50.     !replace internal , by ,$ $ in $bad_login
  51.    </span></li>
  52.   !endif
  53.   !if full iswordof $remark
  54.     <li>$name_warning1</li>
  55.   !endif
  56.   !if noprop iswordof $remark
  57.     <li>$name_warning2</li>
  58.   !endif
  59.   !if noauto iswordof $remark
  60.     <li>$name_warning3</li>
  61.   !endif
  62.   !if $erased!=$empty
  63.     <li>$name_warning4:
  64.     <span class="tt wims_login">
  65.     !replace internal , by ,$ $ in $erased
  66.     </span></li>
  67.   !endif
  68.   !if $missing!=$empty
  69.     <li>
  70.     !if full notwordof $remark
  71.      $name_nologin1:
  72.     !else
  73.      $name_nologin2:
  74.     !endif
  75.     <span class="tt wims_login">$missing</span>.
  76.     !if $pass_missing=yes
  77.      $name_passwarning
  78.     !endif
  79.     </li>
  80.   !endif
  81.   !if $manual=yes
  82.    <li>$name_manual1
  83.    !href module=adm/class/grades $name_check
  84.    .</li>
  85.   !endif
  86.   </ul>
  87.   </div>
  88.  !else
  89.  <div class="wims_msg success">
  90.   $name_data1
  91.   </div>
  92.  !endif
  93. !endif
  94.  
  95. !form reply
  96. <input type="hidden" name="job" value="csv" />
  97. <input type="hidden" name="csvtype" value="download" />
  98. $name_data2
  99. <ul>
  100. <li>$name_format
  101.  !formselect csvformat list $csvformatlist
  102.  &nbsp;
  103.  !set wims_ref_class=wims_button_help
  104.  !href module=$module&cmd=help&special_parm=csvformats $wims_name_help
  105. </li>
  106.  
  107. !! keywords of column
  108.  
  109. <li>
  110.  $name_column
  111.  &nbsp;
  112.  !set wims_ref_class=wims_button_help
  113.  !href module=$module&cmd=help&special_parm=csvfields $wims_name_help
  114.  
  115.  !readproc csv/keyword.proc
  116.  <div class="field">
  117.  <ul>
  118.  !for bas in basic, basic2
  119.   !if $($bas)!=$empty
  120.    <li>
  121.    !let tmp=!replace password by in $($bas)
  122.    !let tmp=!replace vars by in $($bas)
  123.    !let tmp=!words2items $tmp
  124.    !for k in $tmp
  125.     <input type="checkbox" name="csvdownload" id="csvdownload_$k" value="$k"/><label for="csvdownload_$k">$k</label>
  126.    !next k
  127.    </li>
  128.   !endif
  129.  !next bas
  130.  !let list_type=sh,shexo,ex,exexo,examduration,ma
  131.  !let list_name=$wims_name_Sheets,$name_indicateur,$wims_name_Examens,$wims_name_Examens ($wims_name_Exercices),\
  132.  $wims_name_Examens ($name_Duration),$name_manualscore
  133.  !let list_keyword=sheets,sheetexo,exams,examexo,examduration,manual
  134.  !if $($(list_type[1]))$($(list_type[2]))$($(list_type[3]))$($(list_type[4]))$($(list_type[5]))!=$empty
  135.   <li><input type="checkbox" name="csvdownload" id="csvdownload_allscore" value="allscore"/><label for="csvdownload_allscore">$name_allscore</label></li>
  136.  !endif
  137.  !for t from 1 to 6
  138.     !if $($(list_type[$t]))!=$empty
  139.           !let tmp=!words2items $($(list_type[$t]))
  140.           <li>
  141.          <b>$(list_name[$t])</b>:
  142.          !if $t notwordof 2 4 5
  143.          <input type="checkbox" name="csvdownload" id="csvdownload_$(list_keyword[$t])" value="$(list_keyword[$t])"/><label for="csvdownload_$(list_keyword[$t])">$name_all</label>
  144.          !endif
  145.          !for k in $tmp
  146.           <input type="checkbox" name="csvdownload" id="csvdownload_$k" value="$k"/><label for="csvdownload_$k">$k</label>
  147.          !next k
  148.         </li>
  149.     !endif
  150.  !next t
  151.  !if $av!=$empty
  152.   !let tmp=!words2items $av
  153.   <li><b>$name_Average</b>:
  154.   !for k in $tmp
  155.     <input type="checkbox" name="csvdownload" id="csvdownload_$k" value="$k"/><label for="csvdownload_$k">$k</label>
  156.   !next k
  157.   </li>
  158.  !endif
  159.  <li>
  160.   <input type="checkbox" name="csvdownload" id="csvdownload_techvar" value="techvar"/>
  161.   <label for="csvdownload_techvar">$name_techvar</label>
  162.  </li><li>
  163.   <input type="checkbox" name="csvdownload" id="csvdownload_regvar" value="regvar"/>
  164.   <label for="csvdownload_regvar">$name_regvar</label>
  165.  </li>
  166.  </ul>
  167. </li>
  168. </ul>
  169. <input type="submit" value="$wims_name_download" />
  170. !formend
  171.  
  172.  
  173.  
  174. !! open the upload to the level supervisor alternative use user_supervise
  175. !if $classtype notin 13 or $typename iswordof class course  or\
  176.    ($typename iswordof level and $wims_user=supervisor)
  177.   <hr />
  178.  !set wims_form_method=file
  179.  !form reply
  180.   <input type="hidden" name="job" value="csv" />
  181.   <input type="hidden" name="csvtype" value="upload" />
  182.   $name_data3
  183.   &nbsp;
  184.   !set wims_ref_class=wims_button_help
  185.   !href module=$module&cmd=help&special_parm=upload $wims_name_help
  186.   <ul>
  187.    <li>$name_data <input type="file" size="30" name="wims_deposit" /> <br />
  188.    $name_format2: <span class="tt">.csv</span>, <span class="tt">.tsv</span>, <span class="tt">.txt</span>
  189.    &nbsp;
  190.    !set wims_ref_class=wims_button_help
  191.    !href module=$module&cmd=help&special_parm=csvformats2 $wims_name_help
  192.    </li>
  193.   </ul>
  194.   <input type="submit" value="$wims_name_send" />
  195.  !formend
  196. !endif
  197.  
  198. !set wims_menu_items=!append line itemsep,0,$wims_name_manage\
  199. usermanage,1,module=adm/class/usermanage\
  200. techvar,1,module=adm/class/techvar\
  201. to $wims_menu_items
  202.  
  203. !if $wims_user=supervisor and ($wims_typename iswordof course or \
  204. ($wims_typename iswordof class and $wims_supertype iswordof 0 2))
  205.   !set wims_menu_items=!append line itemsep,0,$wims_name_Evaluation\
  206.   Score1,1,cmd=resume\
  207.   livret,1,module=adm/class/livret\
  208. to $wims_menu_items
  209. !endif
  210.