Subversion Repositories wimsdev

Rev

Rev 2368 | Rev 3535 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2368 Rev 3049
1
 
1
 
2
!read adm/css.phtml
2
!read adm/css.phtml
3
 
3
 
4
!header1
4
!header1
5
 
5
 
6
 
6
 
7
!read adm/title.phtml 1\
7
!read adm/title.phtml 1\
8
$classname\
8
$classname\
9
$name_title
9
$name_title
10
 
10
 
11
!if $error!=$empty
11
!if $error!=$empty
12
 <p>
12
 <p>
13
 !read lang/msg.phtml.$moduclass_lang
13
 !read lang/msg.phtml.$moduclass_lang
14
 <p>
14
 <p>
15
 !goto end1
15
 !goto end1
16
!endif
16
!endif
17
 
17
 
18
!if $cmd=new or $cmd=resume
18
!if $cmd=new or $cmd=resume
19
 $name_insert <tt>$dir</tt>
19
 $name_insert <tt>$dir</tt>
20
 !if $iniparm!=$empty
20
 !if $iniparm!=$empty
21
  $name_parm <tt>$iniparm</tt>
21
  $name_parm <tt>$iniparm</tt>
22
 !endif
22
 !endif
23
. <p>
23
. <p>
24
 
24
 
25
 !form reply
25
 !form reply
26
 $name_choose:
26
 $name_choose:
27
 <select name=picksheet>
27
 <select name="picksheet">
28
 !for i=1 to $sheetcnt
28
 !for i=1 to $sheetcnt
29
  !set sh=!line $i of $sheets
29
  !set sh=!line $i of $sheets
30
  !set se=!item 1 of $sh
30
  !set se=!item 1 of $sh
31
  !set ti=!item 2 to -1 of $sh
31
  !set ti=!item 2 to -1 of $sh
32
  !if $se=$sheetcnt
32
  !if $se=$sheetcnt
33
   <option value=$se selected>$wims_name_Sheet $se: $ti
33
   <option value=$se selected>$wims_name_Sheet $se: $ti
34
  !else
34
  !else
35
   <option value=$se>$wims_name_Sheet $se: $ti
35
   <option value=$se>$wims_name_Sheet $se: $ti
36
  !endif
36
  !endif
37
 !next i
37
 !next i
38
 </select>
38
 </select>
39
 <p>$name_modifytitle
39
 <p>$name_modifytitle
40
 <p>
40
 <p>
41
 !set iniparm1=!replace internal & by $ $ in $iniparm
41
 !set iniparm1=!replace internal & by $ $ in $iniparm
42
 !set exo=!getopt exo in $iniparm1
42
 !set exo=!getopt exo in $iniparm1
43
 !set title1=!lookup $exo in wimshome/public_html/modules/$dir/Extitles
43
 !set title1=!lookup $exo in wimshome/public_html/modules/$dir/Extitles
44
 !if $title1!=$empty
44
 !if $title1!=$empty
45
   !set title=$title1
45
   !set title=$title1
46
 !endif
46
 !endif
47
 !set title=!trim $title
47
 !set title=!trim $title
48
 !default title=$wims_name_Exercise
48
 !default title=$wims_name_Exercise
49
 $wims_name_title: <input size=50 name=title value="$title"> <p>
49
 $wims_name_title: <input size=50 name="title" value="$title"> <p>
50
 $wims_name_Description: <textarea name=new_desc rows=5 cols=50>$desc</textarea>
50
 $wims_name_Description: <textarea name="new_desc" rows=5 cols=50>$desc</textarea>
51
 !if $scoring=yes
51
 !if $scoring=yes
52
  <p>$name_required:
52
  <p>$name_required:
53
  <input size=4 name=require value="$require">
53
  <input size=4 name="require" value="$require">
54
  <small>
54
  <small>
55
  ($name_repeat)
55
  ($name_repeat)
56
  </small><p>
56
  </small><p>
57
 $name_weight:
57
 $name_weight:
58
  <input size=6 name=weight value="$weight">.
58
  <input size=6 name="weight" value="$weight">.
59
 !endif
59
 !endif
60
 <p><center><input type=submit value="$wims_name_Insert"></center>
60
 <p><center><input type=submit value="$wims_name_Insert"></center>
61
 </form>
61
 </form>
62
 !goto end
62
 !goto end
63
!endif
63
!endif
64
 
64
 
65
!if $cmd=reply
65
!if $cmd=reply
66
 $name_end
66
 $name_end
67
 $picksheet.
67
 $picksheet.
68
 
68
 
69
!endif
69
!endif
70
:end1
70
:end1
71
!set wims_menu_items=!append line sheetcheck,1, module=adm/class/sheet&sheet=$picksheet\
71
!set wims_menu_items=!append line sheetcheck,1, module=adm/class/sheet&sheet=$picksheet\
72
to $wims_menu_items
72
to $wims_menu_items
73
 
73
 
74
:end
74
:end
75
!set wims_menu_items=!append line moduback,1,module=$dir\
75
!set wims_menu_items=!append line moduback,1,module=$dir\
76
to $wims_menu_items
76
to $wims_menu_items
77
 
77
 
78
!tail
78
!tail
79
 
79
 
80
!set job=
80
!set job=
81
 
81
 
82
 
82