Subversion Repositories wimsdev

Rev

Rev 4039 | Rev 5850 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1.  
  2. !read adm/css.phtml
  3. !read tabletheme
  4.  
  5. !header1
  6. !read adm/class/classname.phtml $wims_classname\
  7. $wims_institutionname
  8.  
  9. !read adm/title.phtml 1\
  10. $classname\
  11. $module_title
  12. !if $error!=$empty
  13.  <p>
  14.  !read lang/msg.phtml.$moduclass_lang
  15.  !goto end
  16. !endif
  17.  $name_intro.
  18.  !form reply
  19.  
  20.  !set iniparm1=!replace internal & by $ $ in $iniparm
  21.  !set block=!getopt block in $iniparm1
  22. $table_header
  23. $table_tr
  24. <th>$wims_name_title</th><td colspan="2"> <input size="50" name="title" value="$title"/></td>
  25. $table_tr <th>$wims_name_Status</th>
  26.  <td>
  27.  !formselect status list 0,1 prompt $wims_name_status
  28.  <input type="hidden" name="job" value="$job"/>
  29.   !if $doc>0
  30.   !formcheckbox update list 0 prompt $wims_name_erase
  31.  !endif
  32.  </td><td>
  33.  <code>
  34. !replace internal & by &amp; in $dir
  35.  !if $iniparm!=$empty
  36. !replace internal & by &amp; in &$iniparm
  37.  !endif
  38.  </code>
  39.  </td>
  40. $table_tr<th>$wims_name_Description</th><td colspan="2"><textarea name="desc" rows="5" cols="50">$desc</textarea></td></tr>
  41.  
  42. $table_tr<th></th><td colspan="2"><center><input type="submit" value="$wims_name_tosave"/></center></td></tr>
  43. $table_end
  44.  </form>
  45. !endif
  46.  
  47. :end
  48.  
  49. !set wims_menu_items=!append line class_home,1,module=home\
  50. to $wims_menu_items
  51.  
  52. !tail
  53.  
  54. !set job=
  55.  
  56.