Subversion Repositories wimsdev

Rev

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

Rev 13562 Rev 15767
Line 85... Line 85...
85
  !else
85
  !else
86
    !set tmp_=sheet,1,module=adm/sheet&sh=$wims_sheet&
86
    !set tmp_=sheet,1,module=adm/sheet&sh=$wims_sheet&
87
  !endif
87
  !endif
88
  !set 1_=!append line $tmp_ to $1_
88
  !set 1_=!append line $tmp_ to $1_
89
  !let wims_menu_items=!append line $tmp_ to $wims_menu_items
89
  !let wims_menu_items=!append line $tmp_ to $wims_menu_items
-
 
90
  !let p=!positionof item $wims_exo in $wims_listexo
90
  !if $wims_exo>1
91
  !if $wims_exo!=$(wims_listexo[1])
91
    !let wims_menu_items=!append line previousseries,1,module=home&directworksheet=$wims_sheet.$[$wims_exo-1] to $wims_menu_items
92
    !let wims_menu_items=!append line previousseries,1,module=home&directworksheet=$wims_sheet.$(wims_listexo[$p-1]) to $wims_menu_items
92
  !endif
93
  !endif
93
  !if $wims_exo<$wims_sheetmax
94
  !if $wims_exo!=$(wims_listexo[-1])
94
    !let wims_menu_items=!append line nextseries,1,module=home&directworksheet=$wims_sheet.$[$wims_exo+1] to $wims_menu_items
95
    !let wims_menu_items=!append line nextseries,1,module=home&directworksheet=$wims_sheet.$(wims_listexo[$p+1]) to $wims_menu_items
95
  !endif
96
  !endif
96
!endif
97
!endif
97
 
98
 
98
!if ($wims_user=$empty or $wims_developer!=$empty or $wims_user=supervisor)\
99
!if ($wims_user=$empty or $wims_developer!=$empty or $wims_user=supervisor)\
99
    and $exoprev$exonext != $empty and $wims_sheet=$empty
100
    and $exoprev$exonext != $empty and $wims_sheet=$empty