Subversion Repositories wimsdev

Rev

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
!!##language independant
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