Subversion Repositories wimsdev

Rev

Rev 5640 | Rev 5971 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
747 bpr 1 
!!##language independant
23 reyssat 2 
 !if $parm1=$empty
3 
  !exit
4 
 !endif
5 
!if \ isin $parm1$parm2$parm3$parm4
6 
 !for p in 1,2,3,4
7 
  !set parm$p=!slashsubst $(parm$p)
8 
 !next p
9 
!endif
3616 bpr 10 
!if / isin $parm1
11 
 <iframe src="wims.cgi?module=adm/raw&amp;job=lightpopup&amp;noabout=yes&amp;emod=$parm1&amp;parm=$parm3&amp;option=noabout"
5640 bpr 12 
style="width:100%;height:100%;min-height:700px;"></iframe>
3616 bpr 13 
!exit
14 
!endif
23 reyssat 15 
 !reset titb
16 
 !read $wims_priv_thisdoc/$parm1.def
17 
 !set prompt=!item 2 to -1 of $parms
18 
 !default prompt=$titb
19 
 !if $titb=$empty
20 
  !default prompt=<tt>$parm1</tt>
21 
  $prompt
22 
  !if $editable=yes
23 
   <small>[
747 bpr 24 
   !href cmd=reply&job=edit&block=$parm1 $n_create
1042 bpr 25 
   ]</small>
23 reyssat 26 
  !else
747 bpr 27 
   <small>$n_nonavailable</small>
23 reyssat 28 
  !endif
29 
 !else
5894 bpr 30 
  <a id="$parm1"></a>
23 reyssat 31 
  $prompt
32 
  !if $editable=yes
33 
   <small>[
1685 bpr 34 
   !href cmd=reply&job=edit&doc=$doc&block=$parm1 $wims_name_Edit
23 reyssat 35 
   ]</small>
36 
  !endif
37 
  !read $wims_priv_thisdoc/$parm1.def content
38 
  !set gotblock=!append item $parm1 to $gotblock
39 
 !endif
3616 bpr 40