File: sliding_s_index.thtml

package info (click to toggle)
libaws 20.2-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 16,656 kB
  • sloc: ada: 95,505; python: 2,270; ansic: 1,017; makefile: 829; xml: 235; javascript: 202; java: 112; sh: 106
file content (66 lines) | stat: -rw-r--r-- 2,892 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
@@-- Builds an index for split pages. (secondary index)
@@-- A sliding window of the indicated size is provided, the current page staying
@@-- centered (if possible) within the window.
@@-- Entries that have no associated hrefs are displayed (without link) only if
@@-- they are greater than 'A': therefore an alphabetical index will always show
@@-- all letters, but "<>" and "1..9" will only appear if there are corresponding
@@-- entries.
@@-- Buttons are added to go to first, last, previous and next pages.
@@--
@@-- Parameters: $1= Number of visible index entries
@@--             $2: Treatment of entries without Hrefs (optional)
@@--             $2=ALL   All entries without Href are displayed
@@--             $2=ALPHA Only alpha entries without Href are displayed
@@--             $2=NONE (or unspecified) No entry without Href is displayed

@@IF@@ not @_IS_EMPTY:S_PREVIOUS_@
   <a href="@_S_FIRST_@"><img src=/first.jpg border=0 align=absmiddle></a>
   <a href="@_S_PREVIOUS_@"><img src=/prev.jpg border=0 align=absmiddle></a>
@@END_IF@@

@@TABLE@@
   @@IF@@ @_S_PAGE_INDEX_@ <= @_"/"(2):$1_@
      @@IF@@ @_TABLE_LINE_@ <= @_$1_@
         @@IF@@ @_IS_EMPTY:TRIM:S_HREFS_V_@
            @@IF@@ @_UPPER:$2_@ = ALL or (@_UPPER:$2_@ = ALPHA and @_UPPER:S_INDEXES_V_@ >= A and @_UPPER:S_INDEXES_V_@ <= Z)
              @_S_INDEXES_V_@
            @@END_IF@@
         @@ELSIF@@ @_TABLE_LINE_@ = @_S_PAGE_INDEX_@
            <font color="red">@_S_INDEXES_V_@</font>
         @@ELSE@@
            <a href="@_S_HREFS_V_@">@_S_INDEXES_V_@</a>
         @@END_IF@@
      @@END_IF@@

   @@ELSIF@@ @_"/"(2):$1_@ > @_"-"(S_PAGE_INDEX):S_INDEXES_V'LENGTH_@
      @@IF@@ @_"+"($1):TABLE_LINE_@ > @_S_INDEXES_V'LENGTH_@
         @@IF@@ @_IS_EMPTY:TRIM:S_HREFS_V_@
            @@IF@@ @_UPPER:$2_@ = ALL or (@_UPPER:$2_@ = ALPHA and @_UPPER:S_INDEXES_V_@ >= A and @_UPPER:S_INDEXES_V_@ <= Z)
              @_S_INDEXES_V_@
            @@END_IF@@
         @@ELSIF@@ @_TABLE_LINE_@ = @_S_PAGE_INDEX_@
            <font color="red">@_S_INDEXES_V_@</font>
         @@ELSE@@
            <a href="@_S_HREFS_V_@">@_S_INDEXES_V_@</a>
         @@END_IF@@
      @@END_IF@@

   @@ELSE@@
      @@IF@@ @_ABS:"-"(S_PAGE_INDEX):TABLE_LINE_@ <= @_"/"(2):$1_@
         @@IF@@ @_IS_EMPTY:TRIM:S_HREFS_V_@
            @@IF@@ @_UPPER:$2_@ = ALL or (@_UPPER:$2_@ = ALPHA and @_UPPER:S_INDEXES_V_@ >= A and @_UPPER:S_INDEXES_V_@ <= Z)
              @_S_INDEXES_V_@
            @@END_IF@@
         @@ELSIF@@ @_TABLE_LINE_@ = @_S_PAGE_INDEX_@
            <font color="red">@_S_INDEXES_V_@</font>
         @@ELSE@@
            <a href="@_S_HREFS_V_@">@_S_INDEXES_V_@</a>
         @@END_IF@@
      @@END_IF@@
   @@END_IF@@
@@END_TABLE@@

@@IF@@ not @_IS_EMPTY:S_NEXT_@
   <a href="@_S_NEXT_@"><img src=/next.jpg border=0 align=absmiddle></a>
   <a href="@_S_LAST_@"><img src=/last.jpg border=0 align=absmiddle></a>
@@END_IF@@