Subversion Repositories wimsdev

Rev

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

Rev 6682 Rev 12733
Line 1... Line 1...
1 
!nocache
 1 
!nocache
2 
!if $block=main
 2 
!if $block=main
3 
 module_title=$tit
 3 
  module_title=$tit
4 
!else
 4 
!else
5 
 module_title=$tit / $titb
 5 
  module_title=$tit / $titb
6 
!endif
 6 
!endif
7 
!if robot isin $session
 7 
!if robot isin $session
8 
 !exit
 8 
  !exit
9 
!endif
 9 
!endif
10 
 
 10 
 
11 
!if $doctoc=yes and $block!=doctoc
 11 
!if $doctoc=yes and $block!=doctoc
12 
  !set header=$header\
 12 
  !set header=$header\
13 
 <script type="text/javascript">jQuery.noConflict();jQuery(function() {jQuery( "#doc_toc" ).menu();});</script>
 13 
  <script type="text/javascript">jQuery.noConflict();jQuery(function() {jQuery( "#doc_toc" ).menu();});</script>
14 
!endif
 14 
!endif
15 
!!( "#doc_toc" ).menu({ position: { my: "left top", at: "right-5 top+5" } });
 15 
!!( "#doc_toc" ).menu({ position: { my: "left top", at: "right-5 top+5" } });
16 
 
 16 
 
17 
sheetdata=
 17 
sheetdata=
18 
 
 18 
 
19 
!if $foldin!=$empty
 19 
!if $foldin!=$empty
20 
 foldin=!word 1 of $foldin
 20 
  foldin=!word 1 of $foldin
21 
 foldin=!char 1 to 50 of $foldin
 21 
  foldin=!char 1 to 50 of $foldin
22 
 foldlist=!item 1 to 200 of $foldlist
 22 
  foldlist=!item 1 to 200 of $foldlist
23 
 foldlist=!listunion $foldlist and $doc/$foldin
 23 
  foldlist=!listunion $foldlist and $doc/$foldin
24 
!endif
 24 
!endif
25 
 
 25 
 
26 
!if $foldout!=$empty
 26 
!if $foldout!=$empty
27 
 foldlist=!listcomplement $doc/$foldout in $foldlist
 27 
  foldlist=!listcomplement $doc/$foldout in $foldlist
28 
!endif
 28 
!endif
29 
 
 29 
 
30 
!bound readcntadv between integer -1 and 1 default 0
 30 
!bound readcntadv between integer -1 and 1 default 0
31 
readcnt=$[max(0,$readcnt+($readcntadv))]
 31 
readcnt=$[max(0,$readcnt+($readcntadv))]
32 
!if $readcnt>0
 32 
!if $readcnt>0
33 
 rlast=!line $readcnt of $readhist
 33 
  rlast=!line $readcnt of $readhist
34 
!endif
 34 
!endif
35 
!distribute item $rlast into doclast,blocklast
 35 
!distribute item $rlast into doclast,blocklast
36 
 
 36 
 
37 
!if $doc,$block!=$doclast,$blocklast
 37 
!if $doc,$block!=$doclast,$blocklast
38 
 readhist=!line 1 to $readcnt of $readhist
 38 
  readhist=!line 1 to $readcnt of $readhist
39 
 !advance readcnt
 39 
  !advance readcnt
40 
 readhist=!append line $doc,$block to $readhist
 40 
  readhist=!append line $doc,$block to $readhist
41 
 !if $readcnt>50
 41 
  !if $readcnt>50
42 
  readhist=!line -50 to -1 of $readhist
 42 
    readhist=!line -50 to -1 of $readhist
43 
  readcnt=!linecnt $readhist
 43 
   readcnt=!linecnt $readhist
44 
 !endif
 44 
  !endif
45 
!else
 45 
!else
46 
 rlast=!line $readcnt-1 of $readhist
 46 
  rlast=!line $readcnt-1 of $readhist
47 
 !distribute item $rlast into doclast,blocklast
 47 
  !distribute item $rlast into doclast,blocklast
48 
!endif
 48 
!endif
49 
 
 49 
 
50 
histtot=!linecnt $readhist
 50 
histtot=!linecnt $readhist
51 
!if $readcnt<$histtot
 51 
!if $readcnt<$histtot
52 
 rnext=!line $readcnt+1 of $readhist
 52 
  rnext=!line $readcnt+1 of $readhist
53 
 !distribute item $rnext into docnext,blocknext
 53 
  !distribute item $rnext into docnext,blocknext
54 
!endif
 54 
!endif
55 
 
 55 
 
56 
!read docu/popup.proc
 56 
!read docu/popup.proc
57 
!read docu/readdates.proc
 57 
!read docu/readdates.proc