Rev 5971 | Rev 7318 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 5971 | Rev 7270 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 |
|
1 | !read getparm $module_init_parm wksheet |
- | 2 | ||
2 | !set parm1=!text select /$namechars in $parm1 |
3 | !set parm1=!text select /$namechars in $parm1 |
3 | !set parm1=!char 1 to $namelim*2 of $parm1 |
4 | !set parm1=!char 1 to $namelim*2 of $parm1 |
4 | 5 | ||
5 | !if \ isin $parm2$parm3$parm4 |
6 | !if \ isin $parm2$parm3$parm4 |
6 | !for p in 2,3,4 |
7 | !for p in 2,3,4 |
Line 47... | Line 48... | ||
47 | !if $printable=yes and $pdoc=$doc |
48 | !if $printable=yes and $pdoc=$doc |
48 | <a href="#$parm1">$pname</a> |
49 | <a href="#$parm1">$pname</a> |
49 | !readproc docu/printlink.proc $parm1 |
50 | !readproc docu/printlink.proc $parm1 |
50 | !else |
51 | !else |
51 | !if $pdoc=$doc |
52 | !if $pdoc=$doc |
52 | !href module=$module&cmd=reply&job=read&doc=$pdoc&block=$parm1$mparms$anchor $pname |
53 | !href module=$module&cmd=reply&job=read&doc=$pdoc&block=$parm1$mparms&wksheet=$wksheet$anchor $pname |
53 | !else |
54 | !else |
54 | !href module=$pdoc&cmd=new&job=read&block=$parm1$mparms$anchor $pname |
55 | !href module=$pdoc&cmd=new&job=read&block=$parm1$mparms$anchor $pname |
55 | !endif |
56 | !endif |
56 | !endif |
57 | !endif |
57 | !endif |
58 | !endif |