Rev 20 | Rev 3051 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 20 | Rev 1685 | ||
---|---|---|---|
Line -... | Line 1... | ||
- | 1 | !!##language independant |
|
1 | !if $printable=yes |
2 | !if $printable=yes |
2 | !exit |
3 | !exit |
3 | !endif |
4 | !endif |
4 | !set parm1=!text select /$namechars in $parm1 |
5 | !set parm1=!text select /$namechars in $parm1 |
5 | !set parm1=!char 1 to $namelim*2 of $parm1 |
6 | !set parm1=!char 1 to $namelim*2 of $parm1 |
Line 29... | Line 30... | ||
29 | !exit |
30 | !exit |
30 | !endif |
31 | !endif |
31 | !set wims_form_method=post |
32 | !set wims_form_method=post |
32 | !form reply |
33 | !form reply |
33 | <input type=hidden name=job value=read> |
34 | <input type=hidden name=job value=read> |
34 | <input type=hidden name=doc value= |
35 | <input type=hidden name=doc value="$doc"> |
35 | <input type=hidden name=block value= |
36 | <input type=hidden name=block value="$parm1"> |
36 | $pp |
37 | $pp |
37 | </form> |
38 | </form> |
38 | 39 |