Subversion Repositories wimsdev

Rev

Rev 6235 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
 
2
!form reply
6235 bpr 3
  <input type="submit" value="$wims_name_Show" />
23 reyssat 4
  !reset job
1837 bpr 5
  !formselect job list work,todo prompt $name_done,$name_todo
6
  $name_between
23 reyssat 7
  !distribute item $[$jyear],0,$[$jmonth] into jyear,jday,jmonth
8
  !let v=!values v for v=1 to 31
1837 bpr 9
  !read adm/date.phtml
10
  !let creyear=!char 1 to 4 of $class_creation
11
  !let expyear=!char 1 to 4 of $class_expiration
6366 guerimand 12
  !if $(cdt_ltmonth)!=$empty
13
   !let tmp=!sort numeric item of $(cdt_ltmonth)
14
   !let miny=!char 1 to 4 of $(tmp[1])
15
   !let creyear=$[min($miny,$creyear)]
16
   !let maxy=!char 1 to 4 of $(tmp[-1])
17
   !let expyear=$[max($expyear,$maxy)]
18
  !endif
5401 bpr 19
  !read adm/lang/datemenu.phtml.$moduclass_lang 1,jday,jmonth,jyear
1837 bpr 20
  $name_and
23 reyssat 21
  !if $jyear2=$empty or $jyear2=0
22
   !let jyear2=!char 1 to 4 of $wims_now
23
   !let jmonth2=!char 5 to 6 of $wims_now
24
   !let jday2=!char 7 to 8 of $wims_now
25
  !endif
26
  !distribute item 0,0,0 into jyear2,jday2,jmonth2
1837 bpr 27
  !let v1=!values v for v=$creyear to $expyear
5401 bpr 28
  !read adm/lang/datemenu.phtml.$moduclass_lang 4,jday2,jmonth2,jyear2
6235 bpr 29
  <br /><span class="small"> $name_warning1</span>
5861 bpr 30
 
5926 bpr 31
!formend
32
 
1278 bpr 33
 
34
!if $wims_user=supervisor and $cdt_supervise=yes
1336 bpr 35
 !set wims_menu_items= !append line adddate,1,cmd=new&job=adddate\
1278 bpr 36
 addfile,1,cmd=reply&job=file\
37
 addtodo,1,cmd=new&job=addtodo\
38
 config,1,cmd=reply&job=config\
1336 bpr 39
 to $wims_menu_items
23 reyssat 40
!endif
41
 
42
!if ($job isitemof home,todo or work isin $job and $jour_begin!=$empty) and $cdt_nbdate<$max_defaffi
1991 bpr 43
  !set wims_menu_items=!append line back2,1,cmd=new&job=home to $wims_menu_items
1196 bpr 44
!endif