Subversion Repositories wimsdev

Rev

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

Rev 3549 Rev 3616
Line 4... Line 4...
4 
 !endif
 4 
 !endif
5 
!if \ isin $parm1$parm2$parm3$parm4
 5 
!if \ isin $parm1$parm2$parm3$parm4
6 
 !for p in 1,2,3,4
 6 
 !for p in 1,2,3,4
7 
  !set parm$p=!slashsubst $(parm$p)
 7 
  !set parm$p=!slashsubst $(parm$p)
8 
 !next p
 8 
 !next p
- 
 
 9 
!endif
- 
 
 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"
- 
 
 12 
width="100%" height="100%"></iframe>
- 
 
 13 
!exit
9 
!endif
 14 
!endif
10 
 !reset titb
 15 
 !reset titb
11 
 !read $wims_priv_thisdoc/$parm1.def
 16 
 !read $wims_priv_thisdoc/$parm1.def
12 
 !set prompt=!item 2 to -1 of $parms
 17 
 !set prompt=!item 2 to -1 of $parms
13 
 !default prompt=$titb
 18 
 !default prompt=$titb
Line 30... Line 35...
30 
   ]</small>
 35 
   ]</small>
31 
  !endif
 36 
  !endif
32 
  !read $wims_priv_thisdoc/$parm1.def content
 37 
  !read $wims_priv_thisdoc/$parm1.def content
33 
  !set gotblock=!append item $parm1 to $gotblock
 38 
  !set gotblock=!append item $parm1 to $gotblock
34 
 !endif
 39 
 !endif
- 
 
 40