Subversion Repositories wimsdev

Rev

Rev 3588 | Rev 4018 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

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