Subversion Repositories wimsdev

Rev

Rev 12595 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
12569 bpr 1
!if $cmd=new or $cmd=resume
2
  !form reply
3
  <fieldset class="property_fields halfwidth blockcenter">
4
  <legend>$wims_name_properties $wims_name_Glossary $d</legend>
5
  <div class="field box">
6
  <div class="field box">
7
    <label for="title">$wims_name_title</label>
8
    <input size="50" name="title" value="$ti" id="title" />
9
  </div>
10
  <div class="field box">
11
  !set n_=!recordcnt wimshome/log/classes/$wims_class/tool/.glossary$gl
12
    $table_header
13
    $table_tr
14
    <th>$wims_name_title</th><th>$wims_name_action</th><th></th>
15
    </tr>
16
  !for j=1 to $n_
17
    !set c_=!record $j of wimshome/log/classes/$wims_class/tool/.glossary$gl
18
    !distribute line $c_ into di_,ti_,
19
    $table_tr
20
    <td><input size="20" name="title$j" value="$ti_" id="title" /></td>
21
    <td>
22
    !formcheckbox delete$j list 1 prompt $wims_name_erase
23
    </td>
24
    <td>$di_</td>
25
    </tr>
26
  !next
27
  </table>
28
  <div class="wimscenter wimsform"><input type="submit" value="$wims_name_send" /></div>
29
  </div>
30
  <input type="hidden" name="job" value="mod" />
31
  </fieldset>
32
  !formend
33
 
34
!endif
35
 
36
!if $cmd=reply
37
  $name_endmod.
38
  !set wims_menu_items=!append line "glossarycheck",1,module=adm/tool/glossary&gl=$gl\
39
to $wims_menu_items
40
!endif