Subversion Repositories wimsdev

Rev

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

  1. !distribute items $wims_read_parm into i,j
  2. !default j=1
  3. !set seq_=!record $j of wimshome/log/classes/$wims_class/seq/.sequence$i
  4. !distribute line $seq_ into tis_,cos_,obj_,o_
  5.  
  6. !if $o_<1
  7.   !exit
  8. !endif
  9. !set wlist=!record 0 of wimshome/log/classes/$wims_class/sheets/.weight
  10. !set TI=!defof sequence_Title in wimshome/log/classes/$wims_class/seq/.def
  11. <fieldset id="wims_seq_$i" class="wims_seq">
  12. <legend>$TI $i
  13. </legend>
  14. <div class="wims_title_seq">
  15. <span class="wims_title_item">
  16.    $tis_
  17. </span>
  18. <span class="wims_comment_item">
  19.    $cos_
  20. </span>
  21. </div><!--wims_title_seq-->
  22. !set dcnt=!itemcnt $obj_
  23. !for i_=1 to $dcnt
  24.    !distribute word $(obj_[$i_]) into type,num
  25.    !if $type=c
  26.       !set d_=!record $num of wimshome/log/classes/$wims_class/doc/.index
  27.       !distribute lines $d_ into s_,t_,bidon,bidon,bidon,o_,bidon,bidon,de_
  28.       !if $o_>0
  29.       <div class="wims_doc_item">
  30.         !href module=adm/doc&job=read&doc=$s_&block=main&seq=$i $t_
  31.      <span class="wims_doc_desc">$de_</span>
  32.      </div>
  33.       !endif
  34.    !endif
  35.    !if $type=doc
  36.      !set d_=!record $num of wimshome/log/classes/$wims_class/doc/.docindex
  37.      !distribute lines $d_ into s_,t_,ti_,de_,o_
  38.      !if $o_>0
  39.      <div class="wims_doc_item">
  40.         !href module=$s_&$t_&seq=$i&name=$wims_name_sequence  $ti_
  41.        <span class="wims_doc_desc">$de_</span></div>
  42.      !endif
  43.      !reset s_,t_,ti_,de_,o_
  44.    !endif
  45.    !if $type=sheet
  46.      !set s_=!record $num of wimshome/log/classes/$wims_class/sheets/.sheets
  47.      !distribute lines $s_ into a_,t_,ti,de
  48.      !if $a_>=1 and $a_<=2  
  49.      <div class="wims_sheet_item">
  50.        !href module=adm/sheet&sh=$num&seq=$i $ti
  51.     <span class="wims_user_sheet_expire"><!--wims_user_sheet_expire-->
  52.       !if $a_>=2
  53.         $U_expired
  54.       !else
  55.        !if showshexpire iswordof $class_option
  56.         !read misc/expire.phtml.$lang $t_
  57.        !endif
  58.       !endif
  59.     </span><!--wims_user_sheet_expire-->
  60.       !set pe=!line $num of $percents
  61.       !set p1=!word 1 of $pe
  62.       !set p2=!word 2 of $pe
  63.       <span class="wims_user_sheet_score">
  64.        !if $p1!=$empty
  65.         $p1% $U_done, $U_average $[$p2]/10
  66.       !else
  67.         &nbsp;
  68.       !endif
  69.       !if showshweight iswordof $class_option
  70.        ($wims_name_coeff
  71.         !line $i of $wlist
  72.        )
  73.       !endif
  74.    </span><!--wims_user_sheet_score-->
  75.   <span class="wims_sheet_desc"> $de </span><!--wims_sheet_desc-->
  76.   </div><!--wims_sheet_item-->
  77.   !reset a_,t_,ti,de
  78.     !endif
  79.    !endif
  80.    !if $type=vote
  81.      !set v_=!record $num of wimshome/log/classes/$wims_class/vote/.votes
  82.      !distribute lines $v_ into a_,t_,ti,de_
  83.      !if $a_>=1 and $a_<=2
  84.      <div class="wims_vote_item">
  85.       !href module=adm/vote&job=read&vote=$num&seq=$i $t_
  86.      <span class="wims_vote_desc">$de_</span>
  87.      </div>
  88.      !endif
  89.      !reset a_,t_,ti,de_
  90.    !endif
  91.    !if $type=exam
  92.      !set e_=!record $num of wimshome/log/classes/$wims_class/exams/.exams
  93.      !distribute lines $e_ into a_,ex_,du_,t_,de_
  94.      !if $a_>=1 and $a_<=2
  95.      <div class="wims_exam_item">
  96.       !href module=adm/class/exam&exam=$num&seq=$i $t_
  97.   <span class="wims_user_exam_expire">
  98.   !if $a_>=2
  99.    $U_expired
  100.   !else
  101.    !if showexexpire iswordof $class_option
  102.     !read misc/expire.phtml.$lang $ex_
  103.    !else
  104.     &nbsp;
  105.    !endif
  106.   !endif
  107.   </span>
  108.      <span class="wims_exam_desc">$de_</span>
  109.      </div>
  110.      !endif
  111.     !reset a_,ex_,du_,nb_,t_,de_
  112.    !endif
  113.    
  114.    !reset s_ v_ d_ e_
  115.  !next i_
  116.  </fieldset>
  117.  
  118.