Subversion Repositories wimsdev

Rev

Rev 2356 | Rev 3066 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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