Subversion Repositories wimsdev

Rev

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