Subversion Repositories wimsdev

Rev

Rev 12520 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12520 Rev 14312
Line 35... Line 35...
35 
!endif compute=yes?
 35 
!endif compute=yes?
36 
 
 36 
 
37 
:end
 37 
:end
38 
 
 38 
 
39 
!if $wims_developer!= and $type_exo=
 39 
!if $wims_developer!= and $type_exo=
40 
!set wims_menu_items=!append line itemsep,0,\
 40 
  !set wims_menu_items=!append line itemsep,0,\
41 
   to $wims_menu_items
 41 
     to $wims_menu_items
42 
!set u = !linecnt $name
 42 
  !set u = !linecnt $name
43 
!for i = 1 to $u
 43 
  !for i = 1 to $u
44 
  !set cnt=!itemcnt $(name[$i;])
 44 
    !set cnt=!itemcnt $(name[$i;])
45 
  !for a =1 to $cnt
 45 
    !for a =1 to $cnt
46 
  !set wims_name_title_quick_$(name[$i;$a])=$(explication[$i;$a])
 46 
    !set wims_name_title_quick_$(name[$i;$a])=$(explication[$i;$a])
47 
    !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
 47 
      !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
48 
   to $wims_menu_items
 48 
     to $wims_menu_items
49 
  !next a
 49 
    !next a
50 
!next
 50 
  !next
51 
!endif
 51 
!endif
52 
 
 52 
 
53 
!tail
 53 
!tail
54 
 
 54 
 
55 
!reset wims_exec_error wims_deposit
 55 
!reset wims_exec_error wims_deposit