Subversion Repositories wimsdev

Rev

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

  1.  
  2. !read adm/title.phtml 1\
  3. $classname\
  4. $module_description\
  5. $wims_name_sequence $seq
  6.  
  7. $name_addseq
  8.  
  9.   !set data=!record 1 of wimshome/log/classes/$wims_class/seq/.sequence$seq
  10.   !form reply
  11.   <label for="seq_title">$wims_name_title</label> : <input id="seq_title" name="seq_title" size="12" value="$(data[1;])" />
  12.  
  13.   <label for="seq_desc"> $wims_name_Description</label> : <input id="seq_desc" name="seq_desc" size="20" value="$(data[2;])" />
  14.  
  15.   <label for="visible">$wims_name_Status</label>:
  16.   !set visible=$(data[4;])
  17.   !formselect visible list 0,1 prompt $wims_name_status
  18.  $table_header
  19.  !for i=1 to $doccnt
  20.   !set sh=!record $i of wimshome/log/classes/$wims_class/doc/.index
  21.   !distribute lines $sh into s_,t_,bidon,bidon,bidon,o_
  22.   $table_tr
  23.   <td>
  24.   <label for="c_$i">
  25.   !href module=adm/doc&job=read&doc=$s_&block=main $t_
  26.   </label>
  27.   </td><td>
  28.   !item $[$o_ +1] of $wims_name_status
  29.   !set wims_ref_class=wims_button_help
  30.   !href module=adm/doc&job=prop&doc=$s_ $wims_name_change
  31.   </td><td>
  32.   !set c_$i=!positionof item c $i in $(data[3;])
  33.   <input name="c_$i" size="5" value="$(c_$i)" id="c_$i" />
  34.   </td></tr>
  35.  !next i
  36.   !for i=1 to $docpubliccnt
  37.   !set sh=!record $i of wimshome/log/classes/$wims_class/doc/.docindex
  38.   !distribute lines $sh into s_,t_,ti,d_,o_
  39.   $table_tr
  40.   <td>
  41.   <label for="doc_$i">
  42.   !href module=$s_&$t_ $ti
  43.   </label>
  44.   </td><td>
  45.   !item $[$o_ +1] of $wims_name_status
  46.    !set wims_ref_class=wims_button_help
  47.    !href module=adm/class/adddoc&job=prop&doc=$i $wims_name_change
  48.   </td><td>
  49.    !set doc_$i=!positionof item doc $i in $(data[3;])
  50.   <input name="doc_$i" size="5" value="$(doc_$i)" id="doc_$i" />
  51.   </td></tr>
  52.  !next i
  53.  !for i=1 to $sheetcnt
  54.   !set sh=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets
  55.   !distribute lines $sh into ac,t_,ti
  56.   $table_tr
  57.   <td>
  58.   <label for="sheet_$i">
  59.   !href module=adm/class/sheet&sheet=$i $ti
  60.   </label>
  61.   </td><td>
  62.    $(wims_name_shstatus[$ac+1])
  63.   </td><td>
  64.   !set sheet_$i=!positionof item sheet $i in $(data[3;])
  65.   <input name="sheet_$i" size="5" value="$(sheet_$i)" id="sheet_$i" />
  66.   </td></tr>
  67.  !next i
  68.  !set examcnt=!recordcnt wimshome/log/classes/$wims_class/exams/.exams
  69.  !for i=1 to $examcnt
  70.   !set sh=!record $i of wimshome/log/classes/$wims_class/exams/.exams
  71.   !distribute lines $sh into ac,t_,d_,ti
  72.   $table_tr
  73.   <td>
  74.   <label for="exam_$i">
  75.   !href module=adm/class/exam&exam=$i $ti
  76.   </label>
  77.   </td><td>
  78.    $(wims_name_shstatus[$ac+1])
  79.    </td><td>
  80.   !set exam_$i=!positionof item exam $i in $(data[3;])
  81.   <input name="exam_$i" size="5" value="$(exam_$i)" id="exam_$i"/>
  82.   </td></tr>
  83.  !next i
  84.  !set votecnt=!recordcnt wimshome/log/classes/$wims_class/vote/.votes
  85.  !for i=1 to $votecnt
  86.   !set sh=!record $i of wimshome/log/classes/$wims_class/vote/.votes
  87.   !distribute lines $sh into st_,ti_,op_,re_
  88.   $table_tr
  89.   <td>
  90.   <label for="vote_$i">
  91.   !href module=adm/vote&job=read&vote=$i $ti_
  92.   </label>
  93.   </td><td>
  94.    $(wims_name_status[$st_+1])
  95.    </td><td>
  96.   !set vote_$i=!positionof item vote $i in $(data[3;])
  97.   <input name="vote_$i" size="5" value="$(vote_$i)" id="vote_$i"/>
  98.   </td></tr>
  99.  !next i
  100.  $table_end
  101.   <div class="wimscenter wimsform"><input type="submit" value="$wims_name_tosave" /></div>
  102.  
  103. !formend
  104.