Subversion Repositories wimsdev

!read adm/css.phtml

!read tabletheme

!header1

!read adm/class/classname.phtml $wims_classname\

$wims_institutionname

!read adm/title.phtml 1\

$classname\

$module_title

!if $error!=$empty

 <div>

 !read lang/msg.phtml.$moduclass_lang

 </div>

 !goto end

!endif

 $name_intro.

 !form reply

 !set iniparm1=!replace internal & by $ $ in $iniparm

 !set block=!getopt block in $iniparm1

$table_header

$table_tr

<th>$wims_name_title</th><td> <input size="50" name="title" value="$title" />

</td></tr>

$table_tr<th>$wims_name_Status</th>

 <td>

 !formselect status list 0,1 prompt $wims_name_status

 <input type="hidden" name="job" value="$job" />

  !if $doc>0

  !formcheckbox update list 0 prompt $wims_name_erase

 !endif

 </td></tr>

$table_tr<th>$name_wksheet</th><td>

!formselect wksheet from 0 to 64

</td></tr>

$table_tr<th>$wims_name_Description</th><td>

<textarea name="desc" rows="5" cols="50">$desc</textarea></td></tr>

$table_tr<th>Code</th><td>

 <code>

!replace internal & by & in $dir

 !if $iniparm!=$empty

!replace internal & by & in &$iniparm

 !endif

 </code>

 </td></tr>

 $table_end

<div class="wimscenter wimsform"><input type="submit" value="$wims_name_tosave" /></div>

!formend

!endif

:end

!set wims_menu_items=!append line class_home,1,module=home\

to $wims_menu_items

!tail

!set job=