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 & 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 |