Subversion Repositories wimsdev

Rev

Rev 9390 | Rev 9720 | 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_alertmsg">
  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.   $name_file <span class="tt wims_fname">
  27.  !getfile $outfile $outfile
  28.  </span> $name_download
  29.  <hr />
  30. !endif
  31.  
  32. !if $processed=yes
  33.  !if $remark$change$added$missing$erased!=$empty or $manual=yes
  34.   $name_deposit<ul>
  35.   !if $change!=$empty
  36.    <li>$name_infochanged: <span class="tt wims_login">
  37.    !replace internal , by ,$ $ in $change
  38.    </span></li>
  39.   !endif
  40.   !if $added!=$empty
  41.    <li>$name_added: <span class="tt wims_login">
  42.    !replace internal , by ,$ $ in $added
  43.    </span></li>
  44.   !endif
  45.    !if $bad_login!=$empty
  46.    <li>$name_badlogin: <span class="tt wims_login">
  47.    !replace internal , by ,$ $ in $bad_login
  48.    </span></li>
  49.   !endif
  50.   !if full iswordof $remark
  51.    <li>$name_warning1</li>
  52.   !endif
  53.   !if noprop iswordof $remark
  54.    <li>$name_warning2</li>
  55.   !endif
  56.   !if noauto iswordof $remark
  57.    <li>$name_warning3</li>
  58.   !endif
  59.   !if $erased!=$empty
  60.    <li>$name_warning4:
  61.    <span class="tt wims_login">
  62.    !replace internal , by ,$ $ in $erased
  63.    </span></li>
  64.   !endif
  65.   !if $missing!=$empty
  66.    <li>
  67.    !if full notwordof $remark
  68.     $name_nologin1:
  69.    !else
  70.     $name_nologin2:
  71.    !endif
  72.    <span class="tt wims_login">$missing</span>
  73.   !endif
  74.   </li>
  75.   !if $manual=yes
  76.    <li>$name_manual1
  77.    !href module=adm/class/grades $name_check
  78. .</li>
  79.   !endif
  80.   </ul>
  81.  !else
  82.  $name_data1
  83.  !endif
  84.  <hr />
  85. !endif
  86.  
  87. !form reply
  88. <input type="hidden" name="job" value="csv" />
  89. <input type="hidden" name="csvtype" value="download" />
  90. $name_data2<ul>
  91. <li>$name_format
  92. !formselect csvformat list csv,tsv
  93. &nbsp;
  94. !set wims_ref_class=wims_button_help
  95. !href module=$module&cmd=help&special_parm=csvformats $wims_name_help
  96. </li>
  97.  
  98. !! keywords of column
  99.  
  100. <li>$name_column
  101. &nbsp;
  102. !set wims_ref_class=wims_button_help
  103. !href module=$module&cmd=help&special_parm=csvfields $wims_name_help
  104.  
  105. !readproc csv/keyword.proc
  106. <div class="field">
  107. <ul>
  108. !for bas in basic, basic2
  109.   !if $($bas)!=$empty
  110.    <li>
  111.    !let tmp=!replace password by in $($bas)
  112.    !let tmp=!replace vars by in $($bas)
  113.    !let tmp=!words2items $tmp
  114.    !for k in $tmp
  115.     <input type="checkbox" name="csvdownload" id="csvdownload_$k" value="$k"/><label for="csvdownload_$k">$k</label>
  116.    !next k
  117.    </li>
  118.   !endif
  119. !next
  120. !let list_type=sh,ex,ma,shexo
  121. !let list_name=$wims_name_Sheets,$wims_name_Examens,$name_manualscore,$name_indicateur
  122. !let list_keyword=sheet,exam,manual,sheetexo
  123. !if $($(list_type[1]))!=$empty or $($(list_type[2]))!=$empty or $($(list_type[3]))!=$empty or $($(list_type[4]))!=$empty
  124.  <li><input type="checkbox" name="csvdownload" id="csvdownload_allscore" value="allscore"/><label for="csvdownload_allscore">$name_allscore</label></li>
  125. !endif
  126. !for t from 1 to 4
  127.     !if $($(list_type[$t]))!=$empty
  128.          !let tmp=!words2items $($(list_type[$t]))
  129.          <li>
  130.         <b>$(list_name[$t])</b>: <input type="checkbox" name="csvdownload" id="csvdownload_$(list_keyword[$t])" value="$(list_keyword[$t])s"/><label for="csvdownload_$(list_keyword[$t])">$name_all</label>
  131.         !for k in $tmp
  132.           <input type="checkbox" name="csvdownload" id="csvdownload_$k" value="$k"/><label for="csvdownload_$k">$k</label>
  133.         !next k
  134.         </li>
  135.     !endif
  136. !next t
  137. !if $av!=$empty
  138. !let tmp=!words2items $av
  139. <li><b>$name_Average</b>:
  140. !for k in $tmp
  141.     <input type="checkbox" name="csvdownload" id="csvdownload_$k" value="$k"/><label for="csvdownload_$k">$k</label>
  142. !next k
  143. </li>
  144. !endif
  145. <li><b>$name_otherkeyword</b>: <input type="text" size="45" name="csvdownload2" value="$csvdownload2" />
  146. </li>
  147. </ul>
  148. <input type="submit" value="$wims_name_download" />
  149.  
  150.  
  151. !formend
  152. !! open the upload to the level supervisor  alternative use user_supervise
  153. !if $classtype notin 13 or $typename iswordof class course  or\
  154.    ($typename iswordof level and $wims_user=supervisor)
  155.  <hr />
  156.  !set wims_form_method=file
  157.  !form reply
  158.  <input type="hidden" name="job" value="csv" />
  159.  <input type="hidden" name="csvtype" value="upload" />
  160.  $name_data3
  161.  &nbsp;
  162. !set wims_ref_class=wims_button_help
  163.  !href module=$module&cmd=help&special_parm=upload $wims_name_help
  164.  <ul>
  165.  <li>$name_data <input type="file" size="30" name="wims_deposit" /> <br />
  166.  $name_format2: <span class="tt">.csv</span>, <span class="tt">.tsv</span>, <span class="tt">.txt</span>
  167.  &nbsp;
  168. !set wims_ref_class=wims_button_help
  169.  !href module=$module&cmd=help&special_parm=csvformats2 $wims_name_help
  170.  </li>
  171.  </ul>
  172.  <input type="submit" value="$wims_name_send" />
  173.  
  174. !formend
  175. !endif
  176.  
  177.  
  178. !if $wims_user=supervisor and ($wims_typename iswordof course or \
  179. ($wims_typename iswordof class and $wims_supertype iswordof 0 2))
  180.   !set wims_menu_items=!append line Score1,1,cmd=resume\
  181.   livret,1,module=adm/class/livret\
  182. to $wims_menu_items
  183. !endif
  184.  
  185. !set wims_menu_items=!append line usermanage,1,module=adm/class/usermanage\
  186. to $wims_menu_items
  187.