!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>
!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 1 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
!set wims_menu_items=!append line class_home,1,module=home\
to $wims_menu_items
!tail
!set job=