Subversion Repositories wimsdev

Rev

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

Rev 4039 Rev 5199
Line 11... Line 11...
11
 
11
 
12
!if $error!=$empty
12
!if $error!=$empty
13
 <p>
13
 <p>
14
 !read lang/msg.phtml.$moduclass_lang
14
 !read lang/msg.phtml.$moduclass_lang
15
 <p>
15
 <p>
-
 
16
!else
16
 !goto end1
17
 !read $job.phtml
17
!endif
18
!endif
18
 
19
 
19
!if $cmd=new or $cmd=resume
-
 
20
 $name_insert <tt class="wims_fname">$dir</tt>
-
 
21
 !if $iniparm!=$empty
-
 
22
  $name_parm
-
 
23
 <p>
-
 
24
 <tt class="wims_parm">
-
 
25
  !replace internal & by &amp; in $iniparm
-
 
26
  </tt>
-
 
27
 </p>
-
 
28
 !endif
-
 
29
<p>
-
 
30
 
-
 
31
 !form reply
-
 
32
 $name_choose:
-
 
33
 <select name="picksheet">
-
 
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
-
 
38
  !if $se=$sheetcnt
-
 
39
   <option value="$se" selected>$wims_name_Sheet $se: $ti</option>
-
 
40
  !else
-
 
41
   <option value="$se">$wims_name_Sheet $se: $ti</option>
-
 
42
  !endif
-
 
43
 !next i
-
 
44
 </select>
-
 
45
 <p>$name_modifytitle
-
 
46
 <p>
-
 
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
-
 
53
 !set title=!trim $title
-
 
54
 !default title=$wims_name_Exercise
-
 
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>
-
 
57
 !if $scoring=yes
-
 
58
  <p>$name_required:
-
 
59
  <input size="4" name="require" value="$require">
-
 
60
  <small>
-
 
61
  ($name_repeat)
-
 
62
  </small><p>
-
 
63
 $name_weight:
-
 
64
  <input size="6" name="weight" value="$weight">.
-
 
65
 !endif
-
 
66
 <p><center><input type="submit" value="$wims_name_Insert"></center>
-
 
67
 </form>
-
 
68
 !goto end
-
 
69
!endif
-
 
70
 
-
 
71
!if $cmd=reply
-
 
72
 $name_end
-
 
73
 $picksheet.
-
 
74
 
-
 
75
!endif
-
 
76
:end1
-
 
77
!set wims_menu_items=!append line sheetcheck,1, module=adm/class/sheet&sheet=$picksheet\
-
 
78
to $wims_menu_items
-
 
79
 
-
 
80
:end
-
 
81
!set wims_menu_items=!append line moduback,1,module=$dir\
20
!set wims_menu_items=!append line moduback,1,module=$dir\
82
to $wims_menu_items
21
to $wims_menu_items
83
 
22
 
84
!tail
23
!tail
85
 
24