File: main.phtml

package info (click to toggle)
wims 2%3A4.29a%2Bdfsg1-3
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 185,704 kB
  • sloc: xml: 366,687; javascript: 120,570; ansic: 62,341; java: 62,170; sh: 7,744; perl: 3,937; yacc: 3,217; cpp: 1,915; lex: 1,805; makefile: 1,084; lisp: 914; pascal: 601; python: 520; php: 318; asm: 7
file content (55 lines) | stat: -rw-r--r-- 1,158 bytes parent folder | download | duplicates (3)
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
!!@#language independant
!if robot isin $session
  !exit
!endif
!if $(module_title_$modu_lang)!=
  !set module_title=$(module_title_$modu_lang)
!endif

!header
!if $compute=yes
  !if $error!=$empty
    !if $mtype!=$empty
    <div class="wims_msg alert">
     !read msg.phtml
    </div>
    !endif
    <div class="wims_content">
    !read menu.phtml
    </div>
    !goto end
  !else
    !if $transfert issametext or $transfert=yes
      !set wims_form_method=file
      !read transfert.phtml
    !else
        <div class="wims_content">
      !read menu.phtml
      </div>
    !endif
  !endif
!else
    <div class="wims_content">
  !read menu.phtml
  </div>
!endif compute=yes?

:end

!if $wims_developer!= and $type_exo=
  !set wims_menu_items=!append line itemsep,0,\
     to $wims_menu_items
  !set u = !linecnt $name
  !for i = 1 to $u
    !set cnt=!itemcnt $(name[$i;])
    !for a =1 to $cnt
    !set wims_name_title_quick_$(name[$i;$a])=$(explication[$i;$a])
      !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
     to $wims_menu_items
    !next a
  !next
!endif

!tail

!reset wims_exec_error wims_deposit