Subversion Repositories wimsdev

Rev

Rev 5971 | Rev 16210 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5971 Rev 12490
Line 1... Line 1...
1 
!!##language independant
 1 
!!##language independant
2 
!set parm1=!text select /$namechars in $parm1
 2 
!set parm1=!text select /$namechars in $parm1
3 
!set parm1=!char 1 to $namelim of $parm1
 3 
!set parm1=!char 1 to $namelim of $parm1
4 
 
 4 
 
5 
!if $parm1=$block or $parm1=$empty
 5 
!if $parm1=$block or $parm1=$empty
6 
 !default parm2=??
 6 
  !default parm2=??
7 
 !set parm2=!slashsubst $parm2
 7 
  !set parm2=!slashsubst $parm2
8 
 !set pp=!item 3 to -1 of $parms
 8 
  !set pp=!item 3 to -1 of $parms
9 
 !set pp=!slashsubst $pp
 9 
  !set pp=!slashsubst $pp
10 
 <a id="primi$serial"></a>
 10 
  <a id="primi$serial"></a>
11 
 !if $doc/$block.$serial notitemof $foldlist and $printable!=yes
 11 
  !if $doc/$block.$serial notitemof $foldlist and $printable!=yes
12 
  !href cmd=reply&job=read&foldin=$block.$serial#primi$serial $parm2
 12 
    !href cmd=reply&job=read&foldin=$block.$serial#primi$serial $parm2
13 
 !else
 13 
  !else
14 
  $pp
 14 
    $pp
15 
  !if $printable!=yes
 15 
    !if $printable!=yes
16 
   <span class="small">[
 16 
      <span class="small">[
17 
   !href cmd=reply&job=read&foldout=$block.$serial#primi$serial $n_foldout
 17 
      !href cmd=reply&job=read&foldout=$block.$serial#primi$serial $n_foldout
18 
   ]</span>
 18 
      ]</span>
- 
 
 19 
    !endif
19 
  !endif
 20 
  !endif
20 
 !endif
 - 
 
21 
 !exit
 21 
  !exit
22 
!endif
 22 
!endif
23 
 
 23 
 
24 
!reset titb
 24 
!reset titb
25 
!read $wims_priv_thisdoc/$parm1.def
 25 
!read $wims_priv_thisdoc/$parm1.def
26 
!set prompt=!item 2 to -1 of $parms
 26 
!set prompt=!item 2 to -1 of $parms
27 
!default prompt=$titb
 27 
!default prompt=$titb
28 
!if $titb=$empty
 28 
!if $titb=$empty
29 
 !default prompt=<span class="tt">$parm1</span>
 29 
  !default prompt=<span class="tt">$parm1</span>
30 
 $prompt
 - 
 
31 
 !if $editable=yes
 - 
 
32 
  <span class="small">[
 - 
 
33 
  !href cmd=reply&job=edit&block=$parm1 $n_create
 - 
 
34 
  ]</span>
 - 
 
35 
 !else
 - 
 
36 
  <span class="small">$n_nonavailable</span>
 - 
 
37 
 !endif
 - 
 
38 
!else
 - 
 
39 
 <a id="primi$serial"></a>
 - 
 
40 
 $prompt
 30 
  $prompt
41 
 !if $printable=yes
 - 
 
42 
  !goto alwaysin
 - 
 
43 
 !endif
 - 
 
44 
 <span class="small">[
 - 
 
45 
 !if $doc/$block.$serial notitemof $foldlist and robot notin $session
 - 
 
46 
  !href cmd=reply&job=read&foldin=$block.$serial#primi$serial $wims_name_detail
 - 
 
47 
  ]</span>
 - 
 
48 
 !else
 - 
 
49 
  !href cmd=reply&job=read&foldout=$block.$serial#primi$serial $n_foldout
 - 
 
50 
  ]
 - 
 
51 
  !if $editable=yes
 31 
  !if $editable=yes
- 
 
 32 
    <span class="small">[
- 
 
 33 
    !href cmd=reply&job=edit&block=$parm1 $n_create
- 
 
 34 
    ]</span>
- 
 
 35 
  !else
- 
 
 36 
    <span class="small">$n_nonavailable</span>
- 
 
 37 
  !endif
- 
 
 38 
!else
- 
 
 39 
  <a id="primi$serial"></a>
- 
 
 40 
  $prompt
- 
 
 41 
  !if $printable=yes
- 
 
 42 
    !goto alwaysin
- 
 
 43 
  !endif
- 
 
 44 
  <span class="small">[
- 
 
 45 
  !if $doc/$block.$serial notitemof $foldlist and robot notin $session
- 
 
 46 
    !href cmd=reply&job=read&foldin=$block.$serial#primi$serial $wims_name_detail
- 
 
 47 
    ]</span>
- 
 
 48 
  !else
- 
 
 49 
    !href cmd=reply&job=read&foldout=$block.$serial#primi$serial $n_foldout
52 
   [
 50 
    ]
- 
 
 51 
    !if $editable=yes
- 
 
 52 
      [
53 
   !href cmd=reply&job=edit&doc=$doc&block=$parm1 $wims_name_Edit
 53 
      !href cmd=reply&job=edit&doc=$doc&block=$parm1 $wims_name_Edit
54 
   ]
 54 
      ]
- 
 
 55 
    !endif
- 
 
 56 
    </span>
- 
 
 57 
    :alwaysin
- 
 
 58 
    !set blocksave=$blocksave $block
- 
 
 59 
    !set block=$parm1
- 
 
 60 
    !read $wims_priv_thisdoc/$parm1.def content
- 
 
 61 
    !set block=!word -1 of $blocksave
- 
 
 62 
    !set blocksave=!word 1 to -2 of $blocksave
- 
 
 63 
    !set gotblock=!append item $parm1 to $gotblock
55 
  !endif
 64 
  !endif
56 
  </span>
 - 
 
57 
  :alwaysin
 - 
 
58 
  !set blocksave=$blocksave $block
 - 
 
59 
  !set block=$parm1
 - 
 
60 
  !read $wims_priv_thisdoc/$parm1.def content
 - 
 
61 
  !set block=!word -1 of $blocksave
 - 
 
62 
  !set blocksave=!word 1 to -2 of $blocksave
 - 
 
63 
  !set gotblock=!append item $parm1 to $gotblock
 - 
 
64 
 !endif
 - 
 
65 
!endif
 65 
!endif